Текущий архив: 2004.04.25;
Скачать: CL | DM;
Вниз
Проблемы с WM_SYSCOMMAND Найти похожие ветки
← →
Islander (2004-02-26 18:05) [0]Здравствуйте!
Ловлю WM_SYSCOMMAND
Procedure WMSysCommand (var Msg:TMessage); message WM_SYSCOMMAND;
procedure TfrmLogin.WMSysCommand(var Msg: TMessage);
begin
if Msg.WParam = SC_MINIMIZE then
Application.Minimize;
end;
Так вот, после всего этого форма не хочет принимать сообщения о действиях со своим заоголовком, т.е. не таскается и т.д.
Пробую
SendMessage (self.Handle, WM_SYSCOMMAND, Msg.WParam, Msg.LParam)
Не помогает.
Чего делать? Как заставить форму обработать все оставльные сообщения?
← →
Игорь Шевченко © (2004-02-26 18:06) [1]
> procedure TfrmLogin.WMSysCommand(var Msg: TMessage);
> begin
> if Msg.WParam = SC_MINIMIZE then
> Application.Minimize
else
inherited;> end;
← →
Islander (2004-02-26 18:55) [2]Спасибо, даже не догадывался, что тут можно вызвать inherited :)
Страницы: 1 вся ветка
Текущий архив: 2004.04.25;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.045 c
