Aus Einstelligen zahlen 2 stellige machen

[Necro Paul]

Hallo

Ich hoffe das ihr mir helfen könnt,
Ich habe ein Textfeld und eine Combobox.

Im textfeld steht dann beispielsweise '19:30:00' also Uhrzeit Format
In der Combobox stehen dann zahlen von 1-24 die dann zu dem Textfeld hinzugefügt werden

Ich wollte dann wenn größer als 24 doe stunden dann -24 rechnen was auch funzt aber logischerweise ist das ergebnis dann einstellig

wie bekomm ich es hin das er aus 0 <--> 00 macht?

mfg
Paul

[markusj]

Du wandelst intern ja einen Integer in einen String um, oder?
Dann fügst du einfach für den Fall, das die jeweilige Teilzahl kleiner als 10 ist, ein '0' vorne am String ein.

in Code:

Delphi-Quellcode:

str := inttostr(zahl);
if zahl < 10 then
 begin
 setlegth(str,2);
 str[1] := '0';
 end;

mfG

Markus

[chaosben]

Hi tu oll!

Eine zweite Möglichkeit ist der Format-Befehl. Sieh einfach mal in die Hilfe.

[DevilsCamp]

Also ich würde definitiv den Format-Befehl vorziehen.


s := Format('%.2d', [INTEGERWERT]);

Code:

INTEGERWERT=5          s='05'
INTEGERWERT=23         s='23'
INTEGERWERT=100        s='100'

[Necro Paul]

Hey Super

Funzt, Beide Arten wobei ich das Format schöner finde.
Ich hab mir das Format mal in der Hilfe durchgelesen, damit kann man doch einiges mit machen.

Womit ich aber schon wieder beim nächsten Problem bin
Aber dafür mach ich ma nen neuen Thread auf.

Danke
Gruß
Paul