Código Delphi [-]IBQ_Edit.Params[7].Value:=StrToFloat(edit.text);
IBQ_Edit.Params[7].Value:=StrToFloat(edit.text);