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

Консольное приложение в Delphi   Найти похожие ветки 

← →
Slonic75 ©   (2003-01-27 11:23) [0]

Добрый день! Я не профессионал, вопрос вроде как простой, но никак не могу найти ответ. Вопрос – как в консольном приложении предотвратить закрытие приложения по нажатию на «крест» консольного окна? Я закрываю приложение по вводу команды завершения работы. Пожалуйста, дайте пример кода…

---

← →
Chubais ©   (2003-01-27 12:14) [1]

> как в консольном приложении предотвратить закрытие приложения
> по нажатию на «крест» консольного окна

выключить монитор разве что...имхо...

---

← →
Slonic75 ©   (2003-01-27 13:41) [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);
...

цель достигнута, тока не знаю насколько это верно...

---

← →
Cobalt ©   (2003-01-27 22:53) [3]

Вроде (по справке) верно...

---

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

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



Память: 0.45 MB
Время: 0.011 c