Форум: "Базы";
Текущий архив: 2002.02.21;
Скачать: [xml.tar.bz2];

Вниз

Задержка с обновлением ?   Найти похожие ветки 

← →
Petrovich   (2002-01-28 18:52) [6]

Все правильно. etoCancelOnExit отвечает за Post при потере фокуса гридом. При закрытии формы фокус не перемещается, соответственно Post не происходит.
Лучший вариант, IMHO, корректно обрабатывать закрытие формы, например:

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
var ConfirmResult: Integer;
begin
CanClose := True;
if not (Dataset1.State in [dsBrowse]) then
begin
ConfirmResult := MessageDlg("Data was changed. Apply changes?", mtConfirmation, mbYesNoCancel, 0);
if ConfirmResult = IDYES then
Dataset1.Post;
if ConfirmResult = IDCANCEL then
CanClose := False;
end;
end;

---

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

Форум: "Базы";
Текущий архив: 2002.02.21;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.43 MB
Время: 0.003 c