Dateinamen aus Prefix, Nummer und Endung erstellen

[Luckie]

Delphi-Quellcode:

var
  StartNum: Integer;
  EndNum: Integer;
  MaxLen: Integer;
  i: Integer;
  s: String;
begin
  StartNum := 5;
  EndNum := 25;
  MaxLen := 4;
  for i := StartNum to EndNum do
  begin
    s := Format('Bild%.4d.bmp', [i]);
    Listbox1.Items.Add(s);
  end;
end;

Leider kann man für die Konstante in der Format-Funktion keine Variable angeben.