Главная страница
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.03 c
1-1116922813
r13
2005-05-24 12:20
2005.06.14
Мерцание формы


1-1116836985
P.N.P.
2005-05-23 12:29
2005.06.14
Приведение типов


14-1117189304
Narikmen
2005-05-27 14:21
2005.06.14
Skin в IniFile


1-1117530290
Karlson
2005-05-31 13:04
2005.06.14
Как средствами Delphi создать Help-файл?


1-1117194534
Masta Hookah
2005-05-27 15:48
2005.06.14
"ZIP" -> COMPRESSED