länge zweier integer werte vergleichen

[Muetze1]

Delphi-Quellcode:

var
  lLen: integer;
  s1, s2: string;
begin
  s1 := IntToStr(a);
  s2 := IntToStr(b);

  lLen := max(length(s1), length(s2));
  
  s1 := StringOfChar(' ', lLen-length(s1)) + s1;
  s2 := StringOfChar(' ', lLen-length(s2)) + s2;

  Memo1.Lines.Add(s1);
  Memo1.Lines.Add(s2);
end;