Verzeichnisse Kopieren mit Progressbar

**WizoHulk**

Hi Ihr da draussen,

mit diesem Code kopiere ich Gesamte Verzeichnisse...

Delphi-Quellcode:

			class function TMyDaten.CopyDirectory(AFromFolder, AToFolder: string): boolean;

var

  fos: TSHFileOpStruct;

begin

  ZeroMemory(@fos, SizeOf(fos));

  fos.wFunc := FO_COPY;

  fos.fFlags := FOF_SIMPLEPROGRESS OR FOF_NOCONFIRMATION;

  fos.pFrom := PChar(AFromFolder + #0);

  fos.pTo := PChar(AToFolder);

  Result := (0 = ShFileOperation(fos));

end;

Das klappt ja soweit auch ganz gut.
Aber mit diesem Code kann ich nicht werte abfangen(anzahl der Ordner) um mir den fortschritt in einer Progressbar anzeigen zu lassen.

Gibt es da irgend wie nen kniff?
Oder muss ich den Code gänzlich über bord schmeißen...?

**Luckie**

Setze die Flags richtig und der Dialog zeigt dir den Fortschritt an.

**WizoHulk**

ich hab ja immer das Windows fenster.
Ich möchte ja selber an eine Progressbar übergeben

**s.h.a.r.k**

Eine Callback-Methode kannst du damit nicht registrieren. Zumindest habe ich nichts in der Doku gefunden.

**Luckie**

Dann wirst du das Kopieren wohl selber machen müssen.

Verzeichnisse Kopieren mit Progressbar

Verzeichnisse Kopieren mit Progressbar

AW: Verzeichnisse Kopieren mit Progressbar

AW: Verzeichnisse Kopieren mit Progressbar

AW: Verzeichnisse Kopieren mit Progressbar

AW: Verzeichnisse Kopieren mit Progressbar

Forumregeln

Luckie Registriert seit: 29. Mai 2002 37.621 Beiträge Delphi 2006 Professional	#2 AW: Verzeichnisse Kopieren mit Progressbar 10. Jan 2011, 16:11 Setze die Flags richtig und der Dialog zeigt dir den Fortschritt an. Michael Ein Teil meines Codes würde euch verunsichern.
	Zitat

WizoHulk Registriert seit: 25. Jun 2010 198 Beiträge Delphi 5 Enterprise	#3 AW: Verzeichnisse Kopieren mit Progressbar 10. Jan 2011, 16:22 ich hab ja immer das Windows fenster. Ich möchte ja selber an eine Progressbar übergeben
	Zitat

s.h.a.r.k Registriert seit: 26. Mai 2004 3.159 Beiträge	#4 AW: Verzeichnisse Kopieren mit Progressbar 10. Jan 2011, 16:23 Eine Callback-Methode kannst du damit nicht registrieren. Zumindest habe ich nichts in der Doku gefunden. »Remember, the future maintainer is the person you should be writing code for, not the compiler.« (Nick Hodges)
	Zitat

Luckie Registriert seit: 29. Mai 2002 37.621 Beiträge Delphi 2006 Professional	#5 AW: Verzeichnisse Kopieren mit Progressbar 10. Jan 2011, 16:25 Dann wirst du das Kopieren wohl selber machen müssen. Michael Ein Teil meines Codes würde euch verunsichern.
	Zitat