Du meinst wohl eher eine Liste. Was du vor hast ist schon eine bessere Lösung, als ein dyn. Array. Das ganze sieht normalerweise so aus :
Delphi-Quellcode:
Zeiger = ^Daten;
Daten = record
nr,
artID : integer; (* wird benötigt für Lagerbestände etc., *)
(* um das erneute Lesen von Artikeln zu sparen *)
bez : string [25];
Nachfolger,
Vorgaenger : Zeiger;
end;
TListe = class
public
Aktuell,
First, // First = links ; Last = rechts
Last : Zeiger;
Anzahl : integer;
constructor create;
procedure Auflegen;
end;
Allerdings muß ich dich warnen : solltest su völlig ahnungslos sein, dann mußt du dich mit der Theorie schon etwas beschäftigen. Vorerst dazu nur noch folgendes : wie man sieht wird Zeiger als ^Daten deklariert. "Daten" werden aber erst später deklariert. Und die Liste, die damit erzeugt wird ist völlig dynamisch und doppelt verkettet. Das bedeutet, sie kann vorwärts oder rückwärts durrchgeackert werden. Wie gesagt, so ganz einfach ist das nicht.