On 07/09/2013 09:22, Reinier Olislagers wrote: > Then looping over the set, I execute it. I thought AssignFromField may > be appropriate: > for i := 0 to Source.Fields.Count - 1 do > begin > InsertQuery.Params[i].Clear; > InsertQuery.Params[i].AssignFromField(Source.Fields[i]); > end; > InsertQuery.ExecSQL; > > The code works mostly, but: > 1. With Firebird embedded (and BLOB fields) the output seems truncated > after 1024 bytes > 2. With ODBC+Access, I get error messages like > HY104; NativeError: 98; Message: [Microsoft][ODBC Microsoft Access > Driver]Invalid precision value; >
Mmmmph. Of course, after sending the post I stumbled on InsertQuery.Params.CopyParamValuesFromDataset(Source,true); InsertQuery.ExecSQL which seems to work ok _______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
