Taskleiste: Button fürs Programm wieder anzeigen lassen?

[Helmi]

Hallo,

ich hab folgenden Code um keinen Button in der Taskleiste für ein Programm zu erhalten:

Delphi-Quellcode:

procedure TTrayIcon.OnShow(Sender: TObject);
begin
  with Application do
    begin
      ShowWindow(Handle, SW_HIDE);
      SetWindowLong(Handle, GWL_EXSTYLE, GetWindowLong(Handle, GWL_EXSTYLE) or
                     WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW);
      ShowWindow(Handle, SW_SHOW);
    end;

Nur wie kann ich jetzt den Button auch wieder anzeigen lassen?