Delphi-PRAXiS - Einzelnen Beitrag anzeigen - Delphi Dateinamen mit (nummer) umbennen wenn doppelt

**tomkupitz**

Reicht nicht sowas:

i:=1;

while FileExists(Name+'('+IntToStr(i)+')'+Ext) do
inc(i);

kopiere -> Name+Ext, Name+'('+IntToStr(i)+')'+Ext

Beste Grüße

tomkupitz Registriert seit: 26. Jan 2011 323 Beiträge Delphi 11 Alexandria	#2 AW: Dateinamen mit (nummer) umbennen wenn doppelt 22. Feb 2023, 19:14 Reicht nicht sowas: i:=1; while FileExists(Name+'('+IntToStr(i)+')'+Ext) do inc(i); kopiere -> Name+Ext, Name+'('+IntToStr(i)+')'+Ext Beste Grüße
	Zitat