Xailer & OZ Software

Hola!
¿Alguno de vosotros está usando el Codejock RibbonBar?
Estoy haciendo pruebas con Xailer y no me termina de funcinar.
El principal problema que me encuentro está en el evento Execute, que al importar el ocx se define como:
EVENT Execute( @uControl )
Al tratarlo desde xailer realmente se define como
Execute( oSender, @uControl )
Mi principal problema está en que uControl no es el control pulsado, sino un puntero al control pulsado y no sé cómo acceder al control conociendo tan solo el puntero.
Si miro uControl desde el debuger me dice que es de tipo "P" y su valos es algo así­ como 0x04369D1C
Necesito algo que me permita hacer
oControl := loquesea( uControl )
¿Alguna idea?
1 Saludico,
Fredy



Attached files

Hola Fredy,
> ¿Alguno de vosotros está usando el
> http://www.codejock.com/products/suitepro/?2yn6s14z=p1z?
>
> Estoy haciendo pruebas con Xailer y no me termina de
> funcinar.
>
> El principal problema que me encuentro está en el evento
> Execute, que al importar el ocx se define como:
>
> EVENT Execute( @uControl )
>
> Al tratarlo desde xailer realmente se define como Execute( oSender,
> @uControl )
>
> Mi principal problema está en que uControl no es el control
> pulsado, sino un puntero al control pulsado y no sé cómo
> acceder al control conociendo tan solo el puntero.
>
> Si miro uControl desde el debuger me dice que es de tipo "P"
> y su valos es algo así­ como 0x04369D1C
>
> Necesito algo que me permita hacer
>
> oControl := loquesea( uControl )
Si me enví­as un pequeño ejemplo para probarlo, le puedo echar un vistazo.
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info

Hola!
Dejo el projecto en http://www.sanzperez.com/Ribbon.zip
Lo que quiero hacer es que al pulsar el botón de la RibbonBar me muestre el número de ID correspondiente a ese botón
Te cuento hasta donde he llegado:
- Hay un evento llamado Execute que recibe como parámetro el control pulsado. Así­ que cuando definimos las caracterí­sticas del control, entre otras, tenemos:
:Execute := "Execute"
- Esto lo hace bien, ya que al pulsar el botón entro en el método indicado
METHOD Execute ( Param1, Param2 )
Pero...
No recibo un parámetro, sino dos
Supongo que el primer parámetro es oSender ya que desde el debug tengo:
PARAM1 <O>: (TCOMMANDBARS)
No me preocupa, porque el verdadero problema está en el segundo parámetro, que tendrí­a que ser el control pulsado, pero que en realidad es:
PARAM2 <P>: 0X028664998
Por lo que supongo que no me está mandando el control sino un puntero a donde está el control.
Y, como decí­an en el 1 2 3...., hasta aquí­ puedo leer.
No soy capaz de relacionar el puntero con su objeto para tener acceso a sus propiedades.
A ver si me das un empujoncico y puedo continuar, que tiene buena pinta.
1 Saludico,
Fredy