Mostrar un BitMap en una columna del xBrowse? (SOLUCIONADO)

Armando

Posts: 3358

Joined: Fri Oct 07, 2005 08:20 PM

Mostrar un BitMap en una columna del xBrowse? (SOLUCIONADO)
Posted: Tue Dec 10, 2024 01:58 AM

Amigos del foro:

Tengo cinco diferentes bitmaps, Bit1,Bit2,Bit3,Bit4 y Bit5, necesito mostrar uno de los cinco bitmaps

en una columna de un XBrowse dependiendo de una condición, algún pequeño ejemplo o link a uno?

Algo como

DO CASE

CASE lCondicion1

   Muestra Bit1

ENDCASE

Algo así

Saludos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero

sysctrl2

Posts: 1144

Joined: Mon Feb 05, 2007 07:15 PM

Re: Mostrar un BitMap en una columna del xBrowse?
Posted: Tue Dec 10, 2024 02:43 AM

aqui una idea

Code (fw): Select all Collapse

  WITH OBJECT oBrw1:aCols[1]

    :AddResource("UNO")
    :AddResource("DOS")
    :bBmpData     := {|| IF( oBrw1:aArrayData[ oBrw1:nArrayAt ][1], 1, 2) }

END

Cesar Cortes Cruz

SysCtrl Software

Mexico

' Sin +- FWH es mejor "

Armando

Posts: 3358

Joined: Fri Oct 07, 2005 08:20 PM

Re: Mostrar un BitMap en una columna del xBrowse?
Posted: Tue Dec 10, 2024 02:14 PM

Paisano:

Gracias por la sugerencia, solo veo que será posible hasta dos bitmaps y yo tengo hasta 5 posibles.

Saludos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: Mostrar un BitMap en una columna del xBrowse?
Posted: Tue Dec 10, 2024 02:21 PM

Tal vez:

Code (fw): Select all Collapse

   oBrw:aCols[nn]:AddResource( "RED(16x16)" )

Regards, saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

leandro

Posts: 1816

Joined: Wed Oct 26, 2005 02:49 PM

Re: Mostrar un BitMap en una columna del xBrowse?
Posted: Tue Dec 10, 2024 02:34 PM

Solo una idea :D

Code (fw): Select all Collapse

  WITH OBJECT oBrw1:aCols[1]

    :AddResource("UNO")
    :AddResource("DOS")
    :AddResource("TRES")
    :AddResource("CUATRO")
    :AddResource("CINCO")
    :AddResource("SEIS")
    :bBmpData     := {|| cualbitmap( oBrw1:aArrayData[ oBrw1:nArrayAt ]["elcampo"]) }

END

funcion cualbitmap(uVar)
Local nBmp

if uVar=="UNO"
  nBmp := 1
elseif uVar=="DOS"
  nBmp := 2
elseif uVar=="TRES"
  nBmp := 3
elseif uVar=="CUATRO"
  nBmp := 4
elseif uVar=="CINCO"
  nBmp := 5
endif
return nBmp

Saludos
LEANDRO AREVALO
Bogotá (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com

[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 25.01 ] [ xHarbour 64 bits) ]

sysctrl2

Posts: 1144

Joined: Mon Feb 05, 2007 07:15 PM

Re: Mostrar un BitMap en una columna del xBrowse?
Posted: Tue Dec 10, 2024 05:01 PM

:D :D :D
shi

Cesar Cortes Cruz

SysCtrl Software

Mexico

' Sin +- FWH es mejor "

Armando

Posts: 3358

Joined: Fri Oct 07, 2005 08:20 PM

Re: Mostrar un BitMap en una columna del xBrowse?
Posted: Wed Dec 11, 2024 12:59 AM

Paisano y Leandro, Leandro y paisano:

Gracias a su orientación ha quedado resuelto.

Muchas gracias a ambos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero

sysctrl2

Posts: 1144

Joined: Mon Feb 05, 2007 07:15 PM

Re: Mostrar un BitMap en una columna del xBrowse? (SOLUCIONADO)
Posted: Wed Dec 11, 2024 11:31 PM

Paisano Armando tienes WhatsApp o Skype ?

saludos !

Cesar Cortes Cruz

SysCtrl Software

Mexico

' Sin +- FWH es mejor "

Armando

Posts: 3358

Joined: Fri Oct 07, 2005 08:20 PM

Re: Mostrar un BitMap en una columna del xBrowse? (SOLUCIONADO)
Posted: Thu Dec 12, 2024 04:55 AM

Paisa:

Tengo ambos.

Saludos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero

FiveTech Support Forums

Continue the discussion