Taskleiste Programm verstecken

[omata]

Was gibt es daran nicht zu verstehen...

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

type
  TForm1 = class(TForm)
    procedure FormShow(Sender: TObject);
  private
    { Private-Deklarationen }
    procedure WMSysCommand(var Message: TWMSysCommand); message WM_SysCommand;
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

{ TForm1 }

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

procedure TForm1.FormShow(Sender: TObject);
var Owner : HWnd;
begin
  Owner:=GetWindow(Handle, GW_OWNER);
  ShowWindow(Owner, SW_HIDE);
end;

end.

...funktioniert wunderbar.

Edit:

Zitat von asusbob:

Der Eintrag in der Taskbar soll nich verschwinden wenn das Fenster minimiert ist ... Der soll immer weg sein.

Was soll das? Soll beim Minimieren der Taskbar-Eintrag sichtbar sein? Was soll dann die Aussage, der soll immer weg sein? Präzisiere mal deine Anforderungen und Wünsche, dann kann man dir vielleicht auch helfen.