Programm aus Taskleiste ausblenden

[storm1988]

SO hab jetzt folgenden Code geproggt:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  Handle: HWND;
  WindowStyle : Integer;
begin
  Handle:=GetWindow(GetDesktopWindow(),GW_CHILD);
  while (Handle<>0) do
  begin
  if (IsMainAppWindow(Handle) and (AnsiContainsStr(GetWindowCaption(Handle),'Unbenannt - Paint'))) then
  begin
    //WindowStyle := GetWindowLong(handle, GWL_STYLE);
    //WindowStyle := WindowStyle and (not WS_ICONIC)  ;
    SetWindowLong(handle, GWL_STYLE, (GetWindowLong(Handle, GWL_STYLE) and (not WS_ICONIC)  ));
    break;
  end;
  Handle:=GetWindow(Handle,GW_HWNDNEXT);
  end;
end;

Jedoch passiert nicht das was ich will, bzw. es passiert garnix.
Wie schaffe ich es jetzt, dass ich das gewünschte Programm aus der Taskleiste bringe??

Und noch so ne Frage am Rande! Wie kann ich das Programm dann Refreshen??