Форум: "Потрепаться";
Текущий архив: 2003.03.06;
Скачать: [xml.tar.bz2];
ВнизОбработка сообщения WM_SYSCOMMAND !!!! Найти похожие ветки
← →
SeNtiMeL (2003-02-15 01:15) [0]Мне нужно реализовать код, в котором будет обрабатываться сообщения минимизации и максимизации окна...
Я делаю так:
procedure ActionMessage(var Message: TMessage); message WM_SysCommand;
....
...
...
procedure TForm1.ActionMessage(var Message: TMessage);
begin
Case Message.WParam of
sc_close: Application.Terminate;
sc_minimize: ShowWindow(Form1.Handle,SW_HIDE);
sc_maximize: ShowWindow(Form1.Handle,SW_MAXIMIZE);
SC_RESTORE: ShowWindow(Form1.Handle,SW_RESTORE);
end;
end;
В результате у меня обработка происходит, но после этого форму нельзя перетащить и изменить ее размер мышкой....
Может что-то нужно сюда добавить ???? Или я что-то не так делаю.
← →
Sentinel (2003-02-15 01:30) [1]procedure TForm1.WMSysCommand(var Message: TWMSysCommand);
begin
inherited;
Case Message. CmdType of
sc_close : Application.Terminate;
sc_minimize : ShowWindow(Form1.Handle,SW_HIDE);
sc_maximize : ShowWindow(Form1.Handle,SW_MAXIMIZE);
SC_RESTORE : ShowWindow(Form1.Handle,SW_RESTORE);
end;
end;
← →
Sentinel (2003-02-15 01:32) [2]Слышь, дружище, а логин у тебя весьма интересный, с моей точки зрения.
← →
gsu (2003-02-15 14:30) [3]тезки (-:|~
← →
SeNtiMeL (2003-02-15 14:52) [4]:) Почти.... Этот логин исторический..
← →
SeNtiMeL (2003-02-15 14:53) [5]да, забыл сказать, пасибо :)
← →
интелектуал (2003-02-15 19:47) [6]Не за чта
← →
интелектуал (2003-02-15 19:50) [7]Такие вещи должен сам вкурить.
А кстати, кто из вас senti - mel - nel первый регистрировался? Может, один увидел чужой логин, и передразнил его?
Страницы: 1 вся ветка
Форум: "Потрепаться";
Текущий архив: 2003.03.06;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.011 c