xbrowse and logic field

[Wanderson]

Hi, what the best way to show a logical field in xbrowse? I try this and get a execution error

oCol := oBrw:AddCol()
oCol:bStrData := { || ARQMOT->BLOQ }
oCol:cHeader := "BLOQUEADO"

thanks in advance.

[cnavarro]

Look

viewtopic.php?f=3&t=29601&p=167188&hilit=checkbox+xbrowse#p167355

Or find "checkbox xbrowse"

[Wanderson]

Look

viewtopic.php?f=3&t=29601&p=167188&hilit=checkbox+xbrowse#p167355

Or find "checkbox xbrowse"

Hi, thanks but i try this and still Error description: Error BASE/1111 Argument error: LEN

oCol := oBrw:AddCol()
oCol:AddResource( "CHECKOFF" )
oCol:AddResource( "CHECKON" )
oCol:bBmpData := { || IF((ARQMOT)->INTATIVO, 1,2 )}
oCol:bStrData := { || NIL }
oCol:cHeader := "BLOQUEIO"

[cnavarro]

Prueba como en el ejemplo que puso un compañero

Code: Select all  Expand view

          WITH OBJECT oLbx:aCols[3]
            :AddBmpFile(   "checkon.BMP")
            :AddBmpFile(   "checkoff.BMP")
            :bBmpData     := {|| IF( activi->estado, 1, 2) }
            :bStrData     := {|| IF( activi->estado, 'Si', 'No') }
            :blDClickData := {|o, v| ( activi->estado:= !activi->estado, oLbx:DrawSelect() ) }
          END