|
Registriert seit: 12. Aug 2003
Ort: Soest
4.027 Beiträge
Delphi 10.1 Berlin Enterprise
|
Re: Interfaces und Vererbung?
22. Okt 2009, 07:51
Der hardcast eines interfaces bewirkt ein interface copy und keinen interface cast. Der korrekte Weg wäre:
B2 := GetIntf(1) as IBasic2;
wenn du sicher bist, dass dein angefordertes Interface IBasic auch IBasic2 unterstützt, ansonsten bist du mit
if Supports(GetIntf(1), IBasic2, B2) then
auf der sicheren Seite.
|