13:
Can I display items one below to other

Procedure OnCreate
	Forward Send OnCreate
	Set ComFormat to "(1/2):64,(3/4):64"
	Variant voItem
	Get ComItem 1 to voItem
	Handle hoItem
	Get Create (RefClass(cComItem)) to hoItem
	Set pvComObject of hoItem to voItem
		Set ComCaption of hoItem to "Item <off 4><b>A"
	Send Destroy to hoItem
	Variant voItem1
	Get ComItem 2 to voItem1
	Handle hoItem1
	Get Create (RefClass(cComItem)) to hoItem1
	Set pvComObject of hoItem1 to voItem1
		Set ComCaption of hoItem1 to "Item <off 4><b>B"
	Send Destroy to hoItem1
	Variant voItem2
	Get ComItem 3 to voItem2
	Handle hoItem2
	Get Create (RefClass(cComItem)) to hoItem2
	Set pvComObject of hoItem2 to voItem2
		Set ComCaption of hoItem2 to "Item <off 4><b>C"
	Send Destroy to hoItem2
	Variant voItem3
	Get ComItem 4 to voItem3
	Handle hoItem3
	Get Create (RefClass(cComItem)) to hoItem3
	Set pvComObject of hoItem3 to voItem3
		Set ComCaption of hoItem3 to "Item <off 4><b>D"
	Send Destroy to hoItem3
End_Procedure
12:
How can I add a separator item

Procedure OnCreate
	Forward Send OnCreate
	Set ComFormat to "1,2,-1,3,4"
End_Procedure
11:
Is it possible to disable an item

Procedure OnCreate
	Forward Send OnCreate
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Set ComBackColor to (RGB(255,255,255))
	Set ComFormat to "1,2,3"
	Variant voItem
	Get ComItem 1 to voItem
	Handle hoItem
	Get Create (RefClass(cComItem)) to hoItem
	Set pvComObject of hoItem to voItem
		Set ComCaption of hoItem to "<img>1</img>"
	Send Destroy to hoItem
	Variant voItem1
	Get ComItem 2 to voItem1
	Handle hoItem1
	Get Create (RefClass(cComItem)) to hoItem1
	Set pvComObject of hoItem1 to voItem1
		Set ComCaption of hoItem1 to "<img>2</img>"
	Send Destroy to hoItem1
	Variant voItem2
	Get ComItem 3 to voItem2
	Handle hoItem2
	Get Create (RefClass(cComItem)) to hoItem2
	Set pvComObject of hoItem2 to voItem2
		Set ComCaption of hoItem2 to "<img>3</img>Disabled"
		Set ComEnabled of hoItem2 to False
	Send Destroy to hoItem2
End_Procedure
10:
Is it possible to change the item's caption/image when user hovers the cursor

// Occurs when the mouse enters the part.
Procedure OnComMouseIn Variant   llID
	Forward Send OnComMouseIn llID
	Variant voItem
	Get ComItem llID to voItem
	Handle hoItem
	Get Create (RefClass(cComItem)) to hoItem
	Set pvComObject of hoItem to voItem
		Set ComCaption of hoItem to "hover"
	Send Destroy to hoItem
End_Procedure

// Occurs when the mouse exists the part.
Procedure OnComMouseOut Variant   llID
	Forward Send OnComMouseOut llID
	Variant voItem1
	Get ComItem llID to voItem1
	Handle hoItem1
	Get Create (RefClass(cComItem)) to hoItem1
	Set pvComObject of hoItem1 to voItem1
		Set ComCaption of hoItem1 to llID
	Send Destroy to hoItem1
End_Procedure

Procedure OnCreate
	Forward Send OnCreate
	Set ComFormat to "1,2,3,4"
End_Procedure
9:
Does your control support tooltip for items

