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

Вниз

IBDataSet1BeforePost   Найти похожие ветки 

 
Fantasy ©   (2006-10-02 17:10) [0]

IBX Delphi7 подскажите пожалусто как отменить событие
у меня событие IBDataSet1BeforePost  но информация в некоторых полях меня не устаивает как по условию отменить событие Post.

procedure TForm1.IBDataSet1BeforePost(DataSet: TDataSet);
begin
if IBDataSet1["F_NOMER"] > 20 then
begin
 //??????<< как сказать чтобы вернулся
 //в режим Edit или Inset тоесть не записал бы него в базу.
end;
end;


 
Loginov Dmitry ©   (2006-10-02 17:16) [1]

Abort


 
Fantasy ©   (2006-10-02 17:28) [2]

</procedure TForm1.IBDataSet1BeforePost(DataSet: TDataSet);
begin
if IBDataSet1["F_NOMER"] > 20 then
begin
Abort; // проверь Если номер > 20 Всеравно пишит она с условия вылитает
end;
//<< вот сюда
end;CODE>


 
Fantasy ©   (2006-10-02 17:42) [3]

как отменить транзакцию по событию IBDataSet1BeforePost



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

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

Наверх




Память: 0.47 MB
Время: 0.031 c
2-1159786539
Antoxa2005
2006-10-02 14:55
2006.10.22
Что это за ЗВЕРЬ. После разработки проекта оказалось, что програм


15-1159505220
boriskb
2006-09-29 08:47
2006.10.22
Энциклопедия целочисленных последовательностей.


15-1159800150
vidiv
2006-10-02 18:42
2006.10.22
Шашки


2-1160069377
vain
2006-10-05 21:29
2006.10.22
756E697420556E69


1-1157757381
tio
2006-09-09 03:16
2006.10.22
сделать невидимым процесс своей программы в XP