var
iIndex: Integer;
begin
FDQuery1.Params.ArraySize := iRecord;//一次性插入条数
for iIndex := 0 to iRecord - 1 do
begin
//读入数据
// FDQuery1.insert
// FDQuery1.fieldbyname('XXX').value:=''yyyy''
end;// for iIndex := 0 to iRecord - 1 do
FDQuery1.Execute(fdqryInsert.Params.ArraySize);
end;