DeleteFiles + FindNext

[Klaus01]

.. ohne das *.TXT darin sollte es funktionieren.

Grüße
Klaus

[Luckie]

Nicht raten! Nachdenken!

Was kommt dabei wohl raus:
DeleteFile('C:\voctester_tmp\Vocabularies\Deutsch\*.TXT' +SearchRec.Name) Was steht in SearchRec.name drin? Und wie sieht deine zusammengebastelte Zeichenkette dann aus?

Zitat von Klaus01:

.. ohne das *.TXT darin sollte es funktionieren.

KLAUS!!! Bist du wohl ruhig?

[Ghostleader]

Delphi-Quellcode:

     r := FindFirst('C:\voctester_tmp\Vocabularies\Deutsch\*.TXT', faAnyFile,SearchRec);
     while r = 0 do
      begin
       MeDelVoks.Lines.Add(SearchRec.Name);
       DeleteFile(SearchRec.Name+'C:\voctester_tmp\Vocabularies\Deutsch\');


     {Error Code?}
          if not DeleteFile(SearchRec.Name) then
          ShowMessage(SysErrorMessage(GetLastError));

Klappt aber nicht.

Danke euch allen ich suche morgen weiter

@Luckie:
Danke für deine Geduld und deine Strategie ;D

[MaToBe]

okay nochmal:

SearchRec.Name ist der Name der Datei, die zum löschen gefunden wurde, und zwar ohne Pfad davor.

=> Schlussfolgerung: Du brauchst die Angabe des Pfadest und danach dann noch den Namen der Datei.

[Klaus01]

wie sind denn Dateien zu finden:

Pfad + Dateiname
oder
Dateiname + Pfad ?

So spät ist es in Deutschland doch noch nicht.

Grüße
Klaus

[Luckie]

Zitat von Ghostleader:

DeleteFile(SearchRec.Name+'C:\voctester_tmp\Vocabularies\Deutsch\'); Klappt aber nicht.

So langsam tut es weh. Wo steht denn der Dateiname? Am Anfang vom Pfad oder am Ende vom Pfad?

Zitat:

Danke euch allen ich suche morgen weiter

nix da. das machen wir jetzt fertig.

Zitat:

@Luckie:
Danke für deine Geduld und deine Strategie ;D

Du strapazierst sie aber auch zu Genüge.

[Ghostleader]

Ist ja in Ordnung ich ärgere mich schon über meine eigene Dummheit! Ich hab bis zum Ende nicht verstanden das in SearchRec.Name der Name der Datei + .TXT steht. Und dann musste ich schnell weg sodass ich nicht mal mehr den Pfad und den Namen in eine passende Reihenfolge geschrieben hab O.o! Ich hoffe ich hab eurer Geduld nicht allzusehr geschadet ;D Mfg Ghost

[Luckie]

Hast du es jetzt hinbekommen?

[Ghostleader]

Ich bin im Moment nicht in der Lage es zu probieren aber in der Theorie habe ich es so verstanden: DeleteFile('C:\'+SearchRec.Name) Das könnte ergeben: C:\Hallo.TXT! Edit: In SearchRec.Name steht der Name der Datei und die Endung. Mit GetLastError bekommt man den Wert von DeleteFile (True/False) zurück.

[MaToBe]

richtig

[OT]
fands sau lustig wie sich zeitweise 3 personen drum gekloppt ham's dem TE richtig beizubringen und die Antworten im Sekundentakt rausgehaun ham ;D
[/OT]