如何去重写派生类中的控件的事件

Question

有个表单的类：
type
   TFactoryImprotForm = class(TForm)
    Button1: TButton;////包含一个按钮控件,在类中不做任何事情
    ....
我因为在上面表单基础上需要重新改写一个构造函数，所以就从这个表单的类中在派生一个类：
   
  TFactoryImprotForm1=class(TFactoryImprotForm)
   public 
     constructor Create(Conn:TADOConnection); overload;////这个构造函数需要接受一个ADOConntion 变量
     procedure Button1Click(Sender: TObject);//////问题出在这里，希望重新写按钮事件现在需要点击派生对象的按钮【button1】的时候，根据ADOConntion对象的数据来进行操作，如果按钮事件写在TFactoryImprotForm 中肯定是没有ADOConntion变量以及结果的，现在的问题是：
如果直接加在TFactoryImprotForm1 中却没有任何相应，
procedure TFactoryImprotForm1.Button1Click(Sender: TObject);
并且在按钮的相应事件中加入断点也会被系统自动删除，根本调试的时候进入不了这个重写的事件相应函数中去。虽然加载了事件的相应函数，并且构造的对象也是TFactoryImprotForm1
不知道还差什么没有申明，
  

Answer 1

TFactoryImprotForm1=class(TFactoryImprotForm)
procedure Button1Click(Sender: TObject);//这句写在TFactoryImprotForm1下面

Answer 2

就是这样的。顺便问下，基类（TFactoryImprotForm）中的事件相应函数需要声明为virtual吗？