[Mediv]

Всем привет, такая проблема, есть основная форма с логином..., после входа ее прячу модальная остается, в модальной форме при изменении размеров меняется расположение контролов (ширина, высота), все расчеты делаю руками для каждого контрола, все нормально работает, как надо, но если модальную форму сворачиваю, то все идет лесом, почему отрабатываем событие OnResize на форме?? накидал тест с одной формой все нормально, событие не срабатывает!?!?!?! Может кто подскажет в чем дело?? Как можно отловить событие сворачивания формы?? я бы тогда блоки поставил и решил свою проблему.
Спасибо.

[NumLock]

см. свойства BorderStyle и BorderIcons. все делается на много проще и лучше.

[Mediv]

Сообщение от NumLock

см. свойства BorderStyle и BorderIcons. все делается на много проще и лучше.

я прекрасно знаю об этих событиях, вопрос стоит по другому, мне не нужно блокировать событие, нужно отловить само событие и заблокировать выполнение части кода.

[angvelem]

Ловим сворачивание.

Код:

    WM_SYSCOMMAND :
    begin
      if wParam = SC_MINIMIZE then
        ...
    end;

[Mediv]

Код:

procedure  TMainForm.WMSysCommand(var message: TWMSysCommand);
begin
  if message.CmdType = SC_MINIMIZE then
    BlockMinimaze := True;
  if message.CmdType = SC_MAXIMIZE then
    BlockMinimaze := False;    
  inherited;
end;

Всем спасибо, решение найдено.