Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Редактирование данных, полученных в результате выполнения SQL-запроса [D5, Paradox]

Марина © (2002-03-22 09:45:00)
Есть вот такой код
with Query1 do
begin
Close;
Prepare;
vkl:=strtoint(Edit1.Text);
otkl:=-strtoint(edit1.text);
ParamByName("v").AsInteger:=vkl;
ParamByName("ot").AsInteger:=otkl;
if Query1NB1.Value=StrToint("164") then
Query1NB1.Value:=StrToInt("1");
Open;
Подскажите, пожалуйста, почему сам запрос выполняется, а редактирование - нет. Заранее спасибо.

drpass (2002-03-22 12:56:00) [1]
Вообще-то разумнее выполнить Update <чего там> set nb1=164 where nb1=1;
И трудно судить, не видя текста самого запроса

wicked (2002-03-22 12:48:00) [2]

> запрос без сортировки, группировки, по одной таблице

шаг в сторону - расстрел, прыжок - провокация... :))

на этот случай лучше держать 2 query - 1-й для просмотра (с сортировками, группировками), а второй - для редактирования (только главная таблица без сортировок, и группировок)...

а еще можно использовать TUpdateSQL, но тут я молчу, так как никогда его не пользовал...

fnatali (2002-03-22 10:56:00) [3]
Requestlive:=true, запрос без сортировки, группировки, по одной таблице - тогда будет редактироваться

Praco (2002-03-22 10:02:00) [4]
Забыл, еще упростим:
if Query1NB1.Value = 164 then Query1NB1.Value := 1;

:))

Если не редактируется, то дело в запросе.

Praco (2002-03-22 09:56:00) [5]
Код упростим :

with Query1 do
begin
Close;
ParamByName("v").AsString:=Edit1.Text;
ParamByName("ot").AsString:="-"+edit1.text;
Prepare;
Open;
Edit;
if Query1NB1.Value=StrToint("164") then
Query1NB1.Value:=StrToInt("1");

Запрос тоже надо показать.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »