| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Консольное приложение в Delphi [D6, Win2k]
Slonic75 © (2003-01-27 11:23:00)Добрый день! Я не профессионал, вопрос вроде как простой, но никак не могу найти ответ. Вопрос – как в консольном приложении предотвратить закрытие приложения по нажатию на «крест» консольного окна? Я закрываю приложение по вводу команды завершения работы. Пожалуйста, дайте пример кода…
Cobalt (2003-01-27 22:53:00) [1]Вроде (по справке) верно...
Slonic75 (2003-01-27 13:41:00) [2]Написал свой обработчик событий
function EventHandler(CtrlType : DWord) : Bool; stdcall; far;
begin
case CtrlType of
CTRL_CLOSE_EVENT, CTRL_LOGOFF_EVENT, CTRL_SHUTDOWN_EVENT : EventHandler := True;
else EventHandler := False
end
end;
а в тексте программы вставил
...
SetConsoleCtrlHandler(@EventHandler, True);
...
цель достигнута, тока не знаю насколько это верно...
Chubais (2003-01-27 12:14:00) [3]
> как в консольном приложении предотвратить закрытие приложения
> по нажатию на «крест» консольного окна
выключить монитор разве что...имхо...
| |
