FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Simular click en columna xbrowse (SOLUCIONADO)
Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM

Simular click en columna xbrowse (SOLUCIONADO)

Posted: Sun May 29, 2011 04:39 AM

Amigos del foro:

Tengo un xbrowse en un dialogo con varios botones, uno de ellos quiero activar-desactivar cuando x columna del browse
tome foco, o se seleccione.

Esto me funciona perfectamente:
oLbx:bLClicked:={|nRow,nCol| if( UPPER( SUBSTR(oLbx:SelectedCol:cHeader, 1,3) ) = "CTA", oBt3:Enable(), oBt3:Disable() ) }

Pero esto NO!!!!!! (no hace nada)
oLbx:bKeyDown:={|nKey| iif( nKey ==VK_UP .or. nKey ==VK_DOWN .or. nKey ==VK_LEFT .or. nKey ==VK_RIGHT, if( UPPER( SUBSTR(oLbx:SelectedCol:cHeader, 1,3) ) = "CTA", oBt3:Enable(), oBt3:Disable() ), ) }

驴Alguno de ustedes puede decirme que me falta?
Si oLbx:bKeydown no ofrece esta prestaci贸n, creo que podr铆a solucionarlo con una imitaci贸n del click del mouse.
Pero entonces...
驴C贸mo puedo simular o imitar el click del mouse cuando navego en el browse, para que al seleccionar la columna deseada
se active el bot贸n, y cuando abandone esta columna, se desactive?

Muchas gracias de antemano.

Saludos.

Francisco J. Alegr铆a P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql
Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM

Re: Simular click en columna xbrowse (SOLUCIONADO)

Posted: Sun May 29, 2011 02:56 PM

Bueno, encontr茅 la soluci贸n estudiando la classe TXbrowse:

Me cost贸 alg煤n tiempo, pero era algo tan sencillo como:
Sin usar ninguna simulaci贸n del mouse-click.

:lColChangeNotify := .t.

oLbx:bChange:={|| iif( UPPER( SUBSTR(oLbx:SelectedCol:cHeader, 1,3) ) = "CTA", oBt3:Enable(), oBt3:Disable() ) }

Saludos.

Francisco J. Alegr铆a P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql

Continue the discussion