Zitat von
Fussel9:
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?
Sollte dein Verzeichnis das Programmverzeichnis sein, besitzt Du keine Rechte für solche Operationen