批量插入数据到数据库
先采集到新闻内容显示到 StringGrid中，大约有1W多条
表结构
ID为主键
BT为标题
NR为内容
ID值为必填，插入时查询最大ID+1;编号规则为A000000000；最后一位从1开始
我现在要把StringGrid中的内容全部保存到这个表中
之前我用 for i := 2 to StringGrid.RowCount -1 do
begin
Application.ProcessMessages;
ID := TLargeID('A','CustomerData','id');//这里查询最大ID加1
BT:= Grid1.Cells[1,i];
NR:= Grid1.Cells[2,i];
aquery.Append;
//.............................
aquery.post;
end;
这样插入数据灰常慢，可不可以一次性插入上万条数据 用时大概在两秒内？ 插入时要考虑ID自动1
[解决办法]
如果是SQLServer的数据库，可以考虑将StringGrid中的内容先导出到文本文件，然后bulk insert即可，很快。
