🚀 go-pugleaf

Hi Remy:

Thanks for your reply.
The problem is solved perfectly.

Thank you very much....^_^
RaynorPao.

"Remy Lebeau (TeamB)" <gambit47@yahoo.com> ���g��l��
news:3e7fec3b@newsgroups.borland.com...
> After playing with it a bit, it would appear that when allowing the system
> menu in behavior in its native manner, it sends WM_SYSCOMMAND commands to
> the form, but when using TrackPopupMenu() it sends WM_COMMAND messages
> instead.  That difference is confusing the VCL as to what to do with them,
> since those two messages have different implementations.
>
> To make it work correctly, you have to take the return value of
> TrackPopupMenu() (which you're already specifying the TPM_RETURNCMD flag
> for, you're just not using the actual return value) and then manually send
> WM_SYSCOMMAND to the form, ie:
>
>     HMENU hMenu = GetSystemMenu(Form1->Handle, FALSE);
>     int nCmd = TrackPopupMenu(hMenu, TPM_LEFTALIGN | TPM_RETURNCMD,
> Form1->Left+10, Form1->Top+10, 0, Form1->Handle, NULL);
>     if( nCmd )
>     {
>         TMessage Message;
>         Message.Msg = WM_SYSCOMMAND;
>         Message.WParam = nCmd;
>         Message.LParam = 0;
>         Form1->WndProc(Message);
>     }
>
>
> Gambit
>
> "RaynorPao" <RaynorPao.nospam@nospam.pchome.com.tw> wrote in message
> news:3e7fdee7@newsgroups.borland.com...
>
> > The System Menu can be display on my Form.
> > But when I click "Exit"....It will not close my
> > Form(Exit Application).
> <snip>
>
>
>