你的tab没有滚动到下一条记录

解决方案 »

  1.   

    for b:=0 to TAB1.RecordCount-1 do
    begin
    TAB1.edit;
    TAB1['NO']:=b+1;
    TAB1.post;
    tab1.next;
    end;
      

  2.   

    该表打开为readonly。可以改为ttable来连接;with tablename do
    begin
    databasename:='tab1';
    open;
    first;
      for b:=0 to RecordCount-1 do
      begin 
          edit;
          fieldbyname('no').value:=b+1;
          post;
          next; 
      end;
    end;
      

  3.   

    sorry,我打少了一句tab1.next;
    其实程程序是有tab1.next;这一句的。
      

  4.   

    gz!
    你用SQL语句来试一试!