Procedure OnCreate
	Forward Send OnCreate
	Set ComFormat to "(1/2),3"
	Variant voItem
	Get ComItem 1 to voItem
	Handle hoItem
	Get Create (RefClass(cComItem)) to hoItem
	Set pvComObject of hoItem to voItem
		Set ComCaption of hoItem to "Item <b>1"
		Set ComToolTip of hoItem to "This is a bit of text that's shown when cursor hovers the item"
	Send Destroy to hoItem
	Variant voItem1
	Get ComItem 2 to voItem1
	Handle hoItem1
	Get Create (RefClass(cComItem)) to hoItem1
	Set pvComObject of hoItem1 to voItem1
		Set ComCaption of hoItem1 to "Item <b>2"
	Send Destroy to hoItem1
	Variant voItem2
	Get ComItem 3 to voItem2
	Handle hoItem2
	Get Create (RefClass(cComItem)) to hoItem2
	Set pvComObject of hoItem2 to voItem2
		Set ComCaption of hoItem2 to "Item <b>3"
	Send Destroy to hoItem2
End_Procedure
8:
Is it possible to add an anchor element, similar to a link into a webpage

// Occurs when an anchor element is clicked.
Procedure OnComAnchorClick String   llAnchorID String   llOptions
	Forward Send OnComAnchorClick llAnchorID llOptions
	Showln llAnchorID
End_Procedure

Procedure OnCreate
	Forward Send OnCreate
	Set ComBackColor to (RGB(255,255,255))
	Set ComFormat to ""<a a1>link</a>":32,1,2,3"
End_Procedure
7:
How can I change the background of the hovering item

Procedure OnCreate
	Forward Send OnCreate
	Variant voAppearance
	Get ComVisualAppearance to voAppearance
	Handle hoAppearance
	Get Create (RefClass(cComAppearance)) to hoAppearance
	Set pvComObject of hoAppearance to voAppearance
		Get ComAdd of hoAppearance 1 "c:\exontrol\images\normal.ebn" to Nothing
	Send Destroy to hoAppearance
	Set ComBackground OLEexToolBarButtonHotBackColor to |CI$1000000
	Set ComFormat to "1,2,3,4"
End_Procedure
6:
Can I display an item aligned to the right

Procedure OnCreate
	Forward Send OnCreate
	Set ComFormat to "1,2,|,3:64"
	Variant voItem
	Get ComItem 3 to voItem
	Handle hoItem
	Get Create (RefClass(cComItem)) to hoItem
	Set pvComObject of hoItem to voItem
		Set ComCaption of hoItem to "< <b>right</b> >"
	Send Destroy to hoItem
End_Procedure
5:
Can I display pictures in the toolbar

Procedure OnCreate
	Forward Send OnCreate
	Set ComHTMLPicture "pic1" to "c:\exontrol\images\card.png"
	Set ComHTMLPicture "pic2" to "c:\exontrol\images\diary.png"
	Set ComFormat to "1,2,3"
	Variant voItem
	Get ComItem 1 to voItem
	Handle hoItem
	Get Create (RefClass(cComItem)) to hoItem
	Set pvComObject of hoItem to voItem
		Set ComCaption of hoItem to "<img>pic1:48</img>"
	Send Destroy to hoItem
	Variant voItem1
	Get ComItem 2 to voItem1
	Handle hoItem1
	Get Create (RefClass(cComItem)) to hoItem1
	Set pvComObject of hoItem1 to voItem1
		Set ComCaption of hoItem1 to "<img>pic2:30</img>"
	Send Destroy to hoItem1
	Variant voItem2
	Get ComItem 3 to voItem2
	Handle hoItem2
	Get Create (RefClass(cComItem)) to hoItem2
	Set pvComObject of hoItem2 to voItem2
		Set ComCaption of hoItem2 to "<img>pic1:24</img> Picture"
	Send Destroy to hoItem2
End_Procedure
4:
Can I display icons in the toolbar

Procedure OnCreate
	Forward Send OnCreate
	Send ComImages "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	Set ComBackColor to (RGB(255,255,255))
	Set ComFormat to "1,2,3"
	Variant voItem
	Get ComItem 1 to voItem
	Handle hoItem
	Get Create (RefClass(cComItem)) to hoItem
	Set pvComObject of hoItem to voItem
		Set ComCaption of hoItem to "<img>1</img>"
	Send Destroy to hoItem
	Variant voItem1
	Get ComItem 2 to voItem1
	Handle hoItem1
	Get Create (RefClass(cComItem)) to hoItem1
	Set pvComObject of hoItem1 to voItem1
		Set ComCaption of hoItem1 to "<img>2</img>"
	Send Destroy to hoItem1
	Variant voItem2
	Get ComItem 3 to voItem2
	Handle hoItem2
	Get Create (RefClass(cComItem)) to hoItem2
	Set pvComObject of hoItem2 to voItem2
		Set ComCaption of hoItem2 to "<img>3</img>Icon"
	Send Destroy to hoItem2
End_Procedure
3:
How can I get ride of the top-bottom lines

Procedure OnCreate
	Forward Send OnCreate
	Set ComAppearance to OLEEtched
	Set ComBackColor to (RGB(255,255,255))
	Set ComFormat to "1,-1,2"
	Variant voItem
	Get ComItem 1 to voItem
	Handle hoItem
	Get Create (RefClass(cComItem)) to hoItem
	Set pvComObject of hoItem to voItem
		Set ComCaption of hoItem to "Exit"
	Send Destroy to hoItem
	Variant voItem1
	Get ComItem 2 to voItem1
	Handle hoItem1
	Get Create (RefClass(cComItem)) to hoItem1
	Set pvComObject of hoItem1 to voItem1
		Set ComCaption of hoItem1 to "Item <b>A\r\nItem <b>A#1\r\nItem <b>B#2\r\nItem <b>C#3"
	Send Destroy to hoItem1
End_Procedure
2:
How can I display a drop-down panel

// Notifies once the user clicks the item.
Procedure OnComSelect Variant   llID Variant   llSelectedID
	Forward Send OnComSelect llID llSelectedID
	Showln "Select" llSelectedID
End_Procedure

Procedure OnCreate
	Forward Send OnCreate
	Set ComFormat to "1,-1,2"
	Variant voItem
	Get ComItem 1 to voItem
	Handle hoItem
	Get Create (RefClass(cComItem)) to hoItem
	Set pvComObject of hoItem to voItem
		Set ComCaption of hoItem to "Exit"
	Send Destroy to hoItem
	Variant voItem1
	Get ComItem 2 to voItem1
	Handle hoItem1
	Get Create (RefClass(cComItem)) to hoItem1
	Set pvComObject of hoItem1 to voItem1
		Set ComCaption of hoItem1 to "Item <b>A\r\nItem <b>A#1\r\nItem <b>B#2\r\nItem <b>C#3"
	Send Destroy to hoItem1
End_Procedure
1:
How can I add / display items with the toolbar

// Notifies once the user clicks the item.
Procedure OnComSelect Variant   llID Variant   llSelectedID
	Forward Send OnComSelect llID llSelectedID
	Variant v
	Variant voItem
	Get ComItem llID to voItem
	Handle hoItem
	Get Create (RefClass(cComItem)) to hoItem
	Set pvComObject of hoItem to voItem
		Get ComCaption of hoItem to v
	Send Destroy to hoItem
	Showln "Select" v
End_Procedure

Procedure OnCreate
	Forward Send OnCreate
	Set ComFormat to "1,-1,2,3"
	Variant voItem1
	Get ComItem 1 to voItem1
	Handle hoItem1
	Get Create (RefClass(cComItem)) to hoItem1
	Set pvComObject of hoItem1 to voItem1
		Set ComCaption of hoItem1 to "Exit"
	Send Destroy to hoItem1
	Variant voItem2
	Get ComItem 2 to voItem2
	Handle hoItem2
	Get Create (RefClass(cComItem)) to hoItem2
	Set pvComObject of hoItem2 to voItem2
		Set ComCaption of hoItem2 to "Item <b>A"
	Send Destroy to hoItem2
	Variant voItem3
	Get ComItem 3 to voItem3
	Handle hoItem3
	Get Create (RefClass(cComItem)) to hoItem3
	Set pvComObject of hoItem3 to voItem3
		Set ComCaption of hoItem3 to "Item <b>B"
	Send Destroy to hoItem3
End_Procedure