报错的原因是你没有定义过 ADOUery1 ,我想你应该是一个delphi的初学者,连控件都没定义过就想用,不报错就怪了。解决的方法是:情况1:如果你从未在任何地方定义过ADOQuery1 你应该拉一个 TADOQuery 控件到你的 登录窗体(TLoginfrm) 中 ,并命名为ADOQuery1,然后为ADOQuery1.connection 指定一个数据库连接。如果你仍没创建过数据库连接,你还需要拉一个TADOConnection 到这个登录窗体或者一个专门的数据单元模块中,并命名为 ADOConnection1 , 然后为ADOConnection1设置数据库连接串,然后将 ADOQuery1.connection 指定为 ADOConnection1 。 情况2:你已在其它单元定义过ADOQuery1 如果是这种情况,你在登录窗体(TLoginfrm) 中要便用其它单元定义的ADOQuery1时,需要在Adoquery1的前面引用其它单元的名称( 如:data.ADOQuery1.close )