Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.06.14;
Скачать: CL | DM;

Вниз

ADODataSet.Edit идет на событие BeforeInsert. Почему?   Найти похожие ветки 

 
Denmin ©   (2005-05-11 09:47) [0]

Здравствуйте.
procedure TForm1.ADOSet_cexpartyBeforeClose(DataSet: TDataSet);
begin
ADOSet_cexparty.Edit;
ADOSet_cexparty.Post;
end;

После ADOSet_cexparty.Edit; идет сюда. Кол-во записей 0. Или это такая особенность, если нет записи, то в таблицу SQL Server 2000, добавляется запись автоматом?

procedure TForm1.ADOSet_cexpartyBeforeInsert(DataSet: TDataSet);
begin
ADOSet_cexparty.Last;
if ADOSet_cexparty["party"]<>null then
party:=ADOSet_cexparty["party"]
else
party:=0;
end;

procedure TForm1.ADOSet_cexpartyAfterInsert(DataSet: TDataSet);
begin
ADOSet_cexparty.Edit;
ADOSet_cexparty["cex"]:=DBLookupComboBox1.KeyValue;
ADOSet_cexparty["party"]:=party+1;
ADOSet_cexparty.Post;
end;

Вопрос, почему после Edit идет на событие BeforeInsert? Заранее благодарен.


 
Max Zyuzin ©   (2005-05-11 10:02) [1]

>Denmin ©   (11.05.05 09:47)  
Читаем справку про DatasetEdit, внимательно обращая внимание на If the dataset is empty, Edit calls Insert.
А вообще если не секрет к чему все то что написано в BeforeClose?


 
Anatoly Podgoretsky ©   (2005-05-11 10:05) [2]

Чтобы было страшно


 
Denmin ©   (2005-05-11 10:35) [3]

к чему написано не знаю, давно писалось, а потом приостановили написание. я тоже задумался зачем. наверное так надо. спасибо за ответы.


 
Max Zyuzin ©   (2005-05-11 10:48) [4]

>Denmin ©   (11.05.05 10:35) [3]
А кто сие писал? ЧТо то столько наворочено лишнего... и к тому же не корректно, на мой взгляд, может переписать все?



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

Текущий архив: 2005.06.14;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.044 c
3-1115374915
vic1
2005-05-06 14:21
2005.06.14
текст в ADODataset


4-1113980046
dimasih
2005-04-20 10:54
2005.06.14
Знатокам TService in a Delphi 5.0


8-1109702013
Romantic
2005-03-01 21:33
2005.06.14
Громадный TImage


14-1117000277
Бугага
2005-05-25 09:51
2005.06.14
Справка о внедрении


4-1114027177
Ibrox
2005-04-20 23:59
2005.06.14
Создание дополнительного потока