Código Delphi [-]ADOQuery1.Parameters.ParamByName('MiParametro').Value := Edit1.Text;
ADOQuery1.Parameters.ParamByName('MiParametro').Value := Edit1.Text;