通常在应用程序的主窗体中，利用鼠标左键点击左上角的图标，会弹出一个菜单，称之为“系统菜单”。在窗体中并没有系统菜单对应的组件，所以有时我们需要定制系统菜单时就比较麻烦。具体可以能过下面的步骤实现：

在系统菜单上添加所需的菜单项。

为新添加的菜单项定义OnClick事件的处理过程。

下面的例程中，在系统菜单中添加了一个“前端显示（A）”菜单项，通过该菜单项，可以使窗体始终显示在最前端或为普通窗体模式。具体实现过程如下：

1）通过菜单File|New Application创建一个新的工程。

2）添加窗体Form1的OnClick事件的处理过程如下：

void _fastcall TForm1::FormCreate(Tobject *Sender)
{
 //设置系统菜单
AppendMenu(GetSystemMenu(Handle,false),MF_SEPARATOR,0,"");
AppendMenu(GetSystemMenu(Handle,false),MF_STRING,200,"前端显示(&A)");
}

...            #include
       ...

...　　public://User declarations

　　__fastcall TForm1(TComponent *Owner);

　　MESSAGE void __fastcall SystemMenuCommand(TWMMenuSelect &Msg);

　　BEGIN_MESSAGE_MAP

　　MESSAGE_HANDLER(WM_SYSCOMMAND,TWMMenuSelect,SysteMenuCommand);

　　END_MESSAGE_MAP(TForm);

　　};