Einzelnen Beitrag anzeigen

gasty

Registriert seit: 14. Nov 2007
Ort: Nidderau
80 Beiträge
 
Delphi 7 Enterprise
 
#6

Re: Doppelte Dateiendung entfernen

  Alt 20. Feb 2010, 20:48
Also mein Stand bis jetzt ist, ich habe eine Komponente gefunden, die das Suchen für mich übernimmt
Nur der RenameFile Befehl scheint nicht zu funktionieren, er löscht die Datei einfach nur
Mein Code sieht jetzt so aus:

Delphi-Quellcode:
DIFileFinder1.Next;
sFileName := DIFileFinder1.SimpleName;
sFileName := StringReplace(sFileName, '.mp4', '', [rfReplaceAll, rfIgnoreCase]);
RenameFile(difilefinder1.FullName, sFileName);


//Edit:
Omg ok vergesst es
Habe nen relativen Pfad bei dem Befehl genommen, jetz liegen alle Dateien im Projekt-Verzeichnis.
Aber ohne .mp4

Danke für die Hilfe hier !

Gruß,
gasty
  Mit Zitat antworten Zitat