Property von Komponente überschreiben

[Angel4585]

Hallo,

ich bastel an einer eigenen Komponente die von TXMLDocument erbt.

Wenn das Property Active gesetzt wird, möchte ich nun etwas ausführen.
Aber wie überschreibe ich das Property sodass ich was ausführen kann und gleichzeitig das Property wie in TXMLDocument gesetzt wird?

Wenn ich

Delphi-Quellcode:

property Active : Boolean read GetActive write SetActive; 

function TMyXMLDocument.GetActive: Boolean;
begin

end;

procedure TMyXMLDocument.SetActive(const Value: Boolean);
begin

end;

mache, wie kann ich dann das ursprüngliche Property setzen?

[sirius]

Du überschreibst einfach die Methode setActive

[himitsu]

Muß diese dann nicht überschrieben (override) werden,
ansonsten dürfte sich das Property doch eigentlich noch an die alte Methode wenden?

PS: intern wird SetActive nicht

> virtual oder dynamic + override

wie wäre es, wenn du dein Vorhaben mit etwas von denen vrsuchst zu lösen?
.BeforeOpen, .AfterOpen, .BeforeClose, .AfterClose, .BeforeNodeChange oder .AfterNodeChange


[add]
ahh, ich seh grad, SetVirtual ist sogar als Virtual definiert,
hatt ich jetzt nicht erwartet ... möglich wäre es demnach doch (Stichwort Override)

[Angel4585]

SetVirtual?

Thx euch beiden mir ist auch zwei Minuten nach dem Post die Idee gekommen einfach SetActive zu überschreiben, funzt sehr gut

[himitsu]

aber wie gesagt, reicht die .BeforeOpen/.AfterOpen und .BeforeClose/.AfterClose denn nicht auch?

PS: diese Ereignisse werden auch in SetActive ausgelöst ... jenachdem ob True oder False gesetzt wird.

[Angel4585]

Würden den Zweck zwar erfüllen, aber ich möchte das ja in der Komponente drin haben. wenn jetz jemand die Kompo verwendet un ein AfterOpen verwenden will seh entweder ich oder er alt aus.