Текущий архив: 2002.06.03;
Скачать: CL | DM;
Вниз
close form -> minimize Найти похожие ветки
← →
ask (2002-05-21 13:37) [0]Мастера, подскажите как реализовать минимизацию формы при попытке ее закрытия.
← →
KilkennyCat © (2002-05-21 16:49) [1]в событии OnCloseQuery сказать CanClose := false; Hide;
← →
NailS © (2002-05-21 16:52) [2]Может в OnClose Action := caMinimize прописать?
← →
PVOzerski © (2002-05-21 18:53) [3]Перехватить сообщение WM_SYSCOMMAND и соответствующим образом поправить:
procedure WMSysCommand(var msg:tWMSysCommand);message WM_SYSCOMMAND;
...
procedure tForm1.WMSysCommand(var msg:tWMSysCommand);
begin
if msg.CmdType=SC_CLOSE then
msg.CmdType:=SC_MINIMIZE;
inherited;
end;
← →
Agent Smith © (2002-05-21 19:12) [4]Я уже подробно ответил на этот вопрос, но либо сервак не сработал, либо была другая ветка, а она где-то заблудилась...
← →
snoup © (2002-05-21 19:26) [5]На обработчике OnClose напиши
action:=canone;
application.Minimize;
Удачи!
Страницы: 1 вся ветка
Текущий архив: 2002.06.03;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.016 c
