Nummerierung

[Jürgen Thomas]

Zitat von Mackhack:

Sehe ich das falsch oder will er Dateinamen mit Zahlen davor setzen? Das hat doch nix mit 1000er Trennzeichen zu tun was die anderen gepostet haben.

Wo sind hier Tausender-Trenner? Der Format-Befehl enthält doch 'nur' eine Präzision. Aber er ist trotzdem seltsam formuliert:

Zitat von Flocke:

Delphi-Quellcode:

Result := Format('%.' + IntToStr(Length(IntToStr(Max))) + 'd', [Position]);
end;

2x IntToStr??? Aber die Format-Funktion ermöglicht es auch, mit '*' die Präzision direkt zu übergeben:

Delphi-Quellcode:

Result := Format('%.*d_Datei', [Max, Position]);
end;

Das liefert bei 'Max=3' und 'Position=7' den Dateinamen '007_Datei'. OK? Jürgen