Форум: "Базы";
Текущий архив: 2005.06.14;
Скачать: [xml.tar.bz2];
Вниз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;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.034 c