Objekt Casting

[haentschman]

Hallo...

Gegeben:

Klasse1 TTest1
Klasse2 TTest2
procedure Save(T1: TTest1); overload;
procedure Save(T2: TTest2); overload;
ObjectList mit List[0] = Object von TTest1 und List[1] = Object von TTest2


sooo... jetzt war ich der geistesgestörten Meinung wenn ich...

Save(List[Laufvariable]);

...ausführe die entsprechende Save Procedure aufgerufen wird. Inzwischen ist mir klar das das nicht geht. Wie kriege ich das Objekt im Save Aufruf gescheit gecastet ? (ohne if Orgien) Diverse Versuche über ClassType schlugen fehl...

Danke für Info´s