Kopieren mit API-Fortschrittsanzeige

[blackdrake]

Hallo.

Ich habe eine Frage zum Artikel

http://www.delphipraxis.net/internal...ect.php?t=1451

Den 2ten Code habe ich wie folgt verwendet:

Delphi-Quellcode:

if DoFileWork(FO_COPY, Filename, DragDropHandler1.Folder+'\'+extractfilename(Filename), 0) = 0 then 
begin 
  showmessage(OK); 
end;

Nach der Beschreibung sollte mit FOF_SILENT die Windows-Fortschrittsanzeige (durch API) verhindert weden. Weil ich aber keinen der Flags will, habe ich "0" als letzten Parameter angegeben. Ich bekomme aber beim Kopieren von Dateien nun trotzdem keine Windows-Fortschrittsanzeige... Habe Windows XP... was ist falsch?

Gruß
blackdrake