write spcifier eines überschriebenen properties erweitern

[Adonis Amore]

<p>Hi Folks,</p>
<p>habe ein Property (DateTime von TDateTimePicker) überschrieben. Allerdings hat das ursprüngliche Property eine nette write-Procedure die auch weiter ausgeführt werden soll. Wie kann ich also meine write-Procedure um die Funktion der überschriebenen Property-write-Procedure erweitern (so was wie inherited)?</p>
<p>Thanxx, Adonis</p>

[Ulrich Gerhardt]

Ungetestet, probier's mal ;-)
<pre>
procedure SetDateTime(const Value: TDateTime);
begin
inherited DateTime := Value;
// jetzt du ;-)
end;
</pre>
Ciao, Uli

[Adonis Amore]

<p>Mensch, dat ise' ja einfach,<br>
ich hab' total gefrustet mir gestern Abend noch die TDateTimePicker-Klasse
reingezogen und die Sache wie folgt gelöst:</p>
<p>DateTimeToSystemTime(Value, tmpSystemTime);<br>
MsgSetDateTime(tmpSystemTime);</p>
<p>Aber Deine Lösung ist ja wunderbar,</p>
<p>Vielen Dank, Adonis</p&gt