Ein (1) Fenster verstecken

[Die Muhkuh]

Hi,

so jetzt kommt mein code :

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowWindow(FindWindow('Windows Media Player', nil), SW_HIDE);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  ShowWindow(FindWindow('Windows Media Player', nil), SW_SHOW);
end;

Leider tut sich da nicht viel . Weiß jemand warum?