Power Builder - OCX para obtener y cambiar resolución y color

En vista de existir algunos requerimientos de amigos del foro, para cambiar la resolución de la pantalla. Existe un OCX gratuito, que permite además obtener y cambiar el color actual. Pueden bajarlo de:

http://www.davphantom.net/ocx.htm

* Obtener resolucion y color actual de la pantalla
long ll_resActualHor, ll_resActualVer, ll_resActualColor

ll_resActualHor=ole_1.Object.resActualHor
ll_resActualVer=ole_1.Object.resActualVer
ll_resActualColor=ole_1.Object.resActualColor

MessageBox("Actual", String(ll_resActualHor)+","+String(ll_resActualVer) &
+","+String(ll_resActualColor))

* Cambiar resolucion y color de la pantalla
Integer li_resHor, li_resVer, li_resColor

li_resHor=1024
li_resVer=768
li_resColor=32// Puede ser: 8,16,24,32

//Pasamos por referencia
ole_1.Object.ChangeResol(li_resHor,li_resVer,li_resColor)
//-----Fin------------

Nota: El objetivo de este post, es probar el OCX en diferentes versiones de PB y Windows, y comentar si hallan problemas.

Me tira un error en esta linea, digamos, en la primer linea cuando intento acceder a la propiedad "resActualHor "....
:
ll_resActualHor=resolucion.Object.resActualHor
......
.......
El error textual es el sig:

"Error accessing external object property resactualhor at line ...

Bueno luego de renegar un poquita ya que no encontraba el objeto con que se habia grabado en la pestaña "insert Control" de la ventana "insert object"....
El error que me daba es x q habia agragado otro objeto, no este!
No lo probe a full pero por lo menos esta prueba fugaz anduvo correctamente asi que una vez mas mi eterno agradecimiento a OSCAR !!! Sos un genio che!