var x:integer;
begin
randomiz;
for x:=1 to 100 do
begin
for y:=1 to 10000 do
begin
adodataset.append;
adodataset.fieldbyname('字段').asfloat:=1000000000+random(8999999999);
end;
adodataset.UpdateBatch;
end;
end;
速度应该还可以。
var x:integer;
begin
randomiz;
for x:=1 to 10 do
begin
for y:=1 to 10000 do
begin
adodataset.append;
adodataset.fieldbyname('字段').asfloat:=1000000000+random(8999999999);
end;
adodataset.UpdateBatch;
end;
end;
速度应该还可以。