Groups support in ListView

[Antonio Linares]

Groups support in ListView: (New in FWH 12.04)

Code: Select all  Expand view

function BuildListView( oListView, oImageList )

   oListView:SetImageList( oImageList )
   oListView:EnableGroupView()

   oListView:InsertGroup( "Items 1" )
   oListView:InsertGroup( "Items 2" )
   oListView:InsertGroup( "Items 3" )
   
   oListView:InsertItem( 0, "Console app", 0 ) // nImageIndex, prompt, nGroup
   
   oListView:InsertItem( 1, "Form based app", 1 )
   oListView:InsertItem( 1, "Form based dll", 1 )
   oListView:InsertItem( 2, "Another", 1 )
   
   oListView:InsertItem( 2, "Library", 2 )

return nil