Ich habe z.B. einen integer, 1..59

bekomme ich es mit Format irgendwie gebacken

das anstatt 1,2... es 01,02 ...09,10,11 ausgegeben wird.

Doof zu formulieren diese Frage, Entschuldigt.

result := Format('%.2d', [Value]);

Ja habe den Punkt vergessen
Danke

oder

markieren

Delphi-Quellcode:

function TwoDigits(const AValue: Integer; const DefDig: Char = '0'): String;
begin
  if AValue < 100 then
  begin
    Result := IntToStr( AValue );
    if AValue div 10 > 0 then
      Result := DefDig + Result;
  end else // EDIT - Frage diesbezüglich - Siehe unten
    Result := '';
end;

Der Code sollte dir eine Warnung vom Compiler ausgeben, weil Result undefiniert ist, wenn AValue größer 100 ist.

Hmm, ist es hier nicht sinnlos, da der Resultstring = '' ist?

Ich glaube das ATS3788 eine andere Frage hatte.

"Ich habe eine Zahlenfolge von 1 bis 59"
Wie bekomme ich diese Ausgegeben in dem Format:
01,02,03...57,58,59

Als liegt Uwe schon mal richtig:

Zitat von Uwe:

result := Format('%.2d', [Value]);

Gesamt:

zusammenfalten · markieren

Delphi-Quellcode:

var
  i: integer;
  s: string;
begin
  s:='';
  for i:=1 to 59 do
  begin
    if i>1 then
      s:=s+',';
    s:=s+Format('%.2d', [i]);
  end;

1 bis 59 sieht stark nach Zeit aus.
Wenn du mit Zeit arbeitest hat Delphi noch unterstützende Funktionen im Bauch. Dann melde dich hier noch einmal.