Xailer & OZ Software

Hola a Todos
Alguien sabe como crear un evento para hacer un doble click en el TreeItem,
quiero hacer un menu tipo SAP
Gracias por adelantado
__________ Información de ESET NOD32 Antivirus, versión de la base de firmas de virus 5096 (20100507) __________
ESET NOD32 Antivirus ha comprobado este mensaje.
http://www.eset.com

Juan Jose:
Es super sencillo.
Lo que yo hice fue usar la propiedad :CARGO de cada nodo del arbol para
guardar ahi un bloque de codigo con la función que quiero ejecutar:
oAuxil := oSSubCta:InsertItem((ALIAS_OTROCAT)->(SUBSTR(cuenta,9,4))
oAuxil:nImage := 14
oAuxil:Cargo := {|| Funcion que quiero ejecutar ()}
Y luego, simplemente en el evento OnDblClick del arbol hago:
METHOD TreeView1DblClick( oSender, nKeyFlags, nPosX, nPosY ) CLASS catcue
LOCAL nRegistro
IF oSender:GetSelectedItem():Cargo <> NIL
EVAL(oSender:Cargo)
ENDIF
RETURN Nil
Y listo
Saludos
Rene Flores
http://www.ciber-tec.com
> Hola a Todos
>
> Alguien sabe como crear un evento para hacer un doble click en el TreeItem,
> quiero hacer un menu tipo SAP
>
> Gracias por adelantado
>
>
>
> __________ Información de ESET NOD32 Antivirus, versión de la base de firmas de virus 5096 (20100507) __________
>
> ESET NOD32 Antivirus ha comprobado este mensaje.
>
> http://www.eset.com
>
>
>
>

Gracias por la ayuda René
"Juan Jose" <correo@jjlopezg.jazztel.es> escribió en el mensaje
news:4be469e1$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Hola a Todos
>
> Alguien sabe como crear un evento para hacer un doble click en el
> TreeItem, quiero hacer un menu tipo SAP
>
> Gracias por adelantado
>
>
> __________ Información de ESET NOD32 Antivirus, versión de la base de
> firmas de virus 5096 (20100507) __________
>
> ESET NOD32 Antivirus ha comprobado este mensaje.
>
> http://www.eset.com
>
>
>
>
>
> __________ Información de ESET NOD32 Antivirus, versión de la base de
> firmas de virus 5097 (20100509) __________
>
> ESET NOD32 Antivirus ha comprobado este mensaje.
>
> http://www.eset.com
>
>
>
__________ Información de ESET NOD32 Antivirus, versión de la base de firmas de virus 5103 (20100510) __________
ESET NOD32 Antivirus ha comprobado este mensaje.
http://www.eset.com