Código Delphi [-]qryCat.ParamByName("categoria").AsString := ComboBox.text;
qryCat.ParamByName("categoria").AsString := ComboBox.text;