du kannst auch einfach eine objektreferenz oder einen pointer auf ein record in dem tag ablegen:
Delphi-Quellcode:
var
SomeThing: TSomeThing;
Data1: PDataRec;
Data2: TDataClass;
// ...
New(Data1);
Data1^.Language := 'Deutsch';
SomeThing.Tag := Integer(Data1);
// ...
PDataRec(SomeThing.Tag)^.Language;
// bzw
Data2 := TDataClass.Create;
Data2.Language := 'Deutsch';
SomeThing.Tag := Integer(Data2);
// ...
TDataClass(SomeThing.Tag).Language;