很怪异的问题求教

我写了一个类是用于ADO的具体代码如下：
unit adoClass;

interface

  uses ADODB;

  type
  TADO = class

  private
  m_conn: TADOConnection;
  m_Query: TADOQuery;
  public

  constructor Create();
  destructor Destroy(); override;
  end;

implementation

constructor TADO.Create;
begin
m_Conn:=TADOConnection.Create(nil);
m_Query:=TADOQuery.Create(nil);
m_Query.Connection:=m_Conn;
end;

destructor TADO.Destroy;
begin
m_Query.Free;
m_Conn.Free;
end;
end.

为什么我在窗口的按钮中加入如下代码就报错：
var a: TADO;
begin
a:=TADO.Create;
end;

没想到想学习一下Delphi这么困难。求教

一调用构造函数就报错很奇怪啊！