[Casimiro Notevi]

No uso ADO, pero por probar:

Código Delphi [-]
ATasm.Close;
ATasm.SQL.Text:='SELECT T.PMAX, T.PRECIO '+
                'FROM TASM AS T '+
                'WHERE T.AGENCIA=:AG AND T.DESTINO=:XS AND (:ES>=T.EMIN AND :EZ<=T.EMAX);';
ATasm.Parameters.ParamByName('AG').Value:='ASMMAS';
ATasm.Parameters.ParamByName('XS').Value:='NAP';
ATasm.Parameters.ParamByName('ES').Value:=180.4;
ATasm.Parameters.ParamByName('EZ').Value:=180.4;
ATasm.Open;