ADO怪现象~~~~~~~在线等待，谢谢……

地址访问冲突，你可以试一下：代码形式——
……
    sqlstr:='select UserName,UserPassword,LoginGrade from LoginUser';
  （DM为数据模块）
   DM.ADODataSet1.CommandText:=sqlstr;
   DM.ADODataSet1.Open;
  for i:=0 to DM.ADODataSet1.RecordCount-1 do
  begin
    TmpName:=DM.ADODataSet1.Recordset.Fields['UserName'].value;   //
    ComboBoxUser.Items.Add(TmpName);
    DM.ADODataSet1.Recordset.MoveNext;
……