Страница 1 из 1
Свой обработчик перемешения формы
Добавлено: 06 мар 2007, 13:37
namomelkor
делаю свой обработчик событьй для формы
Код: Выделить всё
procedure TForm1.WMSysCommand;
begin
if (Msg.CmdType = SC_MINIMIZE) then
begin
Application.Minimize;
TrayIcon1.HideMainForm;
end;
if (Msg.CmdType = SC_Close) then
begin
close;
end;
end;
Но теперь не работает перемещение формы подскажите как написать обработку для SC_MOVE или чегонибудь еще чтобы перемпещение работало. Или как в остальных случаях передавать обработку системе(программе).
Re: Свой обработчик перемешения формы
Добавлено: 06 мар 2007, 15:21
LAngel
inherited;
Re: Свой обработчик перемешения формы
Добавлено: 07 мар 2007, 12:53
Лелик_1044
Раскажи подробнее что за штука такая
часто встречаю а не знаю
прырваний какое-то или что
где надо использовать и проче
Re: Свой обработчик перемешения формы
Добавлено: 07 мар 2007, 14:00
Blood_Magic
Лелик писал(а):Раскажи подробнее что за штука такая
часто встречаю а не знаю
прырваний какое-то или что
где надо использовать и проче
inherited - вызов родительского обработчика того же самого события. т.е. тебе либо надо написать свой обработчик перемещения формы, либо вызвать родительский, иначе перемещаться она не будет )))
а вообще что б не задавать таких вопросов, проще поставить галочку Use Debug DCUs и пошагово в отладниче посмотреть что происходит )))
Re: Свой обработчик перемешения формы
Добавлено: 07 мар 2007, 15:35
Игорь Акопян
" писал(а):подробнее что за штука такая
смотрим словарь
inherited - унаследованный
сл-но это вызов родительского обработчика