|
Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.388 Beiträge
Delphi 12 Athens
|
Objekt Casting
1. Feb 2012, 20:24
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
Geändert von haentschman ( 1. Feb 2012 um 20:34 Uhr)
|