[lohmatiy]

все, сам нашел решение

Код:

ADOQuery2.SQL.Clear();
ADOQuery2.SQL.Text:='INSERT INTO Обечайки ([Тип обечайки],[Диаметр],[Расчетное давление],[Температура],[Толщина],[ID стали]) VALUES (:Param1,:Param2,:Param3,:Param4,:Param5,:Param6)';
ADOQuery2.Parameters.ParamByName('Param1').Value:='однослойная';
ADOQuery2.Parameters.ParamByName('Param2').Value:=100;
ADOQuery2.Parameters.ParamByName('Param3').Value:=200;
ADOQuery2.Parameters.ParamByName('Param4').Value:=300;
ADOQuery2.Parameters.ParamByName('Param5').Value:=400;
ADOQuery2.Parameters.ParamByName('Param6').Value:=0;