Also ich habe das ganze in einer Klasse und im Konstruktor passiert folgendes:
Delphi-Quellcode:
//Der Konstruktor
...
SpaltenNamen := SortedList.Create;
SpaltenNamen.Add(TObject(1),'NAME');
SpaltenNamen.Add(TObject(2),'VORNAME');
...
Ich habe im Hauptprogramm ein Objekt dieser Klasse erzeugt und rufe dann z.B. MyObject.isIn(TObject(1)) auf.
Die isIn-Methode delegiert das ganze einfach weiter:
Delphi-Quellcode:
function PStammA_Fields.isIn(o : TObject) : boolean;
begin
Result := SpaltenNamen.ContainsKey(o);
end;
Ich schätze, dass ich mit dem TObject irgendwie murks mache, steh aber gerade auf dem Schlauch...