Скачать: 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 вся ветка

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



Память: 0.45 MB
Время: 0.023 c