Forum: Netzwerke
Delphi
by md787,
21. Aug 2003
vielleicth sollte ich einfach mal den source hier reinpacken, ich hab nämlich gar nichts ähnliches im internet gefunden.
Vielleicht findet sich ja jemand der ihn noch verbessert oder jemand anderen nützt das als anfang.
procedure DeleteFolderRecursive(hFTP: HINTERNET; Path: String);
var
hSearch: HINTERNET;
findData: WIN32_FIND_DATA;
TempList: TStringList;
i: Integer;
Forum: Netzwerke
Delphi
by md787,
21. Aug 2003
Hi,
also ich hab es geschafft.
Wollte mich nur nochmal ganz herzlich bei Luckie bedanken.
MfG
Forum: Netzwerke
Delphi
by md787,
21. Aug 2003
Hi,
und genau da ist das Problem.
hSearch := FtpFindFirstFile(hFTP,nil,findData,0,0); <- wird damit rekursiv aufgerufen und das geht nicht.
MfG
Forum: Netzwerke
Delphi
by md787,
21. Aug 2003
Hi,
danke erstmal für den Monitor.
procedure WasAuchImmer(hFTP: HINTERNET; Pfad: String);
var
hSearch: HINTERNET;
findData: WIN32_FIND_DATA;
begin
//FtpSetCurrentDir(hFTP, PChar(Pfad));
Forum: Netzwerke
Delphi
by md787,
21. Aug 2003
Hi,
Ertsmal danke für die schnelle Antwort.
Das stimmt auch, nur mit dem Unterschied das man nur einmal die FindFirst aufrufen kann. Somit kannst du auf der lokalen Ebene das in der Schleife rekursiv wieder aufrufen. Leider geht es dort nicht, weil er dann mit Suche schon im Gange abbricht.
Is immernoch nicht sehr verständlich.
Ähm wie kann ich das erklären. Mal ein kurzes stück von...