请教:各位写入数据库Access所用的时间???????调试环境和执行环境的结果差别这么大?!!!!!

boatzm 2004-05-05 05:19:35
为什么我调试环境和执行环境的结果差别这么大?!!!!!
救命呀!!!!


我在Delphi 调试环境 写1000 条记录 测试出来是 40m 左右
无论是用TAdotable 或TAdoQuerry

但是奇怪的是在exe 中是10m 左右,问怎么回事?
其他open 之类的略!
for i:=1 to 1000 do
begin
query1.SQL.Clear;
query1.SQL.add('insert into tablang values(:Tim,"ttttttttttttttttt1","bbbbbbbbbbbbbb1","hhhhhhhhhhhhhhhhhhhhhh1")');
query1.Parameters.ParamByName('Tim').Value :=inttostr(i);
query1.ExecSQL;
end;

//--------------------------------
count:=table1.RecordCount;
for i:=1 to 1000 do
begin
table1.Append;
table1.FieldByName('key').AsString:=inttostr(2000+count+i);
table1.FieldByName('value1').AsString:='value1value1value1value1value1';
table1.FieldByName('value2').AsString:='value1value1value1value1value1';
table1.FieldByName('value3').AsString:='value1value1value1value1value1';
end;
table1.Post;


还有就是这种用法有没有问题?!!!谢了先!!!
...全文
65 3 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
boatzm 2004-05-07
  • 打赏
  • 举报
回复
再没有人回答就 ,结了哈。
hotdog911 2004-05-06
  • 打赏
  • 举报
回复
不知,帮顶
boatzm 2004-05-06
  • 打赏
  • 举报
回复
dinging

5,928

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