OnClickEvent forsvinder

Jeg har et komponent med følgende erklæring:

nit cLinkOverView;

interface

uses
  SysUtils, Messages, ExtCtrls, Classes, Graphics, Controls, cLabel;


type
  TLinkLabel = TcLabel;
  TLinkOverView = class(TImage)
  private
    Drag: Boolean;
    MenuOpen: Boolean;
    procedure MouseMove(var m:twmmouse); message wm_MouseMove;
    procedure MouseLDown(var m:twmmouse); message wm_LButtonDown;
    procedure MouseLUp(var m:twmmouse); message wm_LButtonUp;
    procedure MouseLDBlClk(var m:twmmouse); message wm_LButtonDBlClk;
  { Private declarations }
  protected
    { Protected declarations }
  public
    { Public declarations }
    LnkId: Integer;
    LnkToID: Integer;
    LinkLabel: TLinkLabel;
    constructor Create(AOwner: TComponent); override;
    destructor Destroy; override;
  published
    { Published declarations }
  end;



Min MouseLDown kode er som følger

procedure TLinkOverView.MouseLDown(var m: twmmouse);
begin
  inherited;
  if frmFC_MDI.EditModeOn then
  begin
    BringToFront;
    Drag:=true;
    OldXPos := m.XPos;
    OldYPos := m.YPos;
  end;
end;

Som det ses i koden skal jeg under specielle forudsætninger (EditModeOn) bruge min musseposition

Problemet er at når jeg piller ved min MouseLDown forsvinder min OnClick event handler som jeg skal bruge når hovedformen ikke er i EditMode, hvordan løses dette ?