Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Dateien und Ordner löschen (https://www.delphipraxis.net/44295-dateien-und-ordner-loeschen.html)

Clane 17. Apr 2005 11:06


Dateien und Ordner löschen
 
hey

also ich möchte ein programm schreiben wo alle dateien und ordner gelöscht werden (zb. temt und die temp internet files) wie kann ich die löschroutiene realiesiern ? ich btach würde das ja in etwa ao ausehen

Code:
 
del *.*
aber wie mach ich das in delphi ?

MfG. PBiggi

3_of_8 17. Apr 2005 11:18

Re: Dateien und Ordner löschen
 
Da gibts glaub ich DeleteFile und Delete Dir.

Wenn du in einem Ordner alle Dateien löschen willst musst du zuerst alle Dateien darin löschen, bevor du den Ordner selbst löscht.

Meflin 17. Apr 2005 11:19

Re: Dateien und Ordner löschen
 
für dateien: Delphi-Referenz durchsuchenDeleteFile
für verzeichnisse: ka, aber es würde mich wirklich wundern, wenn wir das nciht schon mindestens einmal hier hatten ;)
um alle zu löschen, musst du eben alle dateien dieses verzeichnisses auslesen (-> suche) und dann mit ersterer funktion löschen ;)


Luckie 17. Apr 2005 11:20

Re: Dateien und Ordner löschen
 
Für normale Dateien und Ordner gibt es ShFileOperationShFileOperation. Für die Internetdateien musst du auf andere API Funktionen zurückgreifen. Eine Forensuche sollte aber weiterhelfen, das hatten wir schon mal.

Clane 17. Apr 2005 12:01

Re: Dateien und Ordner löschen
 
@luckie ich hab die suche benutzt und nix wirklich gefunden ...

Luckie 17. Apr 2005 12:20

Re: Dateien und Ordner löschen
 
Hm: Hier im Forum suchenTemporary Internet Files liefert mir zum Beispiel das: http://www.delphipraxis.net/internal...internet+files :roll:

KLS 17. Apr 2005 12:22

Re: Dateien und Ordner löschen
 
Delphi-Quellcode:
function loeschePfad(pfad : string) : Boolean;
var
  fos : TSHFileOpStruct;
begin
  ZeroMemory(@fos,SizeOf(fos));
  fos.wFunc := FO_DELETE;
  fos.fFlags := FOF_SILENT or FOF_NOCONFIRMATION;
  fos.pFrom := PChar(pfad + #0);
  Result := ShFileOperation(fos) = 0;
end;

Waldteufel 17. Apr 2005 12:45

Re: Dateien und Ordner löschen
 
Hi.

Das
Delphi-Quellcode:
PChar(pfad + #0);
kann man auch kürzer als
Delphi-Quellcode:
PChar(pfad);
schreiben. Das Nullbyte (#0) wird nämlich automatisch beim Umwandeln angehängt. ;-)

mirage228 17. Apr 2005 13:13

Re: Dateien und Ordner löschen
 
Hi,

da wir ja gerade bei SHFileOperation sind... ;) Ich habe da einen OOP-Wrapper um SHFileOperation geschrieben.
Die Klasse kannst Du so verwenden, wie Du es von anderen Delphi-Klassen auch gewohnt bist: *Link*
Vielleicht ist das ja was für Dich ;)

mfG
mirage228

Luckie 17. Apr 2005 13:15

Re: Dateien und Ordner löschen
 
Zitat:

Zitat von Waldteufel
Hi.

Das
Delphi-Quellcode:
PChar(pfad + #0);
kann man auch kürzer als
Delphi-Quellcode:
PChar(pfad);
schreiben. Das Nullbyte (#0) wird nämlich automatisch beim Umwandeln angehängt. ;-)

Jupp, aber die Dateien zum Kopieren werden durch #0 getrennt und abgeschlossen wird der String mit #0#0.


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:03 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz