ADOQuery1.Parameters.ParamByName('Cod').Value := '000486'; ADOQuery1.Parameters.ParamByName('Desc').Value := StringOfChar(' ', 40);