Zahlen generieren und in Memo schreiben

[EDatabaseError]

Zufallszahlen oder eine Zahlenfolge?

Bei Zahlenfolge:

Delphi-Quellcode:

OnClick:
var
   i: Integer;
begin
 for i := 1 to 999 do
  begin
   Memo1.Lines.Add(IntTostr(i));
  end;
end,

Bei Zufallszahlen:

Delphi-Quellcode:

OnClick:
var
   i1,i2: Integer;
begin
 Randomize;

 Memo1.Lines.Add(Inttostr(random(999));
end;

Mfg