Реакция на кнопку "развернуть" на бордюре формы

[Ksardas13]

Как отловить это действие?
Я использовал событие онресайз формы. Но у меня в момент создания и дальнейшей работы форма много раз меняет свои размеры. Пришлось ставить счётчик и кучу условий. Событие отловил - раскрыл прогу на весь экран(поверх кнопки пуск)... теперь при клике по батону1 моя цель форму нормализовать... тут опять придётся ставить кучу счётчкиов и условий...
Должне же быть способ легче?

[Ksardas13]

Юзай компонент ApplicationEvents на вкладке адишионал.

void __fastcall TForm1::ApplicationEvents1Message(tagMSG &Msg,
      bool &Handled)
{
   if ((Msg.message==274))//Восстановить
    Msg.message=0;
   if ((Msg.message==161)&&(Msg.wParam==9))//развернуть
    Msg.message=0;
   if ((Msg.message==161)&&(Msg.wParam==8))//свернуть
     Msg.message=0;
   if ((Msg.message==161)&&(Msg.wParam==20))//Закрыть
    Msg.message=0;
}

и будет тебе счастье!

[Ksardas13]

О, спасибо, то что надо! Ты супер!!

[Ksardas13]

Всегда рад помочь.