Tree on xBrowse

[Natter]

Hi, all !

oBrw:SetTree(Crt_Tre())

function Crt_Tre

TREE oTree
.....................
TREEITEM dim[st][2]
.....................
ENDTREE
return oTree

There xbrose with Tree. As the processing is done on the Tree lclick/dblclick/press Enter, etc. ?

[cnavarro]

viewtopic.php?f=3&t=29853&p=169759&hilit=xbrowse+tree#p169687

[Natter]

Thanks for your help, but I found the handling capabilities lclick/dblclick on Tree xBrose

[Natter]

Thanks, understood - blDClickData

[Natter]

As the tree elements of one level to show the different icons ?
As the tree element is TTreeItem, then you need to specify hBmpOpen and hBmpClose. How can I get the hendler of icon from the resource ?

[nageswaragunupudi]

As the tree element is TTreeItem, then you need to specify hBmpOpen and hBmpClose.

NO

You can specify images for Open, Close, NoChild this way

Code: Select all  Expand view

oBrw:aCols[ 1 ]:AddBitmap( { <OpenImge>, <CloseImage>, <NoChildImage> } )

<OpenImage>, <CloseImage>, <NoChildImage> can be any of Bitmap file name, Any Image file name or Resource.

[Natter]

I tried AddBitmap and all the elements of the next level will appear the same icons, but I need different

[nageswaragunupudi]

First, hope the issue of resources is clarified.

How to have different images for the last level.

Code: Select all  Expand view

oBrw:aCols[ 1 ]:AddBitmap( { <open>, <close>, <img3>, <img4>, .......... } )

oBrw:aCols[ 1 ]:bBmpData := { || If( oBrw:oTreeItem:oTree == nil, ;
                                 If( <cond1>, 3, If( <cond2>, 4 , 5 ) ), ; // This is the line for you to expand
                                 If( oBrw:oTreeItem:lOpened, 1 , 2 ) ) }
 

[Natter]

Understood, Mr.Rao, thank you !