Copy Windowsfenster minimiert starten

[ScharfeMietze]

Guten Morgen

Delphi-Quellcode:

TThread.CreateAnonymousThread(procedure()
var
  sh: TSHFileOpStruct;
  Rezult: Boolean;
  begin
    sh.Wnd := Application.Handle;
    sh.wFunc := FO_COPY;
    sh.pFrom := PChar(ASource + #0#0);
    sh.pTo := PChar(ADest + #0#0);
    sh.fFlags := FOF_NOCONFIRMATION or fof_MultiDestFiles or FOF_NOCONFIRMMKDIR;
  if ARenameCheck then
    sh.fFlags := sh.fFlags or fof_RenameOnCollision;

    Rezult:=ShFileOperation(sh)=0;
    end);
  end).Start;

Erzeugt mir ein Windows-Copy Fenster. Das ist auch so gewollt. Ich hätte gerne das es minimiert startet.
Ist das machbar?

Gruß
SM