Forum: Object-Pascal / Delphi-Language
Delphi
by sakura,
13. Dez 2002
Für ASP hatte ich die entsprechende Lösung parat, leider wusste ich nicht mehr wie die Funktion (StringOfChar) in Delphi hiess.
Forum: Object-Pascal / Delphi-Language
Delphi
by sakura,
13. Dez 2002
Logischvar
I, Miss: Integer;
Nullen: string;
begin
Miss := 8 - Length(aString);
for I := 1 to Miss do
Nullen := Format('%s0', );
aString := Format('%s%s', );
end;
Wenns gefällt, darfst Du auch diese Lösung nutzen. Oder lieber in Assembler ?
Forum: Object-Pascal / Delphi-Language
Delphi
by sakura,
13. Dez 2002
Mal so kurz
while Length(aString) < 8 do
aString := '0' + aString;