看看我的代码

Question

我以下的代码是要显示查询到的记录在DBGRID中，可运行结果是什么也没有：
SetAdoLink(adostart,StatSQL);//连接数据库的函数 StartSQL是SQL语句
  with adostart do
  begin
    first;
    for i:=1 to recordcount do
    begin
      Id:=fieldbyname('RecordId').value;
      SetAdoLink(adonumber,'select * from T_Study WHERE RecordId='''+ID+'''');
      IF adonumber.RecordCount <>num then adostart.Delete
      else adostart.Append ;
      next;
    end;
  end;

Answer 1

你好象并没有往dbgrid里添加什么啊

Answer 2

应该是for i:=0 to recordcount-1 do
不是for i:=1 to recordcount do