Главная страница
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.04 c
14-1117177400
juice
2005-05-27 11:03
2005.06.14
Разрешение адресов


14-1116919421
Vasya.ru
2005-05-24 11:23
2005.06.14
Критерий интервалов - кто знает?


3-1113986759
Phoenix9000
2005-04-20 12:45
2005.06.14
DBGrid. Отображение "Да" вместо "True"


4-1113892854
Упсс
2005-04-19 10:40
2005.06.14
Уникальный Explorer


1-1117167035
Andurbay
2005-05-27 08:10
2005.06.14
Перезапуск формы