Hallo und herzlich Willkommen im Forum!
Du musst im prinzip nur schauen, wenn Du den Dateinamen zusammensetzt, ob er in dem Fall 4 Stellen lang ist, wenn nicht, dann eben mit 0en auffüllen.
Das würde dann ungefähr so aussehen:
Delphi-Quellcode:
for i := 0 to "LängeDeinesStrings" do
if Length("MeinNeuerDateiname") < 4 then
"DateiName" := '0' + DateiName;
Hoffentlich ist es verständlich was ich meine.
Grüsse, Daniel
