Random mit zufalls zahlen

[tomsson74]

Hi,

ich verstehe nicht warum die Schleife von 1234 bis 9999 durchlaufen werden soll ...

Ich hätte es so gemacht:

Delphi-Quellcode:

var
  I : Integer;
begin
  Randomize;                                         // Zufallszahlengenerator initialisieren
  for I := 0 to 9 do begin                           // ich möchte 10 Zufallszahlen haben
    Listbox.Items.Add(IntToStr(Random(9000)+1000));  // Zufallszahlen im Bereich von 0 bis 8999, 
                                                     // 1000 dazuaddieren, damit das Ergebnis
                                                     // vierstellig wird
  end;
end;