Delphi-Quellcode:
type
TCrackNMSMTP =
class(TNMSMTP);
TCrackNMSMTP(NMSMTP1).Proxy := '
IP Adresse';
Das ist der klassische Trick eine protected Property zugreifbar zu machen.
Es wird eine Klasse formal abgeleitet, aber nichts an der Klasse veraendert.
Die harte Umtypung ist nun ungefaehrlich. Der Compiler erlaubt nun aber den Zugriff auf protected Properties,
da diese ja in einer abgeleiteten Klasse zugreifbar sind.