菜鸟问题！！！请各位大侠一定要帮助小第我！先谢过了！

Question

用TADOQuery如何和数据库服务器连接，可不可以我讲讲连接数据库的步骤啊！明天我要去面试，一定要帮我啊！！谢谢

Answer 1

先添加一个TADOConection空间，
然后，双击该空间，激活他的连接向导，
最后测试通过后，再添加TADOQuery空间。
设置TADOQuery的Connection为TADOConection
就可以啦！
如果你要用TDbGrid先是数据的话
就要添加一个TDataSource空间连接TADOQuery和TDbGrid
就可以啦！

Answer 2

如果我想把查询出来的结果显示在stringgrid中应该怎么做？

Answer 3

要显示在stringgrid里?
楼上已经说了用DBGrid显示数据的方法,只要设置正确,那么DBGrid会自动显示相关数据

Answer 4

procedure TForm1.BitBtn1Click(Sender: TObject);
var
  i :integer;
begin
  i := 1;
  adoquery1.Close;
  adoquery1.SQL.Clear;
  adoquery1.SQL.Add('select * from syscolumns') ;
  adoquery1.Open;
  if not adoquery1.IsEmpty then
  begin
    with  stringgrid1 do
    begin
      while adoquery1.Eof do
      begin
        stringgrid1.RowCount := i + 1;
        Cells[0, i] := FieldByName('name').AsString;
        Cells[1, i] := FieldByName('id').AsString;
        next;
        i:=i+1;
      end;
    end;
  end;
end;
end.
帮我看看这段程序有没有问题，我编译的时候提示是这样的：[Error] Unit1.pas(45): Undeclared identifier: 'FieldByName'

Answer 5

还是先了解一下with 的使用吧！       
   Cells[0, i] := adoquery1.FieldByName('name').AsString;
   Cells[1, i] := adoquery1.FieldByName('id').AsString;

Answer 6

临阵磨枪阿  连接字符串属性 一步一步又提示 access 是jet4.0 其余的都有写  祝你好运了

Answer 7

procedure TForm1.BitBtn1Click(Sender: TObject);
var
  i :integer;
begin
  i := 1;
  adoquery1.Close;
  adoquery1.SQL.Clear;
  adoquery1.SQL.Add('select * from syscolumns') ;
  adoquery1.Open;
  if not adoquery1.IsEmpty then
  begin
    with  stringgrid1,adoquery1 do //这里改了
    begin
      while adoquery1.Eof do
      begin
        stringgrid1.RowCount := i + 1;
        Cells[0, i] := FieldByName('name').AsString;
        Cells[1, i] := FieldByName('id').AsString;
        next;
        i:=i+1;
      end;
    end;
  end;
end;
end.