Statt 0,1,2 000,001,002

[gothic_mike]

Moin,

Zitat von Spike2k3:

Hoi Hoi,
Wie die Überschrift schon sagt, will ich das meine Variable nicht mit 0 anfängt sondern mit 000 anfängt...
Und dann mit wwi 300 oder so aufhört...
Ich hoffe man kann das irgendwie machen...

falls es dir nur beim anzeigen der Zahlen auf die drei stellen ankommt, nimm doch sowas hier:

Delphi-Quellcode:

function AddZero(const Int: Integer; const Len: Integer): String;
begin
  Result:='';
  while (Length(IntToStr(Int)) < Len) do 
    Result:=Result+'0';
  Result:=Result + IntToStr(Int);
end;

...

Label1.Caption := AddZero(X, 3);

andernfalls ist es doch egal, ob da noch nullen davor sind...