а как сделать запись, если очень много строк 10000 пр.
Код:
SqlQuery1.SQL.Text := 'INSERT INTO '+edit6.Text+' (id, pach, size, attribute) VALUES (:id, :pach, :size, :attribute)';
SqlQuery1.ParamByName('id').AsInteger := i;
SqlQuery1.ParamByName('pach').AsString := ListBox2.Items.Strings[i];
SqlQuery1.ParamByName('size').AsString := '4456874mb'; //inttostr(imgsize);
SqlQuery1.ParamByName('attribute').AsString :='links';
SqlQuery1.ExecSQL;
через
FOR все прогонять?