Код:
Query.SQL.text:='INSERT INTO bdbot (ZZZ, GGG,FFF) VALUES (:par1,'+YYY+','+IntToStr(idbd)+')';
Query.Parameters.ParseSQL(Query.SQL.Text, True);
Query.Parameters.ParamByName('par1').Value:=XXX;
Query.open;
Не одна так другая, "текущий поставщик не поддерживает возврат нескольких наборов записей в результате одной операции".
нашел что нужно заменить Query.open на Query.ExecSQL; в принципе работает, единственное из BDGrid пропадают записи, но проблемы нет по новой буду грузить.
Спасибо за помощь.