template verkettete liste

[JnZn558]

hallo, moechte gern so eine template verkettete liste bauen, fuer allgemeine datentyp

Code:

PList = ^TList;
vList = record;
value    : TObject;
pNextItem: PList;
pLastItem: PList;
end;
TList = vList;

wie kann ich jez z.B string, integer wert an value zuweisen, da value von TObject is.
bzw, wie lese ich den wert in string, integer aus um andere variable zuzuweisen.

Code:

data: vList;
i   : integer;
data.value := 3; // so?
i := data.value; // wie soll hier richtig sein

oder is konzept mit dem datentyp TObject ueberhaupt falsch, wenn ja, was soll man stattdessen nehmen

thx, thx