FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour ToolTips en CELDA con XBROWSE...
Posts: 2064
Joined: Fri Jan 06, 2006 09:28 PM
ToolTips en CELDA con XBROWSE...
Posted: Tue Nov 29, 2011 06:51 PM
Lo primero es agradecer a los muchos colaboradores del foro, lo he hecho aunque muy poco, en este momento llego con un caso creo a tipico o poco comun, si alguien ya lo logro y tiene en bien compartirlo seria maravilloso, bueno, el tema es el siguiente, tengo 1 xbrowse con array, si se fijan a partir de la col.1 hasta la col.n hay unos colores los cuales cambian basado en 1 valor leido de una tabla, eso gracias a un link viejo que habia respondido Daniel, ahora necesito que de igual manera cuando ubique el cursor en cada CELDA(no columna, ni fila), se abra un TOOLTIPS que debe evaluar el valor de la celda, en este caso 1 fecha y asi mostrar los 3 primeros digitos del mes de la fecha, esa es la parte facil, lo que no consigo es como hacer el TOOLTIP por celda, habia leido un link viejo pero de verdad no me dio resultado, imagino por los muchos cambios que ya tiene el XBROWSE, abajo agrego una imagen para dar una mejor idea de lo que quiero, cualquier sugerencia y apoyo sera agradecida, de antemamos, gracias y saludos... :-)

links original:

colores x celda
viewtopic.php?f=6&t=19153&start=0&hilit=color+de+celda

tooltips x celda
viewtopic.php?f=6&t=14934&start=0&hilit=doble+click+en+xbrowse



Uploaded with ImageShack.us
Dios no está muerto...



Gracias a mi Dios ante todo!
Posts: 537
Joined: Mon Jan 16, 2006 03:42 PM
Re: ToolTips en CELDA con XBROWSE...
Posted: Wed Nov 30, 2011 12:24 PM

Amigo Probaste asi

 oCol:bToolTip := {|oLbx, nRow, nCol, nKeyFlas| if ( oLbx:MouseRowPos( nRow ) == oLbx:nRowSel,if ( SQLField(oExi_Suc,"ma_arti")="DEMO12", "Married", "Single" ),) }

Saludos

Posts: 2064
Joined: Fri Jan 06, 2006 09:28 PM
Re: ToolTips en CELDA con XBROWSE...
Posted: Thu Dec 01, 2011 05:24 AM

JBRITA, gracias por tu respuesta, probe como me dijistes y casi, casi lo logro, solo que me esta validando solo la linea, no la CELDA, en cualquier parte de la linea siempre sale el mismo resultado aunque el contenido de la celda sea otro, es como sino evaluara el valor de la celda, aca dejo como lo tengo a ver si es un error mio en la forma que use tu sugerencia, saludos... :shock:

lo probe asi ya que deb validar muchas celdas por columnas que se crean on line

oBrw:aCols[ nFor ]:bToolTip := {|oBrw,nRow,nCol,nKeyFlas| IF(oBrw:MouseRowPos(nRow)==oBrw:nRowSel ,;
IF(cQryPCUO:num_leyenda > 0, str(cQryPCUO:num_leyenda),"Single"), ) }

Dios no está muerto...



Gracias a mi Dios ante todo!
Posts: 2064
Joined: Fri Jan 06, 2006 09:28 PM
Re: ToolTips en CELDA con XBROWSE...
Posted: Sat Dec 10, 2011 06:50 AM

Alguien tendra alguna idea de lo que necesito.? de verdad me hace falta, el cliente me tiene @!·$!%!! con el tema, gracias.

Dios no está muerto...



Gracias a mi Dios ante todo!
Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM
Re: ToolTips en CELDA con XBROWSE...
Posted: Wed Dec 14, 2011 10:28 PM
Hola José Luis, ¿ya probaste asi?


oBrw:aCols[ nFor ]:bToolTip := {|oBrw,nRow,nCol,nKeyFlas| IF(oBrw:MouseRowPos(nRow)==oBrw:nRowSel .and. oBrw:MouseColPos(nCol)==oBrw:nColSel ,;
IF(cQryPCUO:num_leyenda > 0, str(cQryPCUO:num_leyenda),"Single"), ) }
Francisco J. Alegría P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql
Posts: 2064
Joined: Fri Jan 06, 2006 09:28 PM
Re: ToolTips en CELDA con XBROWSE...
Posted: Thu Dec 15, 2011 01:03 AM

Creo ya lo probe en una de esas tantas tiraderas de flecha, igual vuelvo a intentar y comento por si se da la solucion...gracias...saludos... :shock:

Dios no está muerto...



Gracias a mi Dios ante todo!
Posts: 1380
Joined: Fri Oct 14, 2005 01:28 PM
Re: ToolTips en CELDA con XBROWSE...
Posted: Thu Dec 15, 2011 12:42 PM
José:
Probé como indica Francisco y no funcionó, luego probé como vos lo escribiste inicialmente y funcionó correctamente.
Code (fw): Select all Collapse
:aCols[col_Origen]:bToolTip := {|oBrw,nRow,nCol,nKeyFlas| if( oBrw:MouseRowPos(nRow)==oBrw:nRowSel, ;
                                                                    "Dato de fila 1"+CRLF+"Dato de fila 2"+CRLF+"Dato de fila 3"+CRLF+"Dato de fila 4", ) }

Y muestra solo en la columna col_Origen (browse de 6 columnas)
No te puedo mostrar porque no me captura la imagen con el tooltip :-)
Uso FWH 1009
Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina
Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM
Re: ToolTips en CELDA con XBROWSE...
Posted: Thu Dec 15, 2011 07:56 PM

José Luis:

El siguiente ejemplo muestra el contenido de cada celda de una misma linea (linea seleccionada) FWH 10.06
Observaciones:
Trabaja únicamente sobre las columnas visibles del xBrowse.
Si das click o te mueves de fila, pero el cursor del mouse lo mueves sobre la misma columna, el tooltip no se presenta, tienes que mover el cursor momentáneamente a otra columna de la linea seleccionada, y luego posicionarte en la celda deseada.

FOR N:=1 TO LEN(oLbx:aCols)
oLbx:aCols[n]:bToolTip := {|oLbx,nRow,nCol,nKeyFlas| ;
IF(oLbx:MouseRowPos(nRow)==oLbx:nRowSel,;
if(!empty(oLbx:aCols[oLbx:MouseColPos(nCol)]:bStrData),;
oLbx:aCols[oLbx:MouseColPos(nCol)]:bStrData,nil),) }
NEXT

Espero sirva de guía para tu implementación.

Francisco J. Alegría P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql
Posts: 1380
Joined: Fri Oct 14, 2005 01:28 PM
Re: ToolTips en CELDA con XBROWSE...
Posted: Thu Dec 15, 2011 08:30 PM

disculpas... no lei con atención el primer mensaje; no se refieren al ejemplo que mencione

Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina

Continue the discussion