Anhang an Dateiname nur wie?

[glkgereon]

kannst du nicht immer, wenns gemacht wird nen zähler erhöhen

Delphi-Quellcode:

var
x:integer; //in wahrheit natürlich global
begin
FStream := TFileStream.Create('c:\test'+inttostr(x)+'.jpg', fmOpenWrite or fmShareDenyNone); 
inc(x); oder x:=x+1;
end;