Variablen einen Wert zuweisen

[Frage95]

Hallo,

ich habe ein record erstellt, in dem befinden sich 10 Untergeordnete "Variablen" nun möchte ich diesen Variablen einen Wert zuweisen (Zahl).
Diese Zahl soll sich aber stetig um 1 erhöhen.
Ich dachte an eine For - Schleife.

Delphi-Quellcode:

type
TZugangsNummer = record
NummerEins   : Integer;
NummerZwei   : Integer;
NummerDrei   : Integer;
NummerVier   : Integer;
NummerFünf   : Integer;
NummerSechs  : Integer;
NummerSieben : Integer;
NummerAcht   : Integer;
NummerNeun   : Integer;
Nummerzehn   : Integer;
end;

procedure NummerZuweisen ();
var
   i: integer;
   Nummer : TZugangsNummer;
begin
   for i := 151231 to Nummer do begin
    TZugangsNummer.NummerEins := i +1;
   end;

end;

Ich bin ein totaler Anfänger^^.

Würde mich sehr über eine konkrete Hilfe mit umfassender Erklärung freuen. Möchte ja dabei etwas lernen.