FiveTech Support Forums

I wish add bitmaps only for column number 1 and coloumn number 3
I try with

before create the xbrowse

oApp():oGrid := TXBrWin7():New( oApp():oDlg )
oApp():nTop := 00
oApp():nLeft := nSplit+2
oApp():nBottom := ::nGridBottom
oApp():nRight := ::nGridRight


then I list the fields I want on the table

aBrowse := { { { || HW->Laboratory }, i18n("Aula/lab"), 150 },;
{ { || HW->Inventario }, i18n("Inventario"), 90 },;
{ { || HW->type }, i18n("Tipo"), 90 },;
{ { || HW->Marca }, i18n("Marca"), 90 },;
{ { || HW->Modello }, i18n("Modello"), 90 },;
{ { || HW->Seriale }, i18n("Seriale"), 150 } }

FOR i := 1 TO Len(aBrowse)
oCol := oApp():AddCol()
oCol:bStrData := aBrowse[ i, 1 ]
oCol:cHeader := aBrowse[ i, 2 ]
oCol:nWidth := aBrowse[ i, 3 ]
NEXT

then I wish insert bitmaps ( for header and field) for column 1

WITH OBJECT oApp():aCols[1]
oCol:AddResource("sort3")
oCol:AddResource("sort4")
oCol:AddResource( 'TREE_AULE')
oCol:bBmpData := { || 3 }
oCol:nHeadBmpNo := 1
oCol:nHeadBmpAlign := AL_RIGHT
oCol:bStrData := { || HW->Laboratory}
oCol:cHeader := "Aula/lab"
END

then I wish insert bitmaps ( for header and field) for column 1

WITH OBJECT oApp():aCols[3]
oCol:AddResource("sort1")
oCol:AddResource("sort2")
oCol:AddResource( 'TREE_HARD')
oCol:AddResource( 'TREE_LAPTOP' )
oCol:AddResource( 'TREE_PRINTERS' )
oCol:AddResource( 'TREE_MONITOR' )
oCol:AddResource( 'TREE_KEYBOARD' )
oCol:AddResource( 'TREE_SWITCH' )
oCol:AddResource( 'TREE_MOUSE' )
oCol:AddResource( 'TREE_POCKET' )
oCol:AddResource( 'TREE_SCANNER' )
oCol:AddResource( 'TREE_PROJECT' )
oCol:AddResource( 'TREE_VCAM' )
oCol:AddResource( 'TREE_FCAM' )
oCol:AddResource( 'TREE_CAMERA' )
oCol:bBmpData := { || AScan( aItems, Trim( HW->type )) + 2 }
oCol:nHeadBmpNo := 2
oCol:nHeadBmpAlign := AL_RIGHT
END


but the procedure make a bad table :





there's not the bitmaps on first column and on the last column show bitmaps but they must be on third column instead on text

there is something of bad but I not Understand where is the error , can you help me please ?