Variablen einen Wert zuweisen

[Klaus01]

Das sollte in etwas so funktionieren.

Delphi-Quellcode:

type
  TZugangsnummer = record
    index: Array[1..10] of Integer;
  end;


procedure NummerZuweisen ();
var
   i: integer;
   Nummer : TZugangsNummer;
begin
  for i := 1 to high(Nummer.index) do
    begin
      Nummer.index[i] := i +1;
    end;
end;

Grüße
Klaus