| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Проблемы с WM_SYSCOMMAND [D7, WinXP]
Islander © (2004-02-26 18:05:00)Здравствуйте!
Ловлю 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)
Не помогает.
Чего делать? Как заставить форму обработать все оставльные сообщения?
Islander (2004-02-26 18:55:00) [1]Спасибо, даже не догадывался, что тут можно вызвать inherited :)
Игорь Шевченко (2004-02-26 18:06:00) [2]
> procedure TfrmLogin.WMSysCommand(var Msg: TMessage);
> begin
> if Msg.WParam = SC_MINIMIZE then
> Application.Minimize
else
inherited;> end;
| |
