Bild unter neuem Namen speichern !

[DeddyH]

Zerleg den kompletten Pfad doch in 3 Teile: Verzeichnis, Name und Endung. Dann passt Du den Namen an und baust alles wieder zum neuen Pfad zusammen. Aus dem Kopf:

Delphi-Quellcode:

var
  Pfad, Dateiname, Endung: string;
begin
  Pfad := ExtractFilePath(Original);
  Endung := ExtractFileExt(Original);
  Dateiname := ChangeFileExt(ExtractFilename(Original), '');
  NeuerName := Format('%s%sNeu%s', [Pfad, Dateiname, Endung]);