Einzelnen Beitrag anzeigen

Benutzerbild von Fussel9
Fussel9

Registriert seit: 25. Mai 2009
322 Beiträge
 
Turbo Delphi für Win32
 
#1

Und trotzdem klappt's nicht:Löschen kopieren und umbenennen

  Alt 25. Okt 2009, 17:09
Hi,
Hatte letzten schon mal gefragt wegen dem Kopieren Löschen und Umbenennen einer Datei, darauf habe ich folgendes erhalten:

Delphi-Quellcode:
    if CopyFile(PAnsiChar(hintergrund),PAnsiChar('.\'+ExtractFileName(hintergrund)),False) then
      begin
        DeleteFile('.\backgr.*');
        RenameFile('.\'+ExtractFileName(hintergrund),'.\'+'backgr.*');
Also ich habe in meinem Ordner eine Datei die den Namen backgr.jpg trägt nun soll das Programm diese Datei ersetzen durch eine andere aus dem OpenDlg
backgr.jpg --> x |löschen
irgendwas.*--> \/ |in den Ordner kopieren
irgendwas.*--> # |umbenennen in backgr.*

das finktioniert aber so nicht, denn die if then Abfrage wird nie erfüllt


.... Weiß wer weiter?
  Mit Zitat antworten Zitat