also das onmousedown erignis hat eine andere deklarination:
Code:
type TMouseEvent = procedure (Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer) of object;
wie gesagt schau dir dach mal die hilfe in delphi an, zu erreichen unter f1!!!