![]() |
Re: DeleteFiles + FindNext
.. ohne das *.TXT darin sollte es funktionieren.
Grüße Klaus |
Re: DeleteFiles + FindNext
Nicht raten! Nachdenken!
Was kommt dabei wohl raus:
Delphi-Quellcode:
Was steht in SearchRec.name drin? Und wie sieht deine zusammengebastelte Zeichenkette dann aus?
DeleteFile('C:\voctester_tmp\Vocabularies\Deutsch\*.TXT' +SearchRec.Name)
Zitat:
|
Re: DeleteFiles + FindNext
Delphi-Quellcode:
Klappt aber nicht.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)); Danke euch allen ich suche morgen weiter ;) @Luckie: Danke für deine Geduld und deine Strategie ;D |
Re: DeleteFiles + FindNext
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. |
Re: DeleteFiles + FindNext
wie sind denn Dateien zu finden:
Pfad + Dateiname oder Dateiname + Pfad ? So spät ist es in Deutschland doch noch nicht. Grüße Klaus |
Re: DeleteFiles + FindNext
Zitat:
Zitat:
Zitat:
|
Re: DeleteFiles + FindNext
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
|
Re: DeleteFiles + FindNext
Hast du es jetzt hinbekommen?
|
Re: DeleteFiles + FindNext
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.
|
Re: DeleteFiles + FindNext
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] |
Alle Zeitangaben in WEZ +1. Es ist jetzt 06:19 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz