How to use a dictionary instead of a ListBox.RowTagAt?

Hi,
In the MBS example “/MacOSX/NWPathMonitor Test”, the data (dim value As Variant) is stored in a ListBox.RowTag. How to store the data in a dictionary, instead of the rowTag, to be independent of the hierarchical ListBox in the example?

UtilModule > AddFolder(extends list as listbox, name as string, RowTag as Variant) :

list.RowTag(list.LastIndex) = RowTag  //now DesktopListBox.RowTagAt()

ListBox.ExpandRow event :

Dim value As Variant = Me.RowTagAt(row)
AddValue value

Thanks

2 posts - 2 participants

Read full topic