Für sowas überschreibt man aber nicht das Property.
Delphi-Quellcode:
TMyTrayIcon = class(TTrayIcon)
protected
procedure MouseDown(Button: TMouseButton; Shift: TShiftState;
X, Y: Integer); override;
end;
procedure TMyTrayIcon.MouseDown(Button: TMouseButton; Shift: TShiftState;
X, Y: Integer);
begin
inherited;
...
end;
Was ist, wenn man nun OnMouseDown deines TMyTrayIcon nutzen will?
(dort stünde ja nun schon schon deine Methode drin)
MouseDown wird intern aufgerufen und dieses TControl.MouseDown ruft dann OnMouseDown auf.
PS: Meckert Delphi eigentlich nicht rum, da du eine gleichnamige Methode "MouseDown" verdeckst?
Nee, da meckert nix. Ich bin in dieser Thematik nicht sooo ganz fit. Überschreiben im Sinne von override tue ich ja nicht, sondern ich weise einem Event eine Methode zu. Oder ist das auch überschreiben?
Dein Codebeispiel sieht gut aus. Nur ist wieder die Frage wie ich mit der mitgelieferten
OH dahinterkomme, dass es MouseDown gibt
Aber deswegen werde ich mir dann gleich mal das von Dir empfohlene
DP Nachschlagewerk ansehen
