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

Вниз

При отправлении Cancel - получается ... Insert   Найти похожие ветки 

← →
}|{yk ©   (2004-10-04 21:09) [0]

 if OraQueryPlateg.State = dsEdit then
 begin
   Text := "Áóëî çì³íåíî äàí³. Çàíåñòè çì³íè äî áàçè?";
   Caption := "×è çì³íþâàòè çàïèñ?";
   if MessageBoxEx(GetForegroundWindow, PChar(Text), PChar(Caption), MB_YESNO + MB_ICONQUESTION, 419) <> ID_YES then
     OraQueryPlateg.Cancel;
 end;
Смотрим в sql-монитор, а подается запрос на Insert
Компоненты ODAC

---

← →
ЮЮ ©   (2004-10-05 03:02) [1]

Этот Cancel только для редактируеиой (а не вставляемой) записи, а коль приходит Insert, то этот код не должен работать.

if OraQueryPlateg.State in [dsEdit, dsInsert] then

---

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

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

Наверх

Память: 0.46 MB
Время: 0.045 c