Главная страница
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.051 c
2-1159882055
Юный Падаван
2006-10-03 17:27
2006.10.22
Откуда запускается моя программа


3-1156838940
StriderMan
2006-08-29 12:09
2006.10.22
Конвертирование БД FireBird.


8-1142958394
sco
2006-03-21 19:26
2006.10.22
Рисование меню.


2-1160132776
andrey44
2006-10-06 15:06
2006.10.22
Flat Memory as Dynamic array


11-1136052803
Boguslaw
2005-12-31 21:13
2006.10.22
AncestorOfObject