Вниз
Скачать: CL | DM;

Form.OnCloseQuery - Как обработать ?   Найти похожие ветки 

 
Андрей Сенченко ©   (2001-12-18 12:49) [0]

Что сделать, чтобы не дать программе закрытся ?
В обработчик Form.OnCloseQuery ставлю:

If MessageBox(0,pchar("Вы действительно хотите завершить работу с программой ?"),pchar("Внимание !"),MB_OKCANCEL + MB_ICONQUESTION) = IDOK
Then
// ....
// Совершение действий, необходимых перед выходом
//
Else
// ??????????????
End;

А вот собственно где вопросы - никак не могу найти - как прервать завершение программы.
Подскажите пожалуйста - где искать ? Спасибо.


 
Виктор Щербаков ©   (2001-12-18 12:58) [1]

Ну пример же в хэлпе есть...
CanClose := false


 
Андрей Сенченко ©   (2001-12-18 13:01) [2]

Не в хелпе искал - в книжках. На этой тачке у меня ни Help ни SDK не установлен - винта не хватает.

Спасибо :)


 
csf ©   (2001-12-18 13:03) [3]

Под Query подразумевается не твой Query пользователю, а запрос "окна" тебе, как разработчику "Оцени, мол, могу я закрыться или нет".

Метод имеет параметр, смотри внимательно.
FormCloseQuery(Sender: TObject; var CanClose: Boolean);


 
Андрей Сенченко ©   (2001-12-18 13:10) [4]

>> csf
> Под Query подразумевается не твой Query пользователю, а запрос "окна"
> тебе, как разработчику "Оцени, мол, могу я закрыться или нет".

Это я знаю, не совсем глупый :)

> Метод имеет параметр, смотри внимательно.
> FormCloseQuery(Sender: TObject; var CanClose: Boolean);

Говорю же : Ctrl-F1 на этой тачке не отрабатывет за отсутствием установленного хелпа. А вот на
" var CanClose: Boolean "
не посмотрел ... бывает.

Всем спасибо !



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c
1-22181
Kost
2001-12-21 11:12
2002.01.08
Как запретить перемещение формы мышю?


7-22446
Paradox
2001-09-25 19:12
2002.01.08
Не пропускайте!!!Ну, очень нужно.


3-21939
SAN
2001-12-04 16:01
2002.01.08
MSSQL


3-21905
nic406
2001-11-28 04:21
2002.01.08
Help! Делаю Select * From T1 -> refresh -> ошибка(ADODataSet)


1-22162
BFG
2001-12-19 20:41
2002.01.08
AVI




   Наверх