Hola, es mi primera consulta al Foro, el cual hasta aca me ha sido de gran utilidad, pero esto que quiero hacer, no lo vi y no se siquiera si se puede.
La pregunta es la siguiente:
Se puede alternar en una misma columna, texto e imagnes (pequeños BMPs) en un XBrowse?, si es así, ¿como?, he estado intentando pero no lo he conseguido.
Desde ya muchas gracias.
Uso FWH 9.12
Alternar texto e imagenes
- FranciscoA
- Posts: 1964
- Joined: Fri Jul 18, 2008 1:24 am
- Location: Chinandega, Nicaragua, C.A.
Re: Alternar texto e imagenes
Hola, aquí te dejo codigo ejemplo: FWH1006
WITH OBJECT oBrw
:Nombre:cHeader := "NOMBRE DEL HUESPED"
For n := 1 to len(:aCols)
if upper(:aCols[n]:cHeader) = "NOMBRE"
:aCols[n]:AddResource( "Aro" )
:aCols[n]:AddResource( "BloqueoEsp" )
:aCols[n]:bBmpData := {|| if( !empty((cAlias)->Bloqueo),1, if( (cAlias)->Estado="BLOQUEADA",2,0)) }
:aCols[n]:lBmpStretch := .t.
:aCols[n]:lBmpTransparent := .T.
:aCols[n]:nDataBmpAlign := AL_LEFT
endif
......
......
Next
END
Saludos.
WITH OBJECT oBrw
:Nombre:cHeader := "NOMBRE DEL HUESPED"
For n := 1 to len(:aCols)
if upper(:aCols[n]:cHeader) = "NOMBRE"
:aCols[n]:AddResource( "Aro" )
:aCols[n]:AddResource( "BloqueoEsp" )
:aCols[n]:bBmpData := {|| if( !empty((cAlias)->Bloqueo),1, if( (cAlias)->Estado="BLOQUEADA",2,0)) }
:aCols[n]:lBmpStretch := .t.
:aCols[n]:lBmpTransparent := .T.
:aCols[n]:nDataBmpAlign := AL_LEFT
endif
......
......
Next
END
Saludos.
Francisco J. Alegría P.
Chinandega, Nicaragua.
Fwxh1204-MySql-TMySql
Chinandega, Nicaragua.
Fwxh1204-MySql-TMySql
Re: Alternar texto e imagenes
Gracias por la respuesta. Si bien, no lo resolvi de ese modo, me sirvio mucho como guia y finalmente lo hice funcionar de otra manera. Cuando lo tenga listo, lo posteo para la posteridad.
Gracias.
Leandro.
Gracias.
Leandro.