Hallo Leute,
ich steht gerade auf dem Schlauch.
Ich will auf die verdeckte Eigenschaft zugreifen komme aber nicht drauf, wie das geht.
Theoretisches Beispiel:
Delphi-Quellcode:
type
TMyClass = class(TSomeSystemClass)
private
Function GetSomeVal() : Boolean;
Procedure SetSomeVal(const Value : Boolean);
public
SomeVal : Boolean read GetSomeVal write SetSomeVal;
end;
...
Function TMyClass.GetSomeVal() : Boolean;
Begin
Result := inherited.SomeVal; // <- Geht so nicht
DoSomeThingMore_1();
End;
Procedure TMyClass.SetSomeVal(const Value : Boolean);
Begin
inherited.SomeVal := Value; // <- Geht so nicht
DoSomeThingMore_2();
End;
Ich dachte ich könnte einfach mit Inherited darauf zugreifen,
aber das ist wohl nur für den aktuellen Kontext gedacht.
Weiß jemand, wie ich die Verwendung von "SomeVal" aus der Klasse
TSomeSystemClass "verhindern" kann, so dass es nur in Verbindung
mit der Prozedur "DoSomeThingMore_X()" läuft.
Die zugrundeliegende Klasse kann/will ich ja nicht ändern.
Mit freundlichem Gruß
Incocnito