Power Builder - Zoom al datawindow

¿Alguien podría decirme como deshabilitar el zoom que se hace al datawindow cuando utilizo el scroll del mouse junto con la tecla Control (como el zoom de las aplicaciones de office)? se lo agradecería bastante

saludos ....

En el evento Other escribe:

CONSTANT integer WM_MOUSEWHEEL = 522
IF message.number = WM_MOUSEWHEEL AND KeyDown (KeyControl!) THEN
message.processed = TRUE
RETURN 1
END IF

Saludos