Código Delphi [-] ADOQuery1.Parambyname('parametro1').Value:= DBEdit31.text;
ADOQuery1.Parambyname('parametro1').Value:= DBEdit31.text;