TTrayIcon用法 self.trycn1.Icon:=Application.Icon;  Self.trycn1.Hint:=self.Caption;  self.trycn1.Visible:=true;    关闭时  begin  self.trycn1.Visible:=false;  Application.Terminate;end;procedure TForm1.trycn1DblClick(Sender: TObject);begin  ShowWindow(Self.Handle,SW_RESTORE);end;