一个简单的Windows窗体功能
1：当程序最小化的时候，最小到托盘。任务栏中没有。
2：点击最小托盘时，又能够使程序最大化。


谢谢大家

[解决办法]

Delphi(Pascal) code

begin    if Pos('缩为小图标',self.mnuIcon.Caption)>0 then    begin      with NT do begin        cbSize:=Sizeof(NT);        // nid变量的字节数        Wnd:=Handle;        // 主窗口句柄        UID:=0;        // 内部标识，可设为任意数        uFlags:=NIF_MESSAGE or NIF_ICON or NIF_TIP;        uCallBackMessage:=MY_MESSAGE;        hIcon:=Icon.Handle;        // 要加入的图标句柄，可任意指定        szTip:='Delphi'#0;        // 提示字符串        hIcon := Application.Icon.Handle;      end;      Application.Minimize;      ShowWindow(Application.Handle,SW_HIDE);      Shell_NotifyIcon(NIM_ADD,@NT);      self.mnuIcon.Caption:='正常显示';    end    else    begin      Shell_NotifyIcon(NIM_DELETE,@NT);      ShowWindow(Application.Handle,SW_SHOW);      Application.Restore;      self.mnuIcon.Caption:='缩为小图标';    end;end;