紧急求救：abstract error

Question

我正在编写一个MDI应用程序，我用Application.CreateForm(TuserForm, userForm)创建了一个用户管理的子窗口， 字窗口退出时我用free释放资源，但程序执行时，只要点击子窗口的退出按纽，就出现abstract error,请问这是怎么回事，怎么解决？

Answer 1

重载你free中用到的虚函数。或在TUserForm中重载Destory

Answer 2

type
  TAA = class
  protected
    procedure aa1; virtual; abstract; //这是纯虚拟函数
  public 
    procedure aa2; virtual; abstract; //这也是纯虚拟函数
  end;
 
  TBB = class(TAA)
  protected
    procedure aa1; override; //实现纯虚拟函数
  public
    procedure aa2; override; //实现纯虚拟函数
  end;impl...procedure TBB.aa1;
begin
end;procedure TBB.aa2;
begin
end;

Answer 3

type
  TAA = class
  protected
    procedure aa1; virtual; abstract; //这是纯虚拟函数
  public 
    procedure aa2; virtual; abstract; //这也是纯虚拟函数， 
          //在TAA中不实现该方法只声明 该方法的接口参数；留给子类去实现。
    procedure aa3; virtual; //这是虚拟函数，在中必须实现该方法
  end;

Answer 4

mdi子窗口的释放和普通窗口是不同的。