有谁sqlite做日志文件?写入速度怎样?
最近用delphi7+unidac3.6+sqlite3 做了个写入文字操作,发觉写入速度很慢。
表结构是这样的create test (id int ,log varchar(4000))
最近用delphi7+unidac3.6+sqlite3 做了个写入文字操作,发觉写入速度很慢。
表结构是这样的create test (id int ,log varchar(4000))
解决方案 »
- 散分啦~~来者有分~~~UP有分~~
- spcomm多串口编程,急!!!!
- 要UPDATE 带参数的ADOQUERY查询出来的结果如何写呢?
- 请指点DBgridcellclick的用法,在线,马上给分
- 请教一个问题,能给解决者我给200分,但是得有源程序!!!
- 救命!Access2000SQL语句问题?
- 求助,点新建按钮在DBEDIT上选择一下就会跳到有数据的一行。求解
- 请高手帮忙一下?
- 急急急。怎么用语句定义一个字段类型为浮点型,且保留小数点后面三位???
- 本地SQL创建数据表时出错???在线等待!!!
- 要做一个地磅接口,sscom小程序能收到信息过来,问题是如何解码!
- [求助]d7从主程序无法进入bpl函数或用鼠标看bpl数据连接的值
避免重复打开/关闭连接.
批量提交时加事务.
procedure TForm1.btn5Click(Sender: TObject);
var
i : Integer;
begin
unqry2.Close;
for i := 0 to 1000 do
begin
mmo1.Lines.Add(IntToStr(i));
unqry2.SQL.Text := 'insert into table1 (col1) values (' + QuotedStr( '日志日志日志日志日志日志日志日志日志日志日志日志日志日志日志日志日志日志日志日志日志日志日志日志日志日志日志日志日志日志日志日志 ' + IntToStr(i)) + ')';
unqry2.Execute;
Application.ProcessMessages;
end;end;
找找 FDB.BeginTransaction (FDB为connection名称)
或query的beginupdate之类的