Variablen erstellen ohne Manuelle eingabe (D5)

[Oldy]

Hallo

Ich stehe gerade vor einem kleinem Problem
ich brauche 109 Integer-Variablen, jedoch möchte ich nicht jede einzeln eingeben (da das nicht schön aussieht und weil ich grad zu faul dazu bin.. )
gibt es eine möglichkeit, Die Variablen (Global) in einer Procedur zu erstelllen?

Meine Suche in Google und in der SuFu haben nichts gebracht.
Bitte um Hilfe

//Edit1 ach wie peinlich..
Das geht ja mit Arrays


var IntegerArray: array [0..9] of integer; aus WikiScool.

[jsheyer]

Hallo,

am einfachsten wäre es doch ein Array zu erstellen?
Array z. B. im public oder private Bereich global definieren, oder innerhalb einer procedure


var DeinVarname: Array of Integer;


Dann einmal die Größe definieren mit:
SetLength(DeinVarName, 109);

Ab jetzt kannst Du mit DeinVarName[index] daruf zugreifen.
Der index beginnt mit 0.

Werden mehr als 109 Werte benötigt, dann kann mit SetLength ein höherer Wert definiert werden.