IBQuery.Params.ParamByName('Id').AsLargeInt := MyRecord.Id;
IBQuery.Params.ParamByName('Value1').AsAnsiString := MyRecord.Value1;
IBQuery.Params.ParamByName('Value2').AsSmaillInt := MyRecord.Value2;
IBQuery.Params.ParamByName('Value3').AsBoolean := MyRecord.Value3;
IBQuery.ExecSQL;