关于数据模块的调用

Question

  以前都是一个窗体上放上一个或者几个adoquery组件后来看了别人的程序都是建一个数据模块。然后放一个ADOConnection组件和N个adoquery组件。。然后各个窗体调用自己的adoquery组件
  所以这次的软件。我建了个数据模块名字为DM。。然后放了个ADOConnection改名为（ADO）。和1个adoquery（改名为：ado_login）。。然后ado_login的connection设置为ADO，SQL写上select * from users active设置为true。ADO链接好数据库。
  然后做登入窗口
  但是我在登入窗口只要调用DM.ado_login。。就弹错误。。输入DM.的时候。。也会跳出下拉框。有选项。说明我已经引用了这个窗体
请问下。。我是哪里设置错了么？
procedure TForm1.FormCreate(Sender: TObject);
begin
  ComboBox1.Items.Clear;
  while not dm.ADOlogin.Eof do      （他显示这里错误!）
    begin
      ComboBox1.Items.Add(dm.ADOlogin.FieldValues['users']);
      Next;
    end;
end;

Answer 1

dm.ADOlogin没有打开吧procedure TForm1.FormCreate(Sender: TObject);
begin
  ComboBox1.Items.Clear;
  dm.ADOlogin.open;
  while not dm.ADOlogin.Eof do （他显示这里错误!）
  begin
  ComboBox1.Items.Add(dm.ADOlogin.FieldValues['users']);
  dm.ADOlogin.Next;
  end;
end;

Answer 2

是不是在数据模块添加CREATE事件。。我添加了呢。。