Hallo
der Code kann den Ordner in Server löschen nur, wenn er leer ist !
Wie kann ich den Ordner löschen auch wenn er nicht leer ist ?
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
idFTP1.Host := xxx;
idFTP1.Username := xxx;
idFTP1.Password := xxx;
idFTP1.Port := StrToInt(Edit1.Text);
idFTP1.Connect(true,3000);
if CheckBox1.Checked=true then begin
IdFTP1.ChangeDir('/' +Edit2.Text);end else begin
IdFTP1.ChangeDir('/');end;
IdFTP1.RemoveDir(Edit3.text); //löscht ein Verzeichnis
idFTP1.disconnect;
end;
Ich verwende zur Zeit eine free
FTP Tool. Das Programm braucht sehr lange Zeit um den Ordner zu löschen, wenn der Ordner voller Dateien ist. Das Programm löscht Datei nach Datei !
Darum versuche ich mit dem Delphi was schnelles