Place u_cst_xplistbar from advguicontrols.pbl\pbd on your window.
Open Event or Post Constructor Event (avoid loading items in the controls Constructor event):
//Declare variable to hold parent handle
Long ll_parent
//Add first group to control with a blue header
ll_parent = uo_xplistbar.of_AddGroup('General', 'Mail.ico', uo_xplistbar.SPECIAL)
//Add items to the group
uo_xplistbar.of_AddLink('Item One', 'Custom001!', ll_parent)
uo_xplistbar.of_AddLink('Item Two', 'Custom002!', ll_parent)
//Add second group to the control (no image)
ll_parent = uo_xplistbar.of_AddGroup('Group Two', '')
//Add items to second group
uo_xplistbar.of_AddLink('Item One', 'Average!', ll_parent)
uo_xplistbar.of_AddLink('Item Two', 'Custom005!', ll_parent)
uo_xplistbar.of_AddLine(ll_parent)
uo_xplistbar.of_AddLink('Item Three', 'Custom005!', ll_parent)
Copyright © 2023 Werysoft Inc.