Alt+F4

← →
sbuffoon (2004-01-26 01:09) [0]

Подскажите плз как сделать так, чтобы мою прогу нельзя было закрыть с помощью Alt+F4

← →
Сергей Чурсин © (2004-01-26 01:28) [1]

Удалено модератором

← →
Сергей Чурсин © (2004-01-26 01:28) [2]

Удалено модератором

← →
Iyeh (2004-01-26 01:51) [3]

Удалено модератором

← →
Сергей Чурсин © (2004-01-26 02:26) [4]

Удалено модератором

← →
XenonXX © (2004-01-26 04:24) [5]

Либо хун на клаву либо проверяй приходящие сообщения.
А проще просто onclosequery проверяй свою переменку и не давай закрытся если не надо.

← →
химик (2004-01-26 16:21) [6]

обработай WM_CLOSE

← →
Плохиш_ (2004-01-26 16:27) [7]

А потом будет задан вопрос "А почему у мени вындовс нэ выключается?" :-)

> sbuffoon (26.01.04 01:09)
cм. TForm.OnCloseQuery(...)

← →
Santak (2004-01-26 18:19) [9]

Вот держи

if ((Key=vk_f4) and (ssAlt in Shift)) then
begin
form1.close;

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean); begin CanClose:=false; end;