🚀 go-pugleaf

Thank you. But it works only if user posts system command (from top left
corner of the window system menu selects "Maximize" command). In the case of
pressing Maximize border icon or double clicking the title of the window it
is not working.

"JD" <nospam@nospam.com> wrote in message
news:3fd95400@newsgroups.borland.com...
>
> "Nitisara das" <nitisara@mail.ru> wrote:
> > How I can create OnMaximize form event?
>
> Override the the inherited WndProc() method:
>
> //--- in the header
> protected: // User declarations
>     virtual void __fastcall WndProc(TMessage &Message);
> //--- in the unit
> void __fastcall TForm1::WndProc(TMessage &Message)
> {
>     if( Message.Msg == WM_SYSCOMMAND )
>       {
>           if( Message.wParam == SC_MAXIMIZE )
>             {
>                 // form is about to be maximized
>             }
>       }
>     TForm::WndProc( Message );
> }
>
> ~ JD
>