TUpDown: Vornullen

[Z32]

Hallo Zusammen,

ich habe eine Frage zum Format der UpDown Komponente.

Undzwar habe ich ein Editfeld mit der UpDown Komponente verknüpft und mit updown1.min und updown1.max die Zahlenbegrenzungen eingestellt.

Meine Frage ist nun, kann man einstellen, dass mit Vornullen gezählt wird, also "01", "02" usw. ?

Bisher wird so hochgezählt: 1 , 2 , 3 usw.

[mischerr]

Also zumindest beim TSpinEdit kann man das wie folgt machen:

OnChange-Event:
> TSpinEdit(Sender).Text:= format('%0.2d', [TSpinEdit(Sender).Value]);

[Z32]

Hallo,

hatte erst jetzt wieder Zeit gefunden mal wieder hier vorbeizuschauen. naja.

Also der Code von mischerr klappt bei mir nicht. Aber kann man denn einem Editfeld ein bestimmtes Format zuordnen?

Delphi-Quellcode:

edit1.text:=format(bla);

Dabei bekomme ich immer den Fehler, dass keine überladene Version von "Format" gibt.

Kann mir da wer helfen :?:

[DeddyH]

Du musst auch einen Formatstring angeben.

Delphi-Quellcode:

Edit1.Text := Format('%s',[bla]); //bla ist ein String
Edit1.Text := Format('%d',[bla]); //bla ist eine Integer

[Z32]

OK, ich habs jetzt mal so versucht:

Delphi-Quellcode:

edit1.Text:=format('%0.2d'[edit1.Text]);

Aber da bekomme ich den Fehler: Inkompatible Typen - Integer und TCaption.

und wenn ichs so mache:

Delphi-Quellcode:

edit1.Text:=format('%0.2s'[edit1.Text]);

kommt ebenfalls der gleiche Fehler.


Wie genau muss ich das denn machen. Besser gesagt, ich weiß nicht, was in die Rechteckigen Klammern muss.

[DeddyH]

Delphi-Quellcode:

edit1.Text:=format('%0.2d',[StrToInt(edit1.Text)]);

[Z32]

Zitat:

Zitat von DeddyH

Delphi-Quellcode:

edit1.Text:=format('%0.2d',[StrToInt(edit1.Text)]);

Ah danke.

Hatte eben ein Brett vorm Kopf, denn ich hatte eben statt "StrToInt" "IntToStr" geschrieben. :wall: