Código Delphi [-] ... ADOQuery1.ParamByName('Consulta').AsString:='balblabal'; ...
... ADOQuery1.ParamByName('Consulta').AsString:='balblabal'; ...