Form aus Symbolleiste verbannen

[sebjensen]

Jo, die habe ich eingebunden, da ich dieses sowieso für mein Projekt benötige.

[bitsetter]

Eigentlich möchtest du ja nur dein Fenster beim Minimieren aus der Taskleiste entfernen. Der Code für dein Projekt:

Delphi-Quellcode:

private
    procedure WMSysCommand(var Message: TWMSysCommand); message WM_SYSCOMMAND;
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

uses ShellApi;

procedure TForm1.WMSysCommand(var Message: TWMSysCommand);
begin
  // Fenster wurde minimiert
  if Message.CmdType and $FFF0 = SC_MINIMIZE then
  begin
    Hide;//Fenster verstecken
  end
  else
    inherited;
end;

Ansonsten die Demo aus der Code-Lib:

[sebjensen]

Hallo.

Also das ausblenden aus der Symbolleiste hat nun funktioniert. Nun ist es aber so, dass ich die Form gerne über einen Doppelklick auf das TrayIcon wieder anzeigen lassen möchte.

Wie kann ich das denn jetzt noch realisieren?

Dankeschön.

[bitsetter]

Das steht auch im Code:

Delphi-Quellcode:

      
  WM_LBUTTONDBLCLK:
    begin
      // Fenster anzeigen
      Form1.Show;
      // Icon entfernen
      //Shell_NotifyIcon(NIM_DELETE, @IconData);
    end;

Im DBLCLK Event deines Icons Form.Show aufrufen.