FiveTech Software tech support forums

... := {|| IIF( oCust:MARRIED = .T., 1, 2 ) } oCol:bAlphaLevel := { || IF( oCust:DELETED(), 60, 255 ) } // alphalevel for bitmaps if deleted oCol:bStrData := { || NIL } oCol:nWidth := 70 regards Uwe :D

... cExt_Mar), cExt_Mar:Refresh() } oBrw:oFont := oFont2 oBrw:SetDolphin(cExt_Mar,.T.,.T.) oBrw:aCols[1]:cHeader := "Código" oBrw:aCols[1]:bStrData := { || cExt_Mar:cod_mar } oBrw:aCols[1]:nHeadStrAlign := AL_CENTER oBrw:aCols[1]:nDataStrAlign := AL_LEFT //LEFT oBrw:aCols[1]:nWidth := 100 ...

We keep recommending to use command syntax for creating XBrowse, if you want to use advanced features of XBrowse. Use of bStrData was deprecated many years back. For example, please consider this code:         aCol[ 6]:bStrData           := { || IF(oRsCxc:RecordCount() ...

... oBrw, cTab_Insumo) } oBrw:oFont := oFont2 oBrw:SetDolphin(cTab_Insumo,.T.,.T.) oBrw:aCols[1]:cHeader := "Código" oBrw:aCols[1]:bStrData := { || cTab_Insumo:cod_insumo } oBrw:aCols[1]:nHeadStrAlign := AL_CENTER oBrw:aCols[1]:nDataStrAlign := AL_LEFT //LEFT oBrw:aCols[1]:nWidth ...

When showing Unicode characters (2 and 3 superscript) in the xBrowse column, it looks strange. In addition to Unicode characters, some additional character is displayed.

oBrw:bStrData:={||HB_UTF8CHR(HexToNum(aRow[1]))}

Intenta modificando asi:
:aCols[4]:bStrData := {||If( Len( oBrw:aArrayData ) > 0, oBrw:aArrayData[ oBrw:nArrayAt, 4 ], 0 )}

... := '@!' oBrwcp:aCols[10]:nWidth := 16 oBrwcp:aCols[10]:nBtnWidth := 12 oBrwcp:aCols[10]:nEditType := EDIT_GET_BUTTON oBrwcp:aCols[10]:bStrData := {|| ''} oBrwcp:aCols[10]:bEditBlock := {|| Produto_Bonificar_Menos( oBrwcp, aHistoricoComprasProdutos ), NIL} oBrwcp:aCols[10]:bEditWhen ...

Please try changing bStrData as bEditValue. Kindly note that usage of bStrData was deprecated almost ten years back, i.e., from March 2008. Even earlier, bStrData was supposed to return a formatted string, though some tolerance is built ...

... oBrw2:SetDolphin(cExt_Rec1,.T.,.T.) // este ordena por numero oBrw2:aCols[1]:cHeader := "Nro."+CRLF+"Recepcion" oBrw2:aCols[1]:bStrData := { || Transform(cExt_Rec1:nro_rec,"999999") } oBrw2:aCols[1]:nHeadStrAlign := AL_CENTER oBrw2:aCols[1]:nDataStrAlign := AL_RIGHT ...

Hola Enrique: Yo lo hago de la siguiente manera y me funciona perfecto: // Col 7 oCol := oBrowse:AddCol() oCol:bStrData := { || Transform( ( oBoleta:caAlias )->PRESTAMO,"999,999,999.99" ) } oCol:cHeader := "Préstamo" oCol:nHeadStrAlign := 2 // Center oCol:nWidth ...

... := .T. oBrwPed:nHeaderHeight :=30 oBrwPed:nStretchCol := STRETCHCOL_LAST oBrwPed:cAlias := "VENDA" oCol := oBrwPed:AddCol() oCol:bStrData := { || VENDA->NUMERO } oCol:cHeader := "PEDIDO" oCol := oBrwPed:AddCol() oCol:bStrData := { || DTOC(VENDA->DATA)} oCol:cHeader ...

Y del código que quite deje

WITH OBJECT oBrw:aCols[ 3 ]
:bStrData := {|| cotexto(oRet:concepto) }
:nDataStrAlign := AL_LEFT
:nWidth := 330
END WITH
sin esto no funciona correctamente el campo memo

Luis

... @ 0, 05 XBROWSE oBrowse OF oDlg ; SIZE 315,200 PIXEL ; CURSOR oCursorBtn NOBORDER oBrowse:cAlias := "MV" oCol := oBrowse:AddCol() oCol:bStrData := { || Cf(MV->data) } oCol:cHeader := i18n( "Data" ) oCol:nWidth := 80 oCol := oBrowse:AddCol() oCol:bStrData := { || MV->attivita ...

my email: nageswaragunupudi [at] gmail [dot] com Some suggestions on creation of XBrowse: Creating columns using :AddCol(), :bStrData(), etc is obsolete and deprecated many years back. This way you will not be able to avail the full power and xbrowse. We recommend creating by command ...

... oBrowse:AddCol() oCol:nWidth := 80 oCol:cHeader := "Dia" oCol:oHeaderFont := oSistema():oFonte4 oCol:nHeadStrAlign := AL_CENTER oCol:bStrData := { || oOcorrencia:dia_ocorrencia } oCol:oDataFont := oSistema():oFonte3 oCol:nDataStrAlign := AL_CENTER oCol:cFooter := "Registros:" ...