onMouseclick procedur in eigener Komponente

[24jb]

So ich habs jetzt mit MousDown probiert, allerdings sagt er, dass die deklaration von der Urprünglichen abweicht, gibts ne möglichket die ursprüngliche Deklaration anzusehen?

Code:

type
  TBinaryClock = class(TGraphicControl)
  private
    { Private declarations }
  protected
    { Protected declarations }
  public
    { Public declarations }
    procedure MouseDown(Sender: TObject; Button: TMouseButton;
              Shift: TShiftState; X, Y: Integer);  Override;
  published
    { Published declarations }
  end;