能不能通过双击销毁一个TPanel对象?

如下,编译不能通过,说父类没有DblClick函数,但是,Panel的event处理函数里是有这个函数的。为什么?

  TMyPanel = class(TPanel)
  private
    fMouseFlag: Boolean;
    fx,fy: Integer;
  protected
    procedure DblClick(Sender: TObject); override;
    procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X: Integer;
      Y: Integer); override;
    procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X: Integer;
      Y: Integer); override;
    procedure MouseMove(Shift: TShiftState; X: Integer; Y: Integer); override;
  end;   

如果我想,通过双击一个Panel销毁该Panel对象,该怎么做?

阅读 858
撰写回答
你尚未登录,登录后可以
  • 和开发者交流问题的细节
  • 关注并接收问题和回答的更新提醒
  • 参与内容的编辑和改进,让解决方法与时俱进