|
Registriert seit: 22. Mär 2003
Ort: Finsterwalde
622 Beiträge
Turbo Delphi für Win32
|
AW: Ableitung von TButton und OnMouseDown
3. Aug 2017, 16:09
...
also:
Delphi-Quellcode:
Procedure MouseDown(Button: TMouseButton;
Shift: TShiftState; X, Y: Integer); Override;
Und dann im TMyButton.MouseDown das fOnMouseDown mit self als erstem Parameter aufrufen. Danke. Genau so funktioniert das prima.
Alex Winzer
|