Setz deine Deklaration mal unter "Protected". Weiter unten im Quelltext musst du folgendes schrieben:
Delphi-Quellcode:
procedure TBinaryClock.MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
// ----------
inherited MouseDown(Button,Shift,x,y);
// ...
end;
Dann sollte es eigentlich funktionieren! Probiers mal aus
