Свой обработчик перемешения формы

[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 или чегонибудь еще чтобы перемпещение работало. Или как в остальных случаях передавать обработку системе(программе).

[LAngel]

inherited;

[Лелик_1044]

Раскажи подробнее что за штука такая
часто встречаю а не знаю

прырваний какое-то или что
где надо использовать и проче

[Blood_Magic]

Раскажи подробнее что за штука такая
часто встречаю а не знаю

прырваний какое-то или что
где надо использовать и проче

inherited - вызов родительского обработчика того же самого события. т.е. тебе либо надо написать свой обработчик перемещения формы, либо вызвать родительский, иначе перемещаться она не будет )))
а вообще что б не задавать таких вопросов, проще поставить галочку Use Debug DCUs и пошагово в отладниче посмотреть что происходит )))

[Игорь Акопян]

подробнее что за штука такая

смотрим словарь
inherited - унаследованный

сл-но это вызов родительского обработчика