![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
UpdateSQL and Query
bardi © (2002-07-29 11:29:00)Есть запрос делающий выборку из 3х таблиц
Естественно он "мертвый". Изменения нужно производить во всех трех
таблицах.
Прикручиваю TUpdateSQL но он работает с одним
DataSet. Ситуация стандартная-то подскажите
пожалуста как правивильно решить.
Если я правильно понимаю то у DataSet может быть
один UpdateObject. А если нет, то как с ними работать? В имеющейся
литературе - ноль(((
Заранее спасибо.
ЮЮ (2002-07-30 09:42:00) [1]Странно, но я вижу :-) Правда для 2х.
Очевидно, что UpdOtdel это TUpdateSQL для таблицы Otdel,
UpdNaim - для таблицы Naim.
Правда совсем непонятно что будет происходить с самим DataSet
Johnmen (2002-07-30 09:26:00) [2]>И каким же образом в TUpdateSQL удалось изменить 3 таблицы?
Что-то не видно изменений в 3-ех таблицах.......:)))))))
ЮЮ (2002-07-30 02:52:00) [3]>Все получилось. Но через TUpdateSQL.
На самом деле всё получилось через Query.UpdateRecord, как я и предлагал, а не через Query.UpdateSQL :-)
bardi (2002-07-29 17:18:00) [4]qrOtdel.UpdateObject := UpdOtdel;
qrOtdel : Tquery;
UpdOtdel : TUpdateSQL;
UpdNaim : TUpdateSQL;
procedure TfmTree.FormCreate(Sender: TObject);
begin
UpdNaim.DataSet := qrOtdel;
end;
procedure TfmTree.qrOtdelUpdateRecord(DataSet: TDataSet;
UpdateKind: TUpdateKind; var UpdateAction: TUpdateAction);
begin
try
UpdOtdel.Apply(UpdateKind);
UpdNaim.Apply(UpdateKind);
UpdateAction := uaApplied;
except
UpdateAction := uaAbort;
end;
end;
Я думаю будет все понятно, если нет пиши...
ЮЮ (2002-07-29 13:18:00) [5]И каким же образом в TUpdateSQL удалось изменить 3 таблицы?
bardi (2002-07-29 12:57:00) [6]Спасибо.
Все получилось. Но через TUpdateSQL.
ЮЮ (2002-07-29 11:58:00) [7]Вместо UpdateSQL написать свой обаботчик
Query.UpdateRecord (см.Help)