TUpDown: Vornullen

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]);

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?

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.

markieren

Delphi-Quellcode:

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

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

OK, ich habs jetzt mal so versucht:

edit1.Text:=format('%0.2d'[edit1.Text]); Aber da bekomme ich den Fehler: Inkompatible Typen - Integer und TCaption.

und wenn ichs so mache:

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**

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

Zitat von DeddyH:

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

Ah danke.

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

TUpDown: Vornullen

TUpDown: Vornullen

Re: TUpDown: Vornullen

Re: TUpDown: Vornullen

Re: TUpDown: Vornullen

Re: TUpDown: Vornullen

Re: TUpDown: Vornullen

Re: TUpDown: Vornullen

Forumregeln

Z32 (Gast) n/a Beiträge	#1 TUpDown: Vornullen 3. Jun 2007, 13:28 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.
	Zitat

mischerr Registriert seit: 6. Feb 2004 Ort: Konz 238 Beiträge Delphi 10.3 Rio	#2 Re: TUpDown: Vornullen 3. Jun 2007, 13:58 Also zumindest beim TSpinEdit kann man das wie folgt machen: OnChange-Event: > TSpinEdit(Sender).Text:= format('%0.2d', [TSpinEdit(Sender).Value]);
	Zitat

Z32 (Gast) n/a Beiträge	#3 Re: TUpDown: Vornullen 5. Jun 2007, 14:30 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? edit1.text:=format(bla); Dabei bekomme ich immer den Fehler, dass keine überladene Version von "Format" gibt. Kann mir da wer helfen
	Zitat

DeddyH Registriert seit: 17. Sep 2006 Ort: Barchfeld 27.540 Beiträge Delphi 11 Alexandria	#6 Re: TUpDown: Vornullen 5. Jun 2007, 15:01 edit1.Text:=format('%0.2d',[StrToInt(edit1.Text)]); Detlef *"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen."* (Albert Einstein) Dieser Tag ist längst gekommen
	Zitat

Z32 (Gast) n/a Beiträge	#7 Re: TUpDown: Vornullen 5. Jun 2007, 15:06 Zitat von DeddyH: edit1.Text:=format('%0.2d',[StrToInt(edit1.Text)]); Ah danke. Hatte eben ein Brett vorm Kopf, denn ich hatte eben statt "StrToInt" "IntToStr" geschrieben.
	Zitat