设 你用的是adoquery1连的数据库,并已将数据打开 则 var n:integer; begin n:=1; adoquery1.first; while not adoquery1.eof do begin adoquery1.edit; adoquery1.fieldvalues['字段名']:=n; adoquery1.post; n:=n+1; adoquery1.next; end; end;
如果是一次修改,以后不再变动,可以用OYGX(好好学习 Day day up on) 的方法. 不过建议楼主再插入时控制:找出最大的,然后+1 得到新的.
则
var
n:integer;
begin
n:=1;
adoquery1.first;
while not adoquery1.eof do
begin
adoquery1.edit;
adoquery1.fieldvalues['字段名']:=n;
adoquery1.post;
n:=n+1;
adoquery1.next;
end;
end;
不过建议楼主再插入时控制:找出最大的,然后+1 得到新的.