Вниз
Скачать: CL | DM;

UpdateSQL and Query   Найти похожие ветки 

 
bardi   (2002-07-29 11:29) [0]

Есть запрос делающий выборку из 3х таблиц
Естественно он "мертвый". Изменения нужно производить во всех трех
таблицах.
Прикручиваю TUpdateSQL но он работает с одним
DataSet. Ситуация стандартная-то подскажите
пожалуста как правивильно решить.
Если я правильно понимаю то у DataSet может быть
один UpdateObject. А если нет, то как с ними работать? В имеющейся
литературе - ноль(((
Заранее спасибо.


 
ЮЮ   (2002-07-29 11:58) [1]

Вместо UpdateSQL написать свой обаботчик
Query.UpdateRecord (см.Help)


 
bardi   (2002-07-29 12:57) [2]

Спасибо.
Все получилось. Но через TUpdateSQL.


 
ЮЮ   (2002-07-29 13:18) [3]

И каким же образом в TUpdateSQL удалось изменить 3 таблицы?


 
bardi   (2002-07-29 17:18) [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-30 02:52) [5]

>Все получилось. Но через TUpdateSQL.
На самом деле всё получилось через Query.UpdateRecord, как я и предлагал, а не через Query.UpdateSQL :-)


 
Johnmen ©   (2002-07-30 09:26) [6]

>И каким же образом в TUpdateSQL удалось изменить 3 таблицы?

Что-то не видно изменений в 3-ех таблицах.......:)))))))





 
ЮЮ   (2002-07-30 09:42) [7]

Странно, но я вижу :-) Правда для 2х.
Очевидно, что UpdOtdel это TUpdateSQL для таблицы Otdel,
UpdNaim - для таблицы Naim.
Правда совсем непонятно что будет происходить с самим DataSet



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.011 c
1-60677
AlexNO
2002-08-06 12:09
2002.08.19
Нужно выдрать значение Text из всех TLabeledEdit ов на форме


1-60681
ilg
2002-08-06 02:23
2002.08.19
Запуск в свернутом виде


1-60702
Влад Утюмов
2002-08-05 17:56
2002.08.19
Разработка компонент: класс как свойство компоненты.


1-60648
Leran2002
2002-08-08 15:16
2002.08.19
InstallShield


3-60490
NDR
2002-07-29 07:36
2002.08.19
Как по текущей ячейки получить наименование столбца ?




   Наверх