Dialog.menu icon flag

Hi,

I would like to add an icon next to each item.

Set dlg = DOpus.Dlg 
dlg.window = DOpus.Listers(0)
dlg.choices = DOpus.Create.Vector("Test 1", "Test 2", "-", "Test3")
dlg.menu = DOpus.Create.Vector(1, 0, 0, 0)
dlg.show

We have these flags to modify the appearance :
1 - bold (indicates the default item)
2 - checked (a checkmark will appear next to the item)
4 - radio (a radio button will appear next to the item)
8 - disabled (the user will not be able to select the item)

No flag to add icon ?

Maybe dlg.menu.icon = DOpus.Create.Vector(icon1, icon2, 0, icon4)

Thanks

Depending on what you want to do, you might be able to use a custom script dialog with a list view control as these have the ability to display icons for each item in the list.