FOR-Schleifen Problem

[delphinub23]

Guten Tag Community,

ich bin neu in der Welt der Programmierung und versuche mir gerade Grundwissen anzueignen.

Nun zu meinem Problem:
Ich möchte ein paar Zahlen zufällig generieren lassen. Danach soll eine Ausgabe der generierten Zahlen ausgegeben werden. Zusätzlich soll vermieden werden, dass gleiche Zahlen generiert werden.

Um die Random() Funktion nutzen zu können, muss ich einmal Randomize rufen (?)

Delphi-Quellcode:

procedure TFmMain.FormCreate(Sender: TObject);
begin
  // Nur einmal rufen
  Randomize;
end;

Und hier meine Schleife

Delphi-Quellcode:

procedure TFmMain.btnGenClick(Sender: TObject);
var
  // Hier sollen die Zahlen zwischengespeichert werden
  rZahl: array[0..15] of integer; 
  temp, i: integer;
begin
  // Fehler: Schleife wird mit dem Startwert 16 abwärts durchlaufen
  for i := Low(rZahl) to High(rZahl) do
  begin
    temp := Random(16);

    // aktuelle Zahl mit dem Vorgänger vergleichen
    while (rZahl[i] = rZahl[i-1]) do
    begin
      // Neu generieren
      temp := Random(16);
      rZahl[i] := temp;
    end;
    // Ausgabe
    txtRandoms.Text := txtRandoms.Text + IntToStr(rZahl[i]) + '; ';
  end;
end;

ich hoffe ihr könnt mir helfen

Beste Grüße,
dnub