[gelöst] DeleteFile und Fehler 123 (falscher Syntax)

[Schwedenbitter]

Danke für Eure Tipps!

@ Andreas L.

Zitat von Andreas L.:

Wieso verwendest du keine For-Schleife?

Mache ich ja jetzt. Mein funktionierender Code sieht jetzt so aus:

Delphi-Quellcode:

For I:=0 To Pred(DruckJob.Count) Do
   If Not DeleteFile(DruckJob.Strings[I]) Then
      Application.MessageBox(PAnsiChar(SysErrorMessage(GetLastError)),'Fehler',0);
{$I-}rmdir(ExtractFilePath(DruckJob.Strings[0]));{$I+}
If IOResult<>0 Then
   Application.MessageBox(PAnsiChar(SysErrorMessage(GetLastError)),'Fehler',0);

Zitat von Andreas L.:

EDIT: Gehts hier wirklich um .NET?

Ich habe keine Ahnung. Ich habe bereits mehrfach versucht, mich mal im Delphidschungel zurecht zu finden und habe es dann aufgegeben. Ich habe TurboDelphi (gemeldet als Version 10) und mein in die Jahre gekommenes Delphi 6. Für TurboDelphi musste ich alles mögliches mit .NET installieren. Daher stammt meine Einordnung. Falls jemand einen Link mit entsprechendem Überblick hat, wäre ich dankbar. Mir geht es auch darum, welches Delphi nativ PNG unterstützt.

@ himitsu
Die Dateien liegen nicht im selben Ordner. Ich habe von SHFileOperation auch Abstand genommen, weil es nicht Plattformübergreifend ist. Und das Bestücken der Variablen ist auch komplizierter; selbst wenn es später schneller sein mag.

FindFirst ist eine gute Idee. Zwar liefert TSearchRec.Name nur die Dateinamen ohne Pfad und ich habe beides schon in meiner Liste. Aber ich könnte so noch prüfen, ob wirklich alles leer ist, bevor ich das Verzeichnis lösche.

Danke, Alex