176:
How can I control the height of the control, so no scroll is required to view all items

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Font->Size = TVariant(long(6));
ExContextMenu1->MenuAppearance = Excontextmenulib_tlb::MenuAppearanceEnum::exMenuNormal;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	OutputDebugString( PChar(var_Items->VisibleItemsCount) );
	var_Items->VisibleItemsCount = 255;
	var_Items->ToString = L"1,2,3,4,5,6,7,8,9,10,11,12,13";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

175:
How do I specify the control's height (method 3)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item 1",TNoParam(),TNoParam())->ItemHeight = 24;
	var_Items->Add(L"Item 2",TNoParam(),TNoParam())->ItemHeight = 24;
	var_Items->Add(L"Item 3",TNoParam(),TNoParam())->ItemHeight = 24;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

174:
How do I specify the control's height (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item 1",TNoParam(),TNoParam())->Padding = L"0,4,0,4";
	var_Items->Add(L"Item 2",TNoParam(),TNoParam())->Padding = L"0,4,0,4";
	var_Items->Add(L"Item 3",TNoParam(),TNoParam())->Padding = L"0,4,0,4";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

173:
How do I specify the control's height (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Font->Size = TVariant(long(12));
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item 1",TNoParam(),TNoParam());
	var_Items->Add(L"Item 2",TNoParam(),TNoParam());
	var_Items->Add(L"Item 3",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

172:
How can I change the visual appearance of the progress bar

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum(0x104)] = 0x1000000;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Progress",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditProgress;
		var_item->EditWidth = -128;
		var_item->set_EditValue(TVariant(25));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

171:
How can I change the progress's color

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum(0x104)] = RGB(255,0,0);
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Progress",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditProgress;
		var_item->EditWidth = -128;
		var_item->set_EditValue(TVariant(25));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

170:
I am using the Item.Visible property on False to hide the item, but the editor is still visible

// CheckItem event - Occurs when the user checks the item.
void __fastcall TForm1::ExContextMenu1CheckItem(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	Excontextmenulib_tlb::IItemPtr var_item = ExContextMenu1->Items->get_item(TVariant(1000));
		var_item->Visible = true;
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditReadOnly | Excontextmenulib_tlb::AllowEditEnum::exItemEditProgress;
	ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());
}

// UncheckItem event - Occurs when the user unchecks the item.
void __fastcall TForm1::ExContextMenu1UncheckItem(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	Excontextmenulib_tlb::IItemPtr var_item = ExContextMenu1->Items->get_item(TVariant(1000));
		var_item->Visible = false;
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemDisableEdit;
	ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"Visible",TNoParam(),TNoParam());
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"",TNoParam(),TNoParam());
				var_item1->Check = true;
				var_item1->Checked = true;
			Excontextmenulib_tlb::IItemPtr var_item2 = var_Items1->Add(L"Item 2",TNoParam(),TVariant(1000));
				var_item2->ItemHeight = 18;
				var_item2->Caption = L"Percent";
				var_item2->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditReadOnly | Excontextmenulib_tlb::AllowEditEnum::exItemEditProgress;
				var_item2->set_EditValue(TVariant(50));
				var_item2->Visible = true;
			var_Items1->Add(L"Visible",TNoParam(),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

169:
How can I change the color of a disabled item

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Disabled",TVariant(2),TVariant(0));
		var_item->ForeColor = RGB(255,0,0);
		var_item->Items->Add(L"",TNoParam(),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
	var_Items->Add(L"Disabled",TNoParam(),TNoParam())->Enabled = false;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

168:
Microsoft Windows 8.1 - Ribbon Like

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->MenuAppearance = Excontextmenulib_tlb::MenuAppearanceEnum::exMenuNormal;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->ToString = L"[id=0][group=0x03](),[id=-20][bg=0x01000000][group=0x03][itemspad=4,4,4,4]([id=9000])";
	Excontextmenulib_tlb::IItemsPtr var_Items1 = var_Items->get_item(TVariant(0))->Items;
		var_Items1->Add(L"",TVariant(0),TVariant(0))->Padding = L"8,0,0,0";
		Excontextmenulib_tlb::IItemPtr var_item3 = var_Items1->Add(L"New Page",TNoParam(),TNoParam());
			var_item3->ToString = TVariant(String("[id=0][typ=2][chk=1][spchk=-1][show=1][grp=10][bghot=0x12000000][bgsel=0x11000000][bgselhot=0x14000000][group=0x03][tab=9000][p") +
"ad=4,0,4,0][popupoffset=-4,-1]([id=0][group=0x03])");
			var_item3->ID = 200;
			var_item3->Caption = L"Page1";
			Excontextmenulib_tlb::IItemPtr var_item = var_item3->Items->Add(L"New Group",TNoParam(),TNoParam());
				var_item->ToString = L"[id=0][group=0x03][itemspad=4,4,4,18][itemsbg=0x02000000][itemsbghot=0x04000000]()";
				var_item->Caption = L"<b><font ;14>A";
				Excontextmenulib_tlb::IItemsPtr var_Items2 = var_item->Items;
					var_Items2->BackgroundExt = L"bottom[16,text=`<fgcolor A0A0A0><font ;8>Horizontal`,align=0x11]";
					Excontextmenulib_tlb::IItemPtr var_item1 = var_Items2->Add(L"",TVariant(2),TNoParam());
						var_item1->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupEqualWidth | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
						var_item1->Caption = L"";
						Excontextmenulib_tlb::IItemsPtr var_Items3 = var_item1->Items;
							Excontextmenulib_tlb::IItemPtr var_item2 = var_Items3->Add(L"R1",TNoParam(),TNoParam());
								var_item2->RadioGroup = 100;
								var_item2->Radio = true;
								var_item2->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemHighlight;
								var_item2->Checked = false;
							Excontextmenulib_tlb::IItemPtr var_item4 = var_Items3->Add(L"R2",TNoParam(),TNoParam());
								var_item4->RadioGroup = 100;
								var_item4->Radio = true;
								var_item4->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemHighlight;
								var_item4->Checked = true;
							Excontextmenulib_tlb::IItemPtr var_item5 = var_Items3->Add(L"R3",TNoParam(),TNoParam());
								var_item5->RadioGroup = 100;
								var_item5->Radio = true;
								var_item5->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemHighlight;
								var_item5->Checked = false;
			var_item1 = var_item3->Items->Add(L"New Group",TNoParam(),TNoParam());
				var_item1->ToString = L"[id=0][group=0x03][itemspad=4,4,4,18][itemsbg=0x02000000][itemsbghot=0x04000000]()";
				var_item1->Caption = L"<b><font ;14>B";
				Excontextmenulib_tlb::IItemsPtr var_Items4 = var_item1->Items;
					var_Items4->BackgroundExt = L"bottom[16,text=`<fgcolor A0A0A0><font ;8>Vertical`,align=0x11]";
					Excontextmenulib_tlb::IItemPtr var_item6 = var_Items4->Add(L"",TVariant(2),TNoParam());
						var_item6->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupVertical | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupEqualHeight | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
						var_item6->Caption = L"";
						Excontextmenulib_tlb::IItemsPtr var_Items5 = var_item6->Items;
							Excontextmenulib_tlb::IItemPtr var_item7 = var_Items5->Add(L"C1",TNoParam(),TNoParam());
								var_item7->Check = true;
								var_item7->Checked = true;
							Excontextmenulib_tlb::IItemPtr var_item8 = var_Items5->Add(L"C2",TNoParam(),TNoParam());
								var_item8->Check = true;
								var_item8->Checked = false;
							Excontextmenulib_tlb::IItemPtr var_item9 = var_Items5->Add(L"C3",TNoParam(),TNoParam());
								var_item9->Check = true;
								var_item9->Checked = true;
			var_item3->Items->Add(L"",TVariant(0),TVariant(0))->Padding = L"4,0,0,0";
			var_item2 = var_item3->Items->Add(L"New Group",TNoParam(),TNoParam());
				var_item2->ToString = L"[id=0][group=0x03][itemspad=4,4,4,18][itemsbg=0x02000000][itemsbghot=0x04000000]()";
				var_item2->Caption = L"";
				Excontextmenulib_tlb::IItemsPtr var_Items6 = var_item2->Items;
					var_Items6->BackgroundExt = L"bottom[16,text=`<fgcolor A0A0A0><font ;8>Mixt`,align=0x11]";
					Excontextmenulib_tlb::IItemPtr var_item10 = var_Items6->Add(L"",TVariant(0),TNoParam());
						var_item10->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditVertical | Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
						var_item10->ItemHeight = 76;
						var_item10->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
						var_item10->set_EditValue(TVariant(25));
					Excontextmenulib_tlb::IItemPtr var_item11 = var_Items6->Add(L"",TVariant(2),TNoParam());
						var_item11->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupVertical | Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
						var_item11->Caption = L"";
						Excontextmenulib_tlb::IItemsPtr var_Items7 = var_item11->Items;
							Excontextmenulib_tlb::IItemPtr var_item12 = var_Items7->Add(L"",TVariant(2),TNoParam());
								var_item12->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
								Excontextmenulib_tlb::IItemsPtr var_Items8 = var_item12->Items;
									Excontextmenulib_tlb::IItemPtr var_item13 = var_Items8->Add(L"Button1",TVariant(2),TNoParam());
										var_item13->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsSelectButtonBottom | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize;
										Excontextmenulib_tlb::IItemsPtr var_Items9 = var_item13->Items;
											var_Items9->Add(L"Item 1",TNoParam(),TNoParam());
											var_Items9->Add(L"Item 2",TNoParam(),TNoParam());
											var_Items9->Add(L"Item 3",TNoParam(),TNoParam());
									var_Items8->Add(L"",TVariant(0),TVariant(0))->Padding = L"4,0,0,0";
									Excontextmenulib_tlb::IItemPtr var_item14 = var_Items8->Add(L"Button2",TVariant(2),TNoParam());
										var_item14->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsSelectButtonBottom | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize;
										Excontextmenulib_tlb::IItemsPtr var_Items10 = var_item14->Items;
											var_Items10->Add(L"Item 4",TNoParam(),TNoParam());
											var_Items10->Add(L"Item 5",TNoParam(),TNoParam());
											var_Items10->Add(L"Item 6",TNoParam(),TNoParam());
							Excontextmenulib_tlb::IItemPtr var_item15 = var_Items7->Add(L"Popup",TVariant(2),TNoParam());
								var_item15->Alignment = Excontextmenulib_tlb::AlignmentEnum::exCenter;
								Excontextmenulib_tlb::IItemsPtr var_Items11 = var_item15->Items;
									var_Items11->Add(L"Item 7",TNoParam(),TNoParam())->Check = true;
									var_Items11->Add(L"Item 8",TNoParam(),TNoParam());
									Excontextmenulib_tlb::IItemsPtr var_Items12 = var_Items11->Add(L"Item 9",TVariant(2),TNoParam())->Items;
										var_Items12->Add(L"Item 10",TNoParam(),TNoParam());
										var_Items12->Add(L"Item 11",TNoParam(),TNoParam());
										var_Items12->Add(L"Item 12",TNoParam(),TNoParam());
		var_item4 = var_Items1->Add(L"New Page",TNoParam(),TNoParam());
			var_item4->ToString = TVariant(String("[id=0][typ=2][chk=0][spchk=-1][show=1][grp=10][bghot=0x12000000][bgsel=0x11000000][bgselhot=0x14000000][group=0x03][tab=9000][p") +
"ad=4,0,4,0][popupoffset=-4,-1]([id=0][group=0x03])");
			var_item4->ID = 300;
			var_item4->Caption = L"Page2";
			Excontextmenulib_tlb::IItemsPtr var_Items13 = var_item4->Items;
				Excontextmenulib_tlb::IItemPtr var_item16 = var_Items13->Add(L"S1",TNoParam(),TNoParam());
					var_item16->ItemHeight = 88;
					var_item16->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditVertical | Excontextmenulib_tlb::AllowEditEnum::exItemEditSpin | Excontextmenulib_tlb::AllowEditEnum::exItemEditProgress;
					var_item16->set_EditValue(TVariant(25));
				Excontextmenulib_tlb::IItemPtr var_item17 = var_Items13->Add(L"S2",TNoParam(),TNoParam());
					var_item17->ItemHeight = 88;
					var_item17->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditVertical | Excontextmenulib_tlb::AllowEditEnum::exItemEditSpin | Excontextmenulib_tlb::AllowEditEnum::exItemEditProgress;
					var_item17->set_EditValue(TVariant(50));
				Excontextmenulib_tlb::IItemPtr var_item18 = var_Items13->Add(L"S3",TNoParam(),TNoParam());
					var_item18->ItemHeight = 88;
					var_item18->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditVertical | Excontextmenulib_tlb::AllowEditEnum::exItemEditSpin | Excontextmenulib_tlb::AllowEditEnum::exItemEditProgress;
					var_item18->set_EditValue(TVariant(75));
		var_Items1->Add(L"",TVariant(0),TVariant(0))->Padding = L"8,0,0,0";
Excontextmenulib_tlb::IAppearancePtr var_Appearance = ExContextMenu1->VisualAppearance;
	var_Appearance->Add(1,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSFlat-Ribbon/msfr_background.ebn"));
	var_Appearance->Add(2,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSFlat-Ribbon/msfr_groupt.ebn"));
	var_Appearance->Add(12,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSFlat-Ribbon/msfr_hot.ebn"));
	var_Appearance->Add(14,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSFlat-Ribbon/msfr_select.ebn"));
	var_Appearance->Add(17,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSFlat-Ribbon/msfr_tab.ebn"));
	var_Appearance->Add(18,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSFlat-Ribbon/msfr_tabhot.ebn"));
	var_Appearance->Add(32,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSFlat-Ribbon/msfr_check0.ebn"));
	var_Appearance->Add(33,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSFlat-Ribbon/msfr_check1.ebn"));
	var_Appearance->Add(34,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSFlat-Ribbon/msfr_buttonu.ebn"));
	var_Appearance->Add(35,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSFlat-Ribbon/msfr_buttond.ebn"));
ExContextMenu1->Appearance = Excontextmenulib_tlb::MenuBorderEnum(0x1000000);
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exToolTipAppearance] = ExContextMenu1->Appearance;
ExContextMenu1->SelBackColor = 0xe000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuHotBackColor] = 0xc000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuSelHotBackColor] = 0x23000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum(0x2)] = 0x22000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum(0x3)] = 0x23000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exCheckBoxState0] = 0x20000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exCheckBoxState1] = 0x21000000;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

167:
Microsoft Paint - Ribbon Like

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->MenuAppearance = Excontextmenulib_tlb::MenuAppearanceEnum::exMenuNormal;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->ToString = L"[id=0][group=0x03](),[id=-20][bg=0x01000000][group=0x03][itemspad=4,4,4,4]([id=9000])";
	Excontextmenulib_tlb::IItemsPtr var_Items1 = var_Items->get_item(TVariant(0))->Items;
		var_Items1->Add(L"",TVariant(0),TVariant(0))->Padding = L"8,0,0,0";
		Excontextmenulib_tlb::IItemPtr var_item3 = var_Items1->Add(L"New Page",TNoParam(),TNoParam());
			var_item3->ToString = TVariant(String("[id=0][typ=2][chk=1][spchk=-1][show=1][grp=10][bghot=0x12000000][bgsel=0x11000000][bgselhot=0x14000000][group=0x03][tab=9000][p") +
"ad=4,0,4,0][popupoffset=-4,-1]([id=0][group=0x03])");
			var_item3->ID = 200;
			var_item3->Caption = L"Page1";
			Excontextmenulib_tlb::IItemPtr var_item = var_item3->Items->Add(L"New Group",TNoParam(),TNoParam());
				var_item->ToString = L"[id=0][group=0x03][itemspad=4,4,4,18][itemsbg=0x02000000][itemsbghot=0x04000000]()";
				var_item->Caption = L"<b><font ;14>A";
				Excontextmenulib_tlb::IItemsPtr var_Items2 = var_item->Items;
					var_Items2->BackgroundExt = L"bottom[16,text=`<fgcolor A0A0A0><font ;8>Horizontal`,align=0x11]";
					Excontextmenulib_tlb::IItemPtr var_item1 = var_Items2->Add(L"",TVariant(2),TNoParam());
						var_item1->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupEqualWidth | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
						var_item1->Caption = L"";
						Excontextmenulib_tlb::IItemsPtr var_Items3 = var_item1->Items;
							Excontextmenulib_tlb::IItemPtr var_item2 = var_Items3->Add(L"R1",TNoParam(),TNoParam());
								var_item2->RadioGroup = 100;
								var_item2->Radio = true;
								var_item2->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemHighlight;
								var_item2->Checked = false;
							Excontextmenulib_tlb::IItemPtr var_item4 = var_Items3->Add(L"R2",TNoParam(),TNoParam());
								var_item4->RadioGroup = 100;
								var_item4->Radio = true;
								var_item4->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemHighlight;
								var_item4->Checked = true;
							Excontextmenulib_tlb::IItemPtr var_item5 = var_Items3->Add(L"R3",TNoParam(),TNoParam());
								var_item5->RadioGroup = 100;
								var_item5->Radio = true;
								var_item5->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemHighlight;
								var_item5->Checked = false;
			var_item1 = var_item3->Items->Add(L"New Group",TNoParam(),TNoParam());
				var_item1->ToString = L"[id=0][group=0x03][itemspad=4,4,4,18][itemsbg=0x02000000][itemsbghot=0x04000000]()";
				var_item1->Caption = L"<b><font ;14>B";
				Excontextmenulib_tlb::IItemsPtr var_Items4 = var_item1->Items;
					var_Items4->BackgroundExt = L"bottom[16,text=`<fgcolor A0A0A0><font ;8>Vertical`,align=0x11]";
					Excontextmenulib_tlb::IItemPtr var_item6 = var_Items4->Add(L"",TVariant(2),TNoParam());
						var_item6->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupVertical | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupEqualHeight | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
						var_item6->Caption = L"";
						Excontextmenulib_tlb::IItemsPtr var_Items5 = var_item6->Items;
							Excontextmenulib_tlb::IItemPtr var_item7 = var_Items5->Add(L"C1",TNoParam(),TNoParam());
								var_item7->Check = true;
								var_item7->Checked = true;
							Excontextmenulib_tlb::IItemPtr var_item8 = var_Items5->Add(L"C2",TNoParam(),TNoParam());
								var_item8->Check = true;
								var_item8->Checked = false;
							Excontextmenulib_tlb::IItemPtr var_item9 = var_Items5->Add(L"C3",TNoParam(),TNoParam());
								var_item9->Check = true;
								var_item9->Checked = true;
			var_item3->Items->Add(L"",TVariant(0),TVariant(0))->Padding = L"4,0,0,0";
			var_item2 = var_item3->Items->Add(L"New Group",TNoParam(),TNoParam());
				var_item2->ToString = L"[id=0][group=0x03][itemspad=4,4,4,18][itemsbg=0x02000000][itemsbghot=0x04000000]()";
				var_item2->Caption = L"";
				Excontextmenulib_tlb::IItemsPtr var_Items6 = var_item2->Items;
					var_Items6->BackgroundExt = L"bottom[16,text=`<fgcolor A0A0A0><font ;8>Mixt`,align=0x11]";
					Excontextmenulib_tlb::IItemPtr var_item10 = var_Items6->Add(L"",TVariant(0),TNoParam());
						var_item10->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditVertical | Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
						var_item10->ItemHeight = 76;
						var_item10->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
						var_item10->set_EditValue(TVariant(25));
					Excontextmenulib_tlb::IItemPtr var_item11 = var_Items6->Add(L"",TVariant(2),TNoParam());
						var_item11->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupVertical | Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
						var_item11->Caption = L"";
						Excontextmenulib_tlb::IItemsPtr var_Items7 = var_item11->Items;
							Excontextmenulib_tlb::IItemPtr var_item12 = var_Items7->Add(L"",TVariant(2),TNoParam());
								var_item12->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
								Excontextmenulib_tlb::IItemsPtr var_Items8 = var_item12->Items;
									Excontextmenulib_tlb::IItemPtr var_item13 = var_Items8->Add(L"Button1",TVariant(2),TNoParam());
										var_item13->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsSelectButtonBottom | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize;
										Excontextmenulib_tlb::IItemsPtr var_Items9 = var_item13->Items;
											var_Items9->Add(L"Item 1",TNoParam(),TNoParam());
											var_Items9->Add(L"Item 2",TNoParam(),TNoParam());
											var_Items9->Add(L"Item 3",TNoParam(),TNoParam());
									var_Items8->Add(L"",TVariant(0),TVariant(0))->Padding = L"4,0,0,0";
									Excontextmenulib_tlb::IItemPtr var_item14 = var_Items8->Add(L"Button2",TVariant(2),TNoParam());
										var_item14->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsSelectButtonBottom | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize;
										Excontextmenulib_tlb::IItemsPtr var_Items10 = var_item14->Items;
											var_Items10->Add(L"Item 4",TNoParam(),TNoParam());
											var_Items10->Add(L"Item 5",TNoParam(),TNoParam());
											var_Items10->Add(L"Item 6",TNoParam(),TNoParam());
							Excontextmenulib_tlb::IItemPtr var_item15 = var_Items7->Add(L"Popup",TVariant(2),TNoParam());
								var_item15->Alignment = Excontextmenulib_tlb::AlignmentEnum::exCenter;
								Excontextmenulib_tlb::IItemsPtr var_Items11 = var_item15->Items;
									var_Items11->Add(L"Item 7",TNoParam(),TNoParam())->Check = true;
									var_Items11->Add(L"Item 8",TNoParam(),TNoParam());
									Excontextmenulib_tlb::IItemsPtr var_Items12 = var_Items11->Add(L"Item 9",TVariant(2),TNoParam())->Items;
										var_Items12->Add(L"Item 10",TNoParam(),TNoParam());
										var_Items12->Add(L"Item 11",TNoParam(),TNoParam());
										var_Items12->Add(L"Item 12",TNoParam(),TNoParam());
		var_item4 = var_Items1->Add(L"New Page",TNoParam(),TNoParam());
			var_item4->ToString = TVariant(String("[id=0][typ=2][chk=0][spchk=-1][show=1][grp=10][bghot=0x12000000][bgsel=0x11000000][bgselhot=0x14000000][group=0x03][tab=9000][p") +
"ad=4,0,4,0][popupoffset=-4,-1]([id=0][group=0x03])");
			var_item4->ID = 300;
			var_item4->Caption = L"Page2";
			Excontextmenulib_tlb::IItemsPtr var_Items13 = var_item4->Items;
				Excontextmenulib_tlb::IItemPtr var_item16 = var_Items13->Add(L"S1",TNoParam(),TNoParam());
					var_item16->ItemHeight = 88;
					var_item16->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditVertical | Excontextmenulib_tlb::AllowEditEnum::exItemEditSpin | Excontextmenulib_tlb::AllowEditEnum::exItemEditProgress;
					var_item16->set_EditValue(TVariant(25));
				Excontextmenulib_tlb::IItemPtr var_item17 = var_Items13->Add(L"S2",TNoParam(),TNoParam());
					var_item17->ItemHeight = 88;
					var_item17->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditVertical | Excontextmenulib_tlb::AllowEditEnum::exItemEditSpin | Excontextmenulib_tlb::AllowEditEnum::exItemEditProgress;
					var_item17->set_EditValue(TVariant(50));
				Excontextmenulib_tlb::IItemPtr var_item18 = var_Items13->Add(L"S3",TNoParam(),TNoParam());
					var_item18->ItemHeight = 88;
					var_item18->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditVertical | Excontextmenulib_tlb::AllowEditEnum::exItemEditSpin | Excontextmenulib_tlb::AllowEditEnum::exItemEditProgress;
					var_item18->set_EditValue(TVariant(75));
		var_Items1->Add(L"",TVariant(0),TVariant(0))->Padding = L"8,0,0,0";
Excontextmenulib_tlb::IAppearancePtr var_Appearance = ExContextMenu1->VisualAppearance;
	var_Appearance->Add(1,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSPaint-Ribbon/mspr_background.ebn"));
	var_Appearance->Add(2,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSPaint-Ribbon/mspr_groupt.ebn"));
	var_Appearance->Add(3,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSPaint-Ribbon/mspr_groupo.ebn"));
	var_Appearance->Add(4,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSPaint-Ribbon/mspr_grouphot.ebn"));
	var_Appearance->Add(5,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSPaint-Ribbon/mspr_frameh.ebn"));
	var_Appearance->Add(6,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSPaint-Ribbon/mspr_framehs.ebn"));
	var_Appearance->Add(7,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSPaint-Ribbon/mspr_framehi.ebn"));
	var_Appearance->Add(8,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSPaint-Ribbon/mspr_framehe.ebn"));
	var_Appearance->Add(9,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSPaint-Ribbon/mspr_framevs.ebn"));
	var_Appearance->Add(10,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSPaint-Ribbon/mspr_framevi.ebn"));
	var_Appearance->Add(11,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSPaint-Ribbon/mspr_frameve.ebn"));
	var_Appearance->Add(12,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSPaint-Ribbon/mspr_select.ebn"));
	var_Appearance->Add(13,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSPaint-Ribbon/mspr_bordert.ebn"));
	var_Appearance->Add(14,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSPaint-Ribbon/mspr_buttond.ebn"));
	var_Appearance->Add(15,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSPaint-Ribbon/mspr_buttonu.ebn"));
	var_Appearance->Add(16,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSPaint-Ribbon/mspr_tab.ebn"));
	var_Appearance->Add(17,TVariant("CP:16 0 0 0 1"));
	var_Appearance->Add(18,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSPaint-Ribbon/mspr_tabhot.ebn"));
	var_Appearance->Add(19,TVariant("C:/Program Files/Exontrol/ExContextMenu/Sample/EBN/MSPaint-Ribbon/mspr_tabselhot.ebn"));
	var_Appearance->Add(20,TVariant("CP:19 0 0 0 1"));
ExContextMenu1->LocalAppearance = Excontextmenulib_tlb::MenuBorderEnum::ShadowBorder;
ExContextMenu1->Appearance = Excontextmenulib_tlb::MenuBorderEnum(0x1000000);
ExContextMenu1->ForeColor = RGB(21,66,139);
ExContextMenu1->SelBackColor = 0xe000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exToolTipAppearance] = ExContextMenu1->Appearance;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum(0x2)] = 0xd000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameSingle] = 0x5000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameHStart] = 0x6000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameHIntermediate] = 0x7000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameHEnd] = 0x8000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameVStart] = 0x9000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameVIntermediate] = 0xa000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameVEnd] = 0xb000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuHotBackColor] = 0xc000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuSelHotBackColor] = 0xf000000;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

166:
Microsoft Office - Ribbon Like

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->MenuAppearance = Excontextmenulib_tlb::MenuAppearanceEnum::exMenuNormal;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->ToString = L"[id=0][group=0x03](),[id=-20][bg=0x01000000][group=0x03][itemspad=4,4,4,4]([id=9000])";
	Excontextmenulib_tlb::IItemsPtr var_Items1 = var_Items->get_item(TVariant(0))->Items;
		var_Items1->Add(L"",TVariant(0),TVariant(0))->Padding = L"8,0,0,0";
		Excontextmenulib_tlb::IItemPtr var_item3 = var_Items1->Add(L"New Page",TNoParam(),TNoParam());
			var_item3->ToString = TVariant(String("[id=0][typ=2][chk=1][spchk=-1][show=1][grp=10][bghot=0x12000000][bgsel=0x11000000][bgselhot=0x14000000][group=0x03][tab=9000][p") +
"ad=4,0,4,0][popupoffset=-4,-1]([id=0][group=0x03])");
			var_item3->ID = 200;
			var_item3->Caption = L"Page1";
			Excontextmenulib_tlb::IItemPtr var_item = var_item3->Items->Add(L"New Group",TNoParam(),TNoParam());
				var_item->ToString = L"[id=0][group=0x03][itemspad=4,4,4,18][itemsbg=0x02000000][itemsbghot=0x04000000]()";
				var_item->Caption = L"<b><font ;14>A";
				Excontextmenulib_tlb::IItemsPtr var_Items2 = var_item->Items;
					var_Items2->BackgroundExt = L"bottom[16,text=`<fgcolor A0A0A0><font ;8>Horizontal`,align=0x11]";
					Excontextmenulib_tlb::IItemPtr var_item1 = var_Items2->Add(L"",TVariant(2),TNoParam());
						var_item1->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupEqualWidth | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
						var_item1->Caption = L"";
						Excontextmenulib_tlb::IItemsPtr var_Items3 = var_item1->Items;
							Excontextmenulib_tlb::IItemPtr var_item2 = var_Items3->Add(L"R1",TNoParam(),TNoParam());
								var_item2->RadioGroup = 100;
								var_item2->Radio = true;
								var_item2->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemHighlight;
								var_item2->Checked = false;
							Excontextmenulib_tlb::IItemPtr var_item4 = var_Items3->Add(L"R2",TNoParam(),TNoParam());
								var_item4->RadioGroup = 100;
								var_item4->Radio = true;
								var_item4->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemHighlight;
								var_item4->Checked = true;
							Excontextmenulib_tlb::IItemPtr var_item5 = var_Items3->Add(L"R3",TNoParam(),TNoParam());
								var_item5->RadioGroup = 100;
								var_item5->Radio = true;
								var_item5->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemHighlight;
								var_item5->Checked = false;
			var_item1 = var_item3->Items->Add(L"New Group",TNoParam(),TNoParam());
				var_item1->ToString = L"[id=0][group=0x03][itemspad=4,4,4,18][itemsbg=0x02000000][itemsbghot=0x04000000]()";
				var_item1->Caption = L"<b><font ;14>B";
				Excontextmenulib_tlb::IItemsPtr var_Items4 = var_item1->Items;
					var_Items4->BackgroundExt = L"bottom[16,text=`<fgcolor A0A0A0><font ;8>Vertical`,align=0x11]";
					Excontextmenulib_tlb::IItemPtr var_item6 = var_Items4->Add(L"",TVariant(2),TNoParam());
						var_item6->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupVertical | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupEqualHeight | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
						var_item6->Caption = L"";
						Excontextmenulib_tlb::IItemsPtr var_Items5 = var_item6->Items;
							Excontextmenulib_tlb::IItemPtr var_item7 = var_Items5->Add(L"C1",TNoParam(),TNoParam());
								var_item7->Check = true;
								var_item7->Checked = true;
							Excontextmenulib_tlb::IItemPtr var_item8 = var_Items5->Add(L"C2",TNoParam(),TNoParam());
								var_item8->Check = true;
								var_item8->Checked = false;
							Excontextmenulib_tlb::IItemPtr var_item9 = var_Items5->Add(L"C3",TNoParam(),TNoParam());
								var_item9->Check = true;
								var_item9->Checked = true;
			var_item3->Items->Add(L"",TVariant(0),TVariant(0))->Padding = L"4,0,0,0";
			var_item2 = var_item3->Items->Add(L"New Group",TNoParam(),TNoParam());
				var_item2->ToString = L"[id=0][group=0x03][itemspad=4,4,4,18][itemsbg=0x02000000][itemsbghot=0x04000000]()";
				var_item2->Caption = L"";
				Excontextmenulib_tlb::IItemsPtr var_Items6 = var_item2->Items;
					var_Items6->BackgroundExt = L"bottom[16,text=`<fgcolor A0A0A0><font ;8>Mixt`,align=0x11]";
					Excontextmenulib_tlb::IItemPtr var_item10 = var_Items6->Add(L"",TVariant(0),TNoParam());
						var_item10->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditVertical | Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
						var_item10->ItemHeight = 76;
						var_item10->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
						var_item10->set_EditValue(TVariant(25));
					Excontextmenulib_tlb::IItemPtr var_item11 = var_Items6->Add(L"",TVariant(2),TNoParam());
						var_item11->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupVertical | Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
						var_item11->Caption = L"";
						Excontextmenulib_tlb::IItemsPtr var_Items7 = var_item11->Items;
							Excontextmenulib_tlb::IItemPtr var_item12 = var_Items7->Add(L"",TVariant(2),TNoParam());
								var_item12->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
								Excontextmenulib_tlb::IItemsPtr var_Items8 = var_item12->Items;
									Excontextmenulib_tlb::IItemPtr var_item13 = var_Items8->Add(L"Button1",TVariant(2),TNoParam());
										var_item13->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsSelectButtonBottom | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize;
										Excontextmenulib_tlb::IItemsPtr var_Items9 = var_item13->Items;
											var_Items9->Add(L"Item 1",TNoParam(),TNoParam());
											var_Items9->Add(L"Item 2",TNoParam(),TNoParam());
											var_Items9->Add(L"Item 3",TNoParam(),TNoParam());
									var_Items8->Add(L"",TVariant(0),TVariant(0))->Padding = L"4,0,0,0";
									Excontextmenulib_tlb::IItemPtr var_item14 = var_Items8->Add(L"Button2",TVariant(2),TNoParam());
										var_item14->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsSelectButtonBottom | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize;
										Excontextmenulib_tlb::IItemsPtr var_Items10 = var_item14->Items;
											var_Items10->Add(L"Item 4",TNoParam(),TNoParam());
											var_Items10->Add(L"Item 5",TNoParam(),TNoParam());
											var_Items10->Add(L"Item 6",TNoParam(),TNoParam());
							Excontextmenulib_tlb::IItemPtr var_item15 = var_Items7->Add(L"Popup",TVariant(2),TNoParam());
								var_item15->Alignment = Excontextmenulib_tlb::AlignmentEnum::exCenter;
								Excontextmenulib_tlb::IItemsPtr var_Items11 = var_item15->Items;
									var_Items11->Add(L"Item 7",TNoParam(),TNoParam())->Check = true;
									var_Items11->Add(L"Item 8",TNoParam(),TNoParam());
									Excontextmenulib_tlb::IItemsPtr var_Items12 = var_Items11->Add(L"Item 9",TVariant(2),TNoParam())->Items;
										var_Items12->Add(L"Item 10",TNoParam(),TNoParam());
										var_Items12->Add(L"Item 11",TNoParam(),TNoParam());
										var_Items12->Add(L"Item 12",TNoParam(),TNoParam());
		var_item4 = var_Items1->Add(L"New Page",TNoParam(),TNoParam());
			var_item4->ToString = TVariant(String("[id=0][typ=2][chk=0][spchk=-1][show=1][grp=10][bghot=0x12000000][bgsel=0x11000000][bgselhot=0x14000000][group=0x03][tab=9000][p") +
"ad=4,0,4,0][popupoffset=-4,-1]([id=0][group=0x03])");
			var_item4->ID = 300;
			var_item4->Caption = L"Page2";
			Excontextmenulib_tlb::IItemsPtr var_Items13 = var_item4->Items;
				Excontextmenulib_tlb::IItemPtr var_item16 = var_Items13->Add(L"S1",TNoParam(),TNoParam());
					var_item16->ItemHeight = 88;
					var_item16->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditVertical | Excontextmenulib_tlb::AllowEditEnum::exItemEditSpin | Excontextmenulib_tlb::AllowEditEnum::exItemEditProgress;
					var_item16->set_EditValue(TVariant(25));
				Excontextmenulib_tlb::IItemPtr var_item17 = var_Items13->Add(L"S2",TNoParam(),TNoParam());
					var_item17->ItemHeight = 88;
					var_item17->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditVertical | Excontextmenulib_tlb::AllowEditEnum::exItemEditSpin | Excontextmenulib_tlb::AllowEditEnum::exItemEditProgress;
					var_item17->set_EditValue(TVariant(50));
				Excontextmenulib_tlb::IItemPtr var_item18 = var_Items13->Add(L"S3",TNoParam(),TNoParam());
					var_item18->ItemHeight = 88;
					var_item18->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditVertical | Excontextmenulib_tlb::AllowEditEnum::exItemEditSpin | Excontextmenulib_tlb::AllowEditEnum::exItemEditProgress;
					var_item18->set_EditValue(TVariant(75));
		var_Items1->Add(L"",TVariant(0),TVariant(0))->Padding = L"8,0,0,0";
Excontextmenulib_tlb::IAppearancePtr var_Appearance = ExContextMenu1->VisualAppearance;
	var_Appearance->Add(1,TVariant("C:\\Program Files\\Exontrol\\ExContextMenu\\Sample\\EBN\\MSOffice-Ribbon\\msor_background.ebn"));
	var_Appearance->Add(2,TVariant("C:\\Program Files\\Exontrol\\ExContextMenu\\Sample\\EBN\\MSOffice-Ribbon\\msor_groupt.ebn"));
	var_Appearance->Add(3,TVariant("C:\\Program Files\\Exontrol\\ExContextMenu\\Sample\\EBN\\MSOffice-Ribbon\\msor_groupo.ebn"));
	var_Appearance->Add(4,TVariant("C:\\Program Files\\Exontrol\\ExContextMenu\\Sample\\EBN\\MSOffice-Ribbon\\msor_grouphot.ebn"));
	var_Appearance->Add(5,TVariant("C:\\Program Files\\Exontrol\\ExContextMenu\\Sample\\EBN\\MSOffice-Ribbon\\msor_frameh.ebn"));
	var_Appearance->Add(6,TVariant("C:\\Program Files\\Exontrol\\ExContextMenu\\Sample\\EBN\\MSOffice-Ribbon\\msor_framehs.ebn"));
	var_Appearance->Add(7,TVariant("C:\\Program Files\\Exontrol\\ExContextMenu\\Sample\\EBN\\MSOffice-Ribbon\\msor_framehi.ebn"));
	var_Appearance->Add(8,TVariant("C:\\Program Files\\Exontrol\\ExContextMenu\\Sample\\EBN\\MSOffice-Ribbon\\msor_framehe.ebn"));
	var_Appearance->Add(9,TVariant("C:\\Program Files\\Exontrol\\ExContextMenu\\Sample\\EBN\\MSOffice-Ribbon\\msor_framevs.ebn"));
	var_Appearance->Add(10,TVariant("C:\\Program Files\\Exontrol\\ExContextMenu\\Sample\\EBN\\MSOffice-Ribbon\\msor_framevi.ebn"));
	var_Appearance->Add(11,TVariant("C:\\Program Files\\Exontrol\\ExContextMenu\\Sample\\EBN\\MSOffice-Ribbon\\msor_frameve.ebn"));
	var_Appearance->Add(12,TVariant("C:\\Program Files\\Exontrol\\ExContextMenu\\Sample\\EBN\\MSOffice-Ribbon\\msor_select.ebn"));
	var_Appearance->Add(13,TVariant("C:\\Program Files\\Exontrol\\ExContextMenu\\Sample\\EBN\\MSOffice-Ribbon\\msor_bordert.ebn"));
	var_Appearance->Add(14,TVariant("C:\\Program Files\\Exontrol\\ExContextMenu\\Sample\\EBN\\MSOffice-Ribbon\\msor_buttond.ebn"));
	var_Appearance->Add(15,TVariant("C:\\Program Files\\Exontrol\\ExContextMenu\\Sample\\EBN\\MSOffice-Ribbon\\msor_buttonu.ebn"));
	var_Appearance->Add(16,TVariant("C:\\Program Files\\Exontrol\\ExContextMenu\\Sample\\EBN\\MSOffice-Ribbon\\msor_tab.ebn"));
	var_Appearance->Add(17,TVariant("CP:16 0 0 0 1"));
	var_Appearance->Add(18,TVariant("C:\\Program Files\\Exontrol\\ExContextMenu\\Sample\\EBN\\MSOffice-Ribbon\\msor_tabhot.ebn"));
	var_Appearance->Add(19,TVariant("C:\\Program Files\\Exontrol\\ExContextMenu\\Sample\\EBN\\MSOffice-Ribbon\\msor_tabselhot.ebn"));
	var_Appearance->Add(20,TVariant("CP:19 0 0 0 1"));
ExContextMenu1->ForeColor = RGB(21,66,139);
ExContextMenu1->SelBackColor = 0xe000000;
ExContextMenu1->LocalAppearance = Excontextmenulib_tlb::MenuBorderEnum::ShadowBorder;
ExContextMenu1->Appearance = Excontextmenulib_tlb::MenuBorderEnum(0x1000000);
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exToolTipAppearance] = ExContextMenu1->Appearance;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum(0x2)] = 0xd000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameSingle] = 0x5000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameHStart] = 0x6000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameHIntermediate] = 0x7000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameHEnd] = 0x8000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameVStart] = 0x9000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameVIntermediate] = 0xa000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameVEnd] = 0xb000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuHotBackColor] = 0xc000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuSelHotBackColor] = 0xf000000;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

165:
How I can assign buttons to a tab

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuSelBorderColor] = RGB(240,240,240);
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->ToString = TVariant(String("[id=0][group=0x0103][itemspad=4,4,4,4]([id=-10][group=0x03](),[id=0][bg=RGB(240,240,240)][group=0x03][itemspad=4,4,4,4]([id=-10") +
"0]))");
	Excontextmenulib_tlb::IItemsPtr var_Items1 = var_Items->get_item(TVariant(-10))->Items;
		var_Items1->Add(L"",TVariant(0),TVariant(0))->Padding = L"8,0,0,0";
		Excontextmenulib_tlb::IItemPtr var_item = var_Items1->Add(L"New Page",TNoParam(),TNoParam());
			var_item->ToString = TVariant(String("[typ=2][chk=1][spchk=-1][show=1][grp=10][bghot=RGB(255,255,255)][bgsel=RGB(240,240,240)][bgselhot=RGB(240,240,240)][height=16][") +
"group=0x03][tab=-100][pad=2,0,2,0]([id=50][group=0x03]([]))");
			var_item->Caption = L"Page<off -5><font ;5><b>1</b></font></off>";
			Excontextmenulib_tlb::IItemsPtr var_Items2 = var_item->Items;
				var_Items2->Add(L"Button 1",TNoParam(),TNoParam())->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButton;
				var_Items2->Add(L"Button 2",TNoParam(),TNoParam())->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButton;
				var_Items2->Add(L"Button 3",TNoParam(),TNoParam())->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButton;
		Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"New Page",TNoParam(),TNoParam());
			var_item1->ToString = TVariant(String("[typ=2][chk=0][spchk=-1][show=1][grp=10][bghot=RGB(255,255,255)][bgsel=RGB(240,240,240)][bgselhot=RGB(240,240,240)][height=16][") +
"group=0x03][tab=-100][pad=2,0,2,0]([id=50][group=0x03]([]))");
			var_item1->Caption = L"Page<off -5><font ;5><b>2</b></font></off>";
			Excontextmenulib_tlb::IItemsPtr var_Items3 = var_item1->Items;
				var_Items3->Add(L"Button 3",TNoParam(),TNoParam())->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButton;
				var_Items3->Add(L"Button 4",TNoParam(),TNoParam())->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButton;
		var_Items1->Add(L"",TVariant(0),TVariant(0))->Padding = L"8,0,0,0";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

164:
How can I hide an item

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item 1",TNoParam(),TNoParam())->Visible = false;
	var_Items->Add(L"Item 2",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

163:
How do I get the item giving its caption

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item 1",TNoParam(),TNoParam())->ID = 1000;
	var_Items->Add(L"Item 2",TNoParam(),TNoParam())->ID = 1001;
ExContextMenu1->item[TVariant("Item 1")]->Bold = true;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

162:
How do I get the item giving its identifier

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item 1",TNoParam(),TNoParam())->ID = 1000;
	var_Items->Add(L"Item 2",TNoParam(),TNoParam())->ID = 1001;
ExContextMenu1->item[TVariant(1000)]->Bold = true;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

161:
Can I change the cursor where it hovers the item
Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->set_Cursor(TVariant("exCross"));
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item 1",TNoParam(),TNoParam());
	var_Items->Add(L"Item 2",TNoParam(),TNoParam())->set_Cursor(TVariant("exNoDrop"));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

160:
I am using radio-buttons, the question is it possible to uncheck the radio-buttons, so no button is pressed in the group

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->AllowToggleRadio = true;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Radio 1",TNoParam(),TVariant(1000));
		var_item->Radio = true;
		var_item->RadioGroup = 100;
	Excontextmenulib_tlb::IItemPtr var_item1 = var_Items->Add(L"Radio 2",TNoParam(),TVariant(1001));
		var_item1->Radio = true;
		var_item1->RadioGroup = 100;
	Excontextmenulib_tlb::IItemPtr var_item2 = var_Items->Add(L"Radio 2",TNoParam(),TVariant(1003));
		var_item2->Radio = true;
		var_item2->RadioGroup = 100;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

159:
Is it possible to display the item's identifiers

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Debug = true;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item 1",TNoParam(),TNoParam())->ID = 10001;
	var_Items->Add(L"Item 2",TNoParam(),TNoParam())->ID = 10002;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

158:
How do I disable showing the tooltip for all control (method 2)
Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->AllowToolTip = false;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Tooltip = L"this is a bit of text to be shown when cursor hovers it";
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Tooltip = L"this is a bit of text to be shown when cursor hovers it";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

157:
How can I disable the control

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item 1",TNoParam(),TNoParam())->Enabled = false;
	var_Items->Add(L"Item 2",TNoParam(),TNoParam())->Enabled = false;
	var_Items->Add(L"Item 3",TNoParam(),TNoParam())->Enabled = false;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

156:
How can I specify a different border/visual appearance for drop down portion of the select buttons/combobox (ebn)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
ExContextMenu1->LocalAppearance = Excontextmenulib_tlb::MenuBorderEnum(0x1000000);
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"Button",TVariant(2),TNoParam());
				var_item1->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsSelectButtonBottom | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize;
				Excontextmenulib_tlb::IItemsPtr var_Items2 = var_item1->Items;
					var_Items2->Add(L"Item 1",TNoParam(),TNoParam());
					var_Items2->Add(L"Item 2",TNoParam(),TNoParam());
					var_Items2->Add(L"Item 3",TNoParam(),TNoParam());
			Excontextmenulib_tlb::IItemPtr var_item2 = var_Items1->Add(L"Button",TVariant(2),TNoParam());
				var_item2->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsSelectButtonBottom | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize;
				Excontextmenulib_tlb::IItemsPtr var_Items3 = var_item2->Items;
					var_Items3->Add(L"Item 4",TNoParam(),TNoParam());
					var_Items3->Add(L"Item 5",TNoParam(),TNoParam());
					var_Items3->Add(L"Item 6",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

155:
How can I specify a different border for drop down portion of the select buttons/combobox

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->LocalAppearance = Excontextmenulib_tlb::MenuBorderEnum::ShadowBorder;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"Button",TVariant(2),TNoParam());
				var_item1->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsSelectButtonBottom | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize;
				Excontextmenulib_tlb::IItemsPtr var_Items2 = var_item1->Items;
					var_Items2->Add(L"Item 1",TNoParam(),TNoParam());
					var_Items2->Add(L"Item 2",TNoParam(),TNoParam());
					var_Items2->Add(L"Item 3",TNoParam(),TNoParam());
			Excontextmenulib_tlb::IItemPtr var_item2 = var_Items1->Add(L"Button",TVariant(2),TNoParam());
				var_item2->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsSelectButtonBottom | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize;
				Excontextmenulib_tlb::IItemsPtr var_Items3 = var_item2->Items;
					var_Items3->Add(L"Item 4",TNoParam(),TNoParam());
					var_Items3->Add(L"Item 5",TNoParam(),TNoParam());
					var_Items3->Add(L"Item 6",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

154:
How can I change the visual appearance for the entire control

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
ExContextMenu1->Appearance = Excontextmenulib_tlb::MenuBorderEnum(0x1000000);
ExContextMenu1->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemCheckHighlight;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Padding = L"4,4,4,4";
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Radio 1",TNoParam(),TNoParam());
		var_item->Radio = true;
		var_item->Checked = true;
	var_Items->Add(L"Radio 2",TNoParam(),TNoParam())->Radio = true;
	var_Items->Add(L"Radio 3",TNoParam(),TNoParam())->Radio = true;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

153:
How can I show a border arround the control

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Appearance = Excontextmenulib_tlb::MenuBorderEnum::FlatBorder;
ExContextMenu1->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemCheckHighlight;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Padding = L"4,4,4,4";
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Check 1",TNoParam(),TNoParam());
		var_item->Checked = true;
		var_item->Check = true;
	Excontextmenulib_tlb::IItemPtr var_item1 = var_Items->Add(L"Check 2",TNoParam(),TNoParam());
		var_item1->Check = true;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

152:
Is it possible to change the item's background color when check/uncheck the item

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemCheckHighlight;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Padding = L"4,4,4,4";
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Check 1",TNoParam(),TNoParam());
		var_item->Checked = true;
		var_item->Check = true;
	Excontextmenulib_tlb::IItemPtr var_item1 = var_Items->Add(L"Check 2",TNoParam(),TNoParam());
		var_item1->Check = true;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

151:
How can I change the colors for hot/hover items

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuHotBackColor] = RGB(0,0,1);
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuHotForeColor] = RGB(255,255,255);
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuSelHotBackColor] = RGB(128,128,128);
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuSelHotForeColor] = RGB(255,255,255);
ExContextMenu1->SelBackColor = RGB(128,128,128);
ExContextMenu1->SelForeColor = RGB(255,255,255);
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuSelBorderColor] = RGB(128,128,128);
ExContextMenu1->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemCheckHighlight;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Padding = L"4,4,4,4";
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"[group=3](Item 1,Item 2)";
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Check 1",TNoParam(),TNoParam());
		var_item->Checked = true;
		var_item->Check = true;
	Excontextmenulib_tlb::IItemPtr var_item1 = var_Items->Add(L"Check 2",TNoParam(),TNoParam());
		var_item1->Check = true;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

150:
How do I change the visual appearance of the groups (vertical)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IAppearancePtr var_Appearance = ExContextMenu1->VisualAppearance;
	var_Appearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
	var_Appearance->Add(2,TVariant("c:\\exontrol\\images\\pushed.ebn"));
	var_Appearance->Add(3,TVariant("c:\\exontrol\\images\\hot.ebn"));
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameSingle] = 0x1000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameVStart] = 0x1000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameVIntermediate] = 0x2000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameVEnd] = 0x3000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameSolid] = RGB(255,0,0);
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"Vertical",TVariant(2),TNoParam());
				var_item1->Alignment = Excontextmenulib_tlb::AlignmentEnum::exCenter;
				var_item1->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupVertical | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
				Excontextmenulib_tlb::IItemsPtr var_Items2 = var_item1->Items;
					var_Items2->Add(L"Item 1",TNoParam(),TNoParam());
					var_Items2->Add(L"Item 2",TNoParam(),TNoParam());
					var_Items2->Add(L"Item 3",TNoParam(),TNoParam());
					var_Items2->Add(L"Item 4",TNoParam(),TNoParam());
					var_Items2->Add(L"Item 5",TNoParam(),TNoParam());
			var_Items1->Add(L"",TNoParam(),TNoParam())->CaptionWidth = 12;
			Excontextmenulib_tlb::IItemPtr var_item2 = var_Items1->Add(L"Vertical",TVariant(2),TNoParam());
				var_item2->Alignment = Excontextmenulib_tlb::AlignmentEnum::exCenter;
				var_item2->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupVertical | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupFrameThickBox | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupFrameSolidBox | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
				Excontextmenulib_tlb::IItemsPtr var_Items3 = var_item2->Items;
					var_Items3->Add(L"Item 1",TNoParam(),TNoParam());
					var_Items3->Add(L"Item 2",TNoParam(),TNoParam());
					var_Items3->Add(L"Item 3",TNoParam(),TNoParam());
					var_Items3->Add(L"Item 4",TNoParam(),TNoParam());
					var_Items3->Add(L"Item 5",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

149:
How do I change the visual appearance of the groups (horizontal)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IAppearancePtr var_Appearance = ExContextMenu1->VisualAppearance;
	var_Appearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
	var_Appearance->Add(2,TVariant("c:\\exontrol\\images\\pushed.ebn"));
	var_Appearance->Add(3,TVariant("c:\\exontrol\\images\\hot.ebn"));
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameSingle] = 0x1000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameHStart] = 0x1000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameHIntermediate] = 0x2000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameHEnd] = 0x3000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exGroupPopupFrameSolid] = RGB(255,0,0);
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Horizontal Group",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 4",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 5",TNoParam(),TNoParam());
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Horizontal Group[group=193](Item 1,Item 2,Item 3,Item 4,Item 5)";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

148:
How can I change the visual appearance of the separator item

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuSeparatorItem] = 0x1000000;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->CaptionWidth = 128;
	var_Items->Add(L"",TVariant(1),TNoParam());
	var_Items->Add(L"Item",TNoParam(),TNoParam())->CaptionWidth = 128;
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"<font ;5>separator[sep]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

147:
How can I change the visual appearance of the flat portion of the drop down of the control

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
ExContextMenu1->FlatBackColor = 0x1000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuFlatLineColor] = ExContextMenu1->FlatBackColor;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemsPtr var_Items1 = var_Items->Add(L"Popup",TVariant(2),TNoParam())->Items;
		var_Items1->Add(L"Item 1",TNoParam(),TNoParam())->Check = true;
		var_Items1->Add(L"Item 2",TNoParam(),TNoParam())->Check = true;
		var_Items1->Add(L"Item 3",TNoParam(),TNoParam())->Check = true;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

146:
How can I change the visual appearance of the radio-buttons to be displayed in the context menu (ebn)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IAppearancePtr var_Appearance = ExContextMenu1->VisualAppearance;
	var_Appearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
	var_Appearance->Add(2,TVariant("c:\\exontrol\\images\\pushed.ebn"));
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exRadioButtonState0] = 0x1000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exRadioButtonState1] = 0x2000000;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"Radio 1",TNoParam(),TVariant(1000));
				var_item1->Radio = true;
				var_item1->RadioGroup = 100;
			Excontextmenulib_tlb::IItemPtr var_item2 = var_Items1->Add(L"Radio 2",TNoParam(),TVariant(1001));
				var_item2->Radio = true;
				var_item2->RadioGroup = 100;
			Excontextmenulib_tlb::IItemPtr var_item3 = var_Items1->Add(L"Radio 2",TNoParam(),TVariant(1003));
				var_item3->Radio = true;
				var_item3->RadioGroup = 100;
			var_Items1->get_item(TVariant(1000))->Checked = true;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

145:
How can I change the visual appearance of the check-boxes to be displayed in the context menu (ebn)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IAppearancePtr var_Appearance = ExContextMenu1->VisualAppearance;
	var_Appearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
	var_Appearance->Add(2,TVariant("c:\\exontrol\\images\\pushed.ebn"));
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exCheckBoxState0] = 0x1000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exCheckBoxState1] = 0x2000000;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"Check 1",TNoParam(),TNoParam());
				var_item1->Check = true;
				var_item1->Checked = true;
			var_Items1->Add(L"Check 2",TNoParam(),TNoParam())->Check = true;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

144:
How can I change the visual appearance of the tooltips to be displayed in the context menu (ebn)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IAppearancePtr var_Appearance = ExContextMenu1->VisualAppearance;
	var_Appearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
	var_Appearance->Add(2,TVariant("c:\\exontrol\\images\\pushed.ebn"));
ExContextMenu1->ToolTipDelay = 1;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exToolTipAppearance] = 0x1000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exToolTipForeColor] = RGB(255,0,0);
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Tooltip = L"this is a bit of text to be shown when cursor hovers it";
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Tooltip = L"this is a bit of text to be shown when cursor hovers it";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

143:
Is it possible to change the visual appearance of the buttons to be displayed in the context menu (ebn)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IAppearancePtr var_Appearance = ExContextMenu1->VisualAppearance;
	var_Appearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
	var_Appearance->Add(2,TVariant("c:\\exontrol\\images\\pushed.ebn"));
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum(0x2)] = 0x1000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum(0x3)] = 0x2000000;
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuSeparatorSelectButton] = RGB(255,0,0);
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuSeparatorSelectButtonBottom] = RGB(0,0,255);
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Padding = L"4,4,4,4";
	var_Items->Add(L"Button",TNoParam(),TNoParam())->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButton;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TNoParam(),TNoParam());
		var_item->Enabled = false;
		var_item->ItemHeight = 4;
	Excontextmenulib_tlb::IItemPtr var_item1 = var_Items->Add(L"Button",TVariant(2),TNoParam());
		var_item1->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsSelectButtonBottom | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item1->Items;
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
	Excontextmenulib_tlb::IItemPtr var_item2 = var_Items->Add(L"",TNoParam(),TNoParam());
		var_item2->Enabled = false;
		var_item2->ItemHeight = 4;
	Excontextmenulib_tlb::IItemPtr var_item3 = var_Items->Add(L"Button",TVariant(2),TNoParam());
		var_item3->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsSelectButton | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize;
		Excontextmenulib_tlb::IItemsPtr var_Items2 = var_item3->Items;
			var_Items2->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items2->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items2->Add(L"Item 3",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

142:
I've seen that the width of the tooltip is variable. Can I make it larger

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToolTipWidth = 328;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Tooltip = L"this is a bit of text to be shown when cursor hovers it";
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Tooltip = L"this is a bit of text to be shown when cursor hovers it";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

141:
How do I disable showing the tooltip for all control (method 1)
Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToolTipDelay = 0;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Tooltip = L"this is a bit of text to be shown when cursor hovers it";
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Tooltip = L"this is a bit of text to be shown when cursor hovers it";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

140:
How do I let the tooltip being displayed longer

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToolTipPopDelay = 10000;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Tooltip = L"this is a bit of text to be shown when cursor hovers it";
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Tooltip = L"this is a bit of text to be shown when cursor hovers it";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

139:
How do I show the tooltip quicker

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToolTipDelay = 1;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Tooltip = L"this is a bit of text to be shown when cursor hovers it";
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Tooltip = L"this is a bit of text to be shown when cursor hovers it";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

138:
How can I get the version of the control I am running
Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
OutputDebugString( ExContextMenu1->Version );

137:
How can I align the picture on the control's background
Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Picture = (IPictureDisp*)(ExContextMenu1->ExecuteTemplate("loadpicture(`c:\\exontrol\\images\\card.png`)"));
ExContextMenu1->PictureDisplay = Excontextmenulib_tlb::PictureDisplayEnum::UpperRight;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam());
	var_Items->Add(L"Item",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

136:
Is it possible to place a picture on the control's background
Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Picture = (IPictureDisp*)(ExContextMenu1->ExecuteTemplate("loadpicture(`c:\\exontrol\\images\\card.png`)"));
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam());
	var_Items->Add(L"Item",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

135:
How can I display the item using a different font/size

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"",TNoParam(),TNoParam())->Caption = L"<font ;14>This is a bit of text";
	var_Items->Add(L"<font ;6>This is a bit of text",TNoParam(),TNoParam());
	var_Items->Add(L"",TNoParam(),TNoParam())->Caption = L"<font Times New Roman;22>This is a bit of text</font>. Default";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

134:
How can I use the Event event, available for /COM version

// Event event - Notifies the application once the control fires an event.
void __fastcall TForm1::ExContextMenu1Event(TObject *Sender,long   EventID)
{
	OutputDebugString( L"Event" );
	OutputDebugString( PChar(ExContextMenu1->EventParam[-2]) );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Check",TNoParam(),TNoParam())->Check = true;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Slider",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
		var_item->EditWidth = 128;
		var_item->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
		var_item->set_EditValue(TVariant(25));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

133:
Is it possible to get notified once the user edits the field, or change the slider value

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"EditChange event on Itm object" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Item",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
		var_item->EditWidth = 128;
		var_item->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
		var_item->set_EditValue(TVariant(25));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

132:
How do I get notified once I uncheck an item
// UncheckItem event - Occurs when the user unchecks the item.
void __fastcall TForm1::ExContextMenu1UncheckItem(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"UncheckItem event on Itm object" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Check = true;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Check = true;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

131:
How do I get notified once I check an item
// CheckItem event - Occurs when the user checks the item.
void __fastcall TForm1::ExContextMenu1CheckItem(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"CheckItem event on Itm object" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Check = true;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Check = true;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

130:
How do I get notified once I click/select an item
// SelectItem event - Occurs when the user selects the item.
void __fastcall TForm1::ExContextMenu1SelectItem(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"SelectItem event on Itm object" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam());
	var_Items->Add(L"Item",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

129:
Does your control support padding for items

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->MenuAppearance = Excontextmenulib_tlb::MenuAppearanceEnum::exMenuNormal;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Padding = L"2,12,2,2";
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
	var_Items->BackColor = RGB(255,255,255);
	var_Items->BackgroundExt = L"root[pattern=0x000,frame=RGB(128,128,128)](top[2],top[10,text=`<font ;6><fgcolor 808080> group </font></fgcolor>`,align=0x11])";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

128:
How can I change the visual appearance for items, when cursor hovers it (hot,EBN)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->HotBackColor = 0x1000000;
			var_Items1->Padding = L"4,8,4,8";
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"[group=0x03][itemspad=4,8,4,8][itemsbghot=0x1000000](Item 1,Item 2,Item 3)";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

127:
How can I change the background color for items, when cursor hovers it (hot)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->HotBackColor = RGB(255,0,0);
			var_Items1->Padding = L"0,8,0,8";
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"[group=0x03][itemspad=0,8,0,8][itemsbghot=RGB(255,0,0)](Item 1,Item 2,Item 3)";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

126:
How can I change the visual appearance for items (EBN)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->BackColor = 0x1000000;
			var_Items1->Padding = L"4,8,4,8";
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"[group=0x03][itemspad=4,8,4,8][itemsbg=0x1000000](Item 1,Item 2,Item 3)";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

125:
How can I change the background color for items

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->BackColor = RGB(255,0,0);
			var_Items1->Padding = L"0,8,0,8";
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"[group=0x03][itemspad=0,8,0,8][itemsbg=RGB(255,0,0)](Item 1,Item 2,Item 3)";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

124:
How do I hide the left gray portion to be shown on the drop down menu/popup (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->FlatImageWidth = 0;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemsPtr var_Items1 = var_Items->Add(L"Popup",TVariant(2),TNoParam())->Items;
		var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
		var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
		var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

123:
How do I hide the left gray portion to be shown on the drop down menu/popup (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->MenuAppearance = Excontextmenulib_tlb::MenuAppearanceEnum::exMenuNormal;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemsPtr var_Items1 = var_Items->Add(L"Popup",TVariant(2),TNoParam())->Items;
		var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
		var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
		var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

122:
How can I arrange the drop down item from left to right, rather than top to bottom

// SelectItem event - Occurs when the user selects the item.
void __fastcall TForm1::ExContextMenu1SelectItem(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Clicked" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->MenuAppearance = Excontextmenulib_tlb::MenuAppearanceEnum::exMenuNormal;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Button",TVariant(2),TNoParam());
		var_item->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsSelectButtonBottom | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"",TVariant(2),TNoParam());
				var_item1->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
				Excontextmenulib_tlb::IItemsPtr var_Items2 = var_item1->Items;
					var_Items2->Add(L"Item 1",TNoParam(),TNoParam());
					var_Items2->Add(L"Item 2",TNoParam(),TNoParam());
					var_Items2->Add(L"Item 3",TNoParam(),TNoParam());
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Button[button=0x0113][popupapp=6]([group=0x03](Item 1,Item 2,Item 3))";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

121:
How can I add a drop down button / combobox (method 2)

// SelectItem event - Occurs when the user selects the item.
void __fastcall TForm1::ExContextMenu1SelectItem(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Clicked" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Button",TVariant(2),TNoParam());
		var_item->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsSelectButtonBottom | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Button[button=275][popupapp=6](Item 1[id=20],Item 2[id=30],Item 3[id=40])";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

120:
How can I add a drop down button / combobox (method 1)

// SelectItem event - Occurs when the user selects the item.
void __fastcall TForm1::ExContextMenu1SelectItem(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Clicked" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Button",TVariant(2),TNoParam());
		var_item->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsSelectButton | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Button[button=0x13][popupapp=6](Item 1[id=20],Item 2[id=30],Item 3[id=40])";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

119:
I am using exShowAsSelectButton/exShowAsSelectButtonBottom but none of them works. What could be wrong

// SelectItem event - Occurs when the user selects the item.
void __fastcall TForm1::ExContextMenu1SelectItem(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Clicked" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Button",TVariant(2),TNoParam());
		var_item->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsSelectButton | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

118:
How can I add a button (push button)

// SelectItem event - Occurs when the user selects the item.
void __fastcall TForm1::ExContextMenu1SelectItem(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Clicked" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Button",TNoParam(),TNoParam())->ShowAsButton = Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButtonAutoSize | Excontextmenulib_tlb::ShowAsButtonEnum::exShowAsButton;
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Button[button=0x03]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

117:
How can I display grouping items with no frame arround

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Horizontal Group",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupFrameThickBox | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupFrameSolidBox | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupEqualHeight | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupEqualWidth | Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"A",TNoParam(),TNoParam())->Alignment = Excontextmenulib_tlb::AlignmentEnum::exCenter;
			var_Items1->Add(L"BC",TNoParam(),TNoParam())->Alignment = Excontextmenulib_tlb::AlignmentEnum::exCenter;
			var_Items1->Add(L"D",TNoParam(),TNoParam())->Alignment = Excontextmenulib_tlb::AlignmentEnum::exCenter;
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Horizontal Group[group=243](A[id=20][align=1],BC[id=30][align=1],D[id=40][align=1])";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

116:
How can I display grouping items of the same size/width/height

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Horizontal Group",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupFrameThickBox | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupFrameSolidBox | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupEqualHeight | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupEqualWidth | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"A",TNoParam(),TNoParam())->Alignment = Excontextmenulib_tlb::AlignmentEnum::exCenter;
			var_Items1->Add(L"BC",TNoParam(),TNoParam())->Alignment = Excontextmenulib_tlb::AlignmentEnum::exCenter;
			var_Items1->Add(L"D",TNoParam(),TNoParam())->Alignment = Excontextmenulib_tlb::AlignmentEnum::exCenter;
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Horizontal Group[group=0xF1](A[id=20][align=1],BC[id=30][align=1],D[id=40][align=1])";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

115:
Is it possible to display a ticker frame arround grouping items

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Horizontal Group",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupFrameThickBox | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupFrameSolidBox | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Horizontal Group[group=193](Item 1[id=20],Item 2[id=30],Item 3[id=40])";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

114:
How do I display items horizontally arranged

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Horizontal Group",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Horizontal Group[group=0x01](Item 1[id=20],Item 2[id=30],Item 3[id=40])";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

113:
Is it possible to expand an item when it is clicked (tree,group,vertical)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Expand",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupVertical | Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		var_item->Check = true;
		var_item->ShowPopupOnChecked = true;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Padding = L"22,0,0,0";
			var_Items1->Add(L"Radio 1",TNoParam(),TNoParam())->Radio = true;
			var_Items1->Add(L"Radio 2",TNoParam(),TNoParam())->Radio = true;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"Radio 3",TNoParam(),TNoParam());
				var_item1->Radio = true;
				var_item1->Checked = true;
		var_item->Checked = true;
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = TVariant(String("Expand[typ=1][chk=1][spchk=-1][group=0x0103][itemspad=22,0,0,0](Radio 1[id=20][typ=2],Radio 2[id=30][typ=2],Radio 3[id=40][typ=") +
"2][chk=1])");
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

112:
Is it possible to expand an item when it is clicked (tree,group,vertical)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Expand",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupVertical | Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		var_item->Check = true;
		var_item->ShowPopupOnChecked = true;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Padding = L"22,0,0,0";
			var_Items1->Add(L"Radio 1",TNoParam(),TNoParam())->Radio = true;
			var_Items1->Add(L"Radio 2",TNoParam(),TNoParam())->Radio = true;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"Radio 3",TNoParam(),TNoParam());
				var_item1->Radio = true;
				var_item1->Checked = true;
		var_item->Checked = true;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

111:
Is it possible to expand an item when it is clicked (group)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Expand",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		var_item->ItemHeight = 24;
		var_item->Check = true;
		var_item->ShowPopupOnChecked = true;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

110:
Is it possible to extend an item when it is clicked

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Expand",TVariant(2),TNoParam());
		var_item->Check = true;
		var_item->ShowPopupOnChecked = true;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

109:
Does your control implement padding for item

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->BackColor = RGB(250,250,250);
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Padding = L"4,4,4,4";
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Item[pad=4,4,4,4]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

108:
How can I add an empty item for a horizontal group

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"",TVariant(2),TNoParam());
				var_item1->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupCenter | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
				var_item1->ItemHeight = 12;
				Excontextmenulib_tlb::IItemPtr var_item2 = var_item1->Items->Add(L"",TNoParam(),TNoParam());
					var_item2->Enabled = false;
					var_item2->ItemHeight = 8;
					var_item2->CaptionWidth = 8;
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

107:
How can I add an empty/separator item

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam());
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TNoParam(),TNoParam());
		var_item->Enabled = false;
		var_item->ItemHeight = 2;
		var_item->CaptionWidth = 8;
		var_item->BackColor = RGB(240,240,240);
	var_Items->Add(L"Item",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

106:
How can I add an empty/frame item

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item 1",TNoParam(),TNoParam());
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupCenter | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		var_item->ItemHeight = 12;
		Excontextmenulib_tlb::IItemPtr var_item1 = var_item->Items->Add(L"",TNoParam(),TNoParam());
			var_item1->Enabled = false;
			var_item1->ItemHeight = 8;
			var_item1->CaptionWidth = 8;
	var_Items->Add(L"Item 2",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

105:
How can I specify the height of the item

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->BackColor = RGB(250,250,250);
	var_Items->Add(L"Item",TNoParam(),TNoParam())->ItemHeight = 64;
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Item[height=64]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

104:
How can I specify the width of the item

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->BackColor = RGB(250,250,250);
	var_Items->Add(L"Item",TNoParam(),TNoParam())->CaptionWidth = 128;
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Item[captionwidth=128]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

103:
How do I align the item

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->BackColor = RGB(250,250,250);
	var_Items->Add(L"Item",TNoParam(),TNoParam());
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Item",TNoParam(),TNoParam());
		var_item->Alignment = Excontextmenulib_tlb::AlignmentEnum::exCenter;
		var_item->CaptionWidth = 128;
	Excontextmenulib_tlb::IItemPtr var_item1 = var_Items->Add(L"Item",TNoParam(),TNoParam());
		var_item1->Alignment = Excontextmenulib_tlb::AlignmentEnum::exRight;
		var_item1->CaptionWidth = 128;
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Item[align=1]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

102:
How can I underline the item

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Underline = true;
	var_Items->Add(L"<u>Item</u>",TNoParam(),TNoParam());
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Item[und]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

101:
How can I show the item as strikeout

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Strikeout = true;
	var_Items->Add(L"<s>Item</s>",TNoParam(),TNoParam());
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Item[stk]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

100:
How can I show the item in italics

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Italic = true;
	var_Items->Add(L"<i>Item</i>",TNoParam(),TNoParam());
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Item[itl]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

99:
How can I show the item in bold

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Bold = true;
	var_Items->Add(L"<b>Item</b>",TNoParam(),TNoParam());
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Item[bld]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

98:
How can I show the item as disabled but still be able to select or use it

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->ShowAsDisabled = true;
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Item[showdis=1]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

97:
How can I enable or disable an item

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Enabled = false;
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Item[dis]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

96:
How can I add a separator item

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->CaptionWidth = 128;
	var_Items->Add(L"<font ;6>separator",TVariant(1),TNoParam());
	var_Items->Add(L"Item",TNoParam(),TNoParam())->CaptionWidth = 128;
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"<font ;6>separator[sep]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

95:
How can I change the item's foreground color

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->ForeColor = RGB(255,0,0);
	var_Items->Add(L"<fgcolor FF0000>Item",TNoParam(),TNoParam());
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Item[fg=RGB(255,0,0)]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

94:
How can I change the item's background/backcolor, when the item is selected/checked (radio-buttons)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"Radio 1",TNoParam(),TNoParam());
				var_item1->HotBackColor = RGB(255,255,255);
				var_item1->SelBackColor = RGB(255,0,0);
				var_item1->SelHotBackColor = RGB(255,0,0);
				var_item1->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemHighlight;
				var_item1->Radio = true;
				var_item1->RadioGroup = 100;
				var_item1->Checked = true;
			Excontextmenulib_tlb::IItemPtr var_item2 = var_Items1->Add(L"Radio 2",TNoParam(),TNoParam());
				var_item2->HotBackColor = RGB(255,255,255);
				var_item2->SelBackColor = RGB(255,0,0);
				var_item2->SelHotBackColor = RGB(255,0,0);
				var_item2->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemHighlight;
				var_item2->Radio = true;
				var_item2->RadioGroup = 100;
			var_Items1->Add(L"",TNoParam(),TNoParam())->ToString = L"Radio 3[typ=2][show=1][grp=100][bghot=RGB(255,255,255)][bgsel=RGB(255,0,0)][bgselhot=RGB(255,0,0)]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

93:
How can I change the item's background/backcolor, when the item is selected/checked (check-box)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Check 1",TNoParam(),TNoParam());
		var_item->HotBackColor = RGB(255,255,255);
		var_item->SelBackColor = RGB(255,0,0);
		var_item->SelHotBackColor = RGB(255,0,0);
		var_item->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemHighlight;
		var_item->Checked = true;
		var_item->Check = true;
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Check 2[typ=1][chk=0][show=1][bghot=RGB(255,255,255)][bgsel=RGB(255,0,0)][bgselhot=RGB(255,0,0)]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

92:
How can I prevent showing the border for selected/highlight/hot items

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuSelBorderColor] = RGB(255,255,255);
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam());
	var_Items->Add(L"Item",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

91:
How can I change the item's background/backcolor, when the cursor hovers it (hot)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->HotBackColor = RGB(255,0,0);
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Item[bghot=RGB(255,0,0)]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

90:
How can I change the item's background/backcolor

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->BackColor = RGB(255,0,0);
	var_Items->Add(L"Item",TNoParam(),TNoParam())->BackColor = 0x1000000;
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"Item[bg=RGB(255,0,0)]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

89:
How can I specify/assign the item's identifier

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Debug = true;
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"ID 1",TVariant(0),TVariant(1000));
	var_Items->Add(L"ID 2",TNoParam(),TNoParam())->ID = 1001;
	var_Items->Add(L"",TNoParam(),TNoParam())->ToString = L"ID 3[id=1002]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

88:
How can I show a horizontal separator/line between groups (method 3,EBN color)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupVertical | Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"",TNoParam(),TNoParam());
				var_item1->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
				var_item1->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
				var_item1->EditWidth = -128;
				var_item1->set_EditValue(TVariant(25));
			Excontextmenulib_tlb::IItemPtr var_item2 = var_Items1->Add(L"",TNoParam(),TNoParam());
				var_item2->Enabled = false;
				var_item2->BackColor = 0x1000000;
				var_item2->ItemHeight = 8;
				var_item2->CaptionWidth = 128;
			Excontextmenulib_tlb::IItemPtr var_item3 = var_Items1->Add(L"",TNoParam(),TNoParam());
				var_item3->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
				var_item3->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
				var_item3->EditWidth = -128;
				var_item3->set_EditValue(TVariant(25));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

87:
How can I show a horizontal separator/line between groups (method 2,solid color)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupVertical | Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"",TNoParam(),TNoParam());
				var_item1->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
				var_item1->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
				var_item1->EditWidth = -128;
				var_item1->set_EditValue(TVariant(25));
			Excontextmenulib_tlb::IItemPtr var_item2 = var_Items1->Add(L"",TNoParam(),TNoParam());
				var_item2->Enabled = false;
				var_item2->BackColor = RGB(128,128,128);
				var_item2->ItemHeight = 8;
				var_item2->CaptionWidth = 128;
			Excontextmenulib_tlb::IItemPtr var_item3 = var_Items1->Add(L"",TNoParam(),TNoParam());
				var_item3->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
				var_item3->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
				var_item3->EditWidth = -128;
				var_item3->set_EditValue(TVariant(25));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

86:
How can I show a horizontal separator/line between groups (method 1,pattern)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupVertical | Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"",TNoParam(),TNoParam());
				var_item1->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
				var_item1->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
				var_item1->EditWidth = -128;
				var_item1->set_EditValue(TVariant(25));
			Excontextmenulib_tlb::IItemPtr var_item2 = var_Items1->Add(L"",TVariant(2),TNoParam());
				var_item2->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
				Excontextmenulib_tlb::IItemsPtr var_Items2 = var_item2->Items;
					Excontextmenulib_tlb::IItemPtr var_item3 = var_Items2->Add(L"",TNoParam(),TNoParam());
						var_item3->Enabled = false;
						var_item3->ItemHeight = 8;
						var_item3->CaptionWidth = 128;
					var_Items2->BackgroundExt = L"none[(0,50%-1,100%,2),pattern=0x006,patterncolor=RGB(128,128,128)]";
			Excontextmenulib_tlb::IItemPtr var_item4 = var_Items1->Add(L"",TNoParam(),TNoParam());
				var_item4->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
				var_item4->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
				var_item4->EditWidth = -128;
				var_item4->set_EditValue(TVariant(25));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

85:
How can I show a vertical separator/line between groups (method 3,EBN color)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"",TNoParam(),TNoParam());
				var_item1->ItemHeight = 128;
				var_item1->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditVertical | Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
				var_item1->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
				var_item1->EditWidth = 32;
				var_item1->set_EditValue(TVariant(25));
			Excontextmenulib_tlb::IItemPtr var_item2 = var_Items1->Add(L"",TNoParam(),TNoParam());
				var_item2->Enabled = false;
				var_item2->BackColor = 0x1000000;
				var_item2->ItemHeight = 96;
				var_item2->CaptionWidth = 8;
			Excontextmenulib_tlb::IItemPtr var_item3 = var_Items1->Add(L"",TNoParam(),TNoParam());
				var_item3->ItemHeight = 128;
				var_item3->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditVertical | Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
				var_item3->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
				var_item3->EditWidth = 32;
				var_item3->set_EditValue(TVariant(25));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

84:
How can I show a vertical separator/line between groups (method 2,solid color)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"",TNoParam(),TNoParam());
				var_item1->ItemHeight = 128;
				var_item1->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditVertical | Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
				var_item1->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
				var_item1->EditWidth = 32;
				var_item1->set_EditValue(TVariant(25));
			Excontextmenulib_tlb::IItemPtr var_item2 = var_Items1->Add(L"",TNoParam(),TNoParam());
				var_item2->Enabled = false;
				var_item2->BackColor = RGB(128,128,128);
				var_item2->ItemHeight = 96;
				var_item2->CaptionWidth = 8;
			Excontextmenulib_tlb::IItemPtr var_item3 = var_Items1->Add(L"",TNoParam(),TNoParam());
				var_item3->ItemHeight = 128;
				var_item3->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditVertical | Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
				var_item3->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
				var_item3->EditWidth = 32;
				var_item3->set_EditValue(TVariant(25));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

83:
How can I show a vertical separator/line between groups (method 1,pattern)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"",TNoParam(),TNoParam());
				var_item1->ItemHeight = 128;
				var_item1->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditVertical | Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
				var_item1->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
				var_item1->EditWidth = 32;
				var_item1->set_EditValue(TVariant(25));
			Excontextmenulib_tlb::IItemPtr var_item2 = var_Items1->Add(L"",TVariant(2),TNoParam());
				var_item2->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
				Excontextmenulib_tlb::IItemsPtr var_Items2 = var_item2->Items;
					Excontextmenulib_tlb::IItemPtr var_item3 = var_Items2->Add(L"",TNoParam(),TNoParam());
						var_item3->Enabled = false;
						var_item3->ItemHeight = 96;
						var_item3->CaptionWidth = 8;
					var_Items2->BackgroundExt = L"none[(50%-1,0,2,100%),pattern=6,patterncolor=RGB(128,128,128)]";
			Excontextmenulib_tlb::IItemPtr var_item4 = var_Items1->Add(L"",TNoParam(),TNoParam());
				var_item4->ItemHeight = 128;
				var_item4->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditVertical | Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
				var_item4->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
				var_item4->EditWidth = 32;
				var_item4->set_EditValue(TVariant(25));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

82:
How can I show a pattern on the items

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
	var_Items->BackColor = RGB(255,255,255);
	var_Items->Padding = L"2,2,2,12";
	var_Items->BackgroundExt = TVariant(String("root[pattern=0x006,patterncolor=RGB(128,128,128),frame=RGB(128,128,128)](bottom[2],bottom[12,text=`<font ;6><fgcolor 808080><of") +
"f -2> clipboard </off></font></fgcolor>`,align=0x21])");
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

81:
How can I show a thick frame arround the items

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
	var_Items->BackColor = RGB(255,255,255);
	var_Items->Padding = L"2,2,2,12";
	var_Items->BackgroundExt = TVariant(String("root[frame=RGB(128,128,128)](bottom[2],bottom[12,text=`<font ;6><fgcolor 808080><off -2> clipboard </off></font></fgcolor>`,ali") +
"gn=0x21])");
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

80:
How can I add some additional icons on the background

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Images(TVariant(String("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq") +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="));
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
	var_Items->BackColor = RGB(255,255,255);
	var_Items->Padding = L"0,0,0,16";
	var_Items->BackgroundExt = L"root[text=`<img>2</img><font ;6><fgcolor 808080><off -2> clipboard </off></font></fgcolor><img>2</img>`,align=0x21]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

79:
How can I add some additional text on the background

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
	var_Items->BackColor = RGB(255,255,255);
	var_Items->Padding = L"0,0,0,8";
	var_Items->BackgroundExt = L"root[text=`<font ;6><fgcolor 808080>clipboard`,align=0x21]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

78:
How can I assign a tooltip to an item (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = L"ToolTip[id=10][ttp=This is a bit of text that should be shown when cursor hovers the item]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

77:
How can I assign a tooltip to an item (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Items->Add(L"ToolTip",TNoParam(),TNoParam())->Tooltip = L"This is a bit of text that should be shown when cursor hovers the item";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

76:
How can I assign a spin field to the item (method 2)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Spin",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditSpin;
		var_item->EditWidth = 16;
		var_item->set_EditValue(TVariant(15));
		var_item->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
		var_item->set_EditOption(Excontextmenulib_tlb::EditOptionEnum::exEditMaxValue,TVariant(1000));
	Excontextmenulib_tlb::IItemPtr var_item1 = var_Items->Add(L"Edit-Spin",TNoParam(),TNoParam());
		var_item1->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditSpin | Excontextmenulib_tlb::AllowEditEnum::exItemEditText;
		var_item1->EditWidth = -128;
		var_item1->set_EditValue(TVariant(15));
		var_item1->set_EditOption(Excontextmenulib_tlb::EditOptionEnum::exEditMaxValue,TVariant(1000));
	Excontextmenulib_tlb::IItemPtr var_item2 = var_Items->Add(L"Splider-Spin",TNoParam(),TNoParam());
		var_item2->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditSpin | Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
		var_item2->EditWidth = -128;
		var_item2->set_EditValue(TVariant(25));
		var_item2->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

75:
How can I assign a spin field to the item (method 1)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = TVariant(String("Spin[id=10][edittype=0x0200][edit=15][border=0][max=1000][editwidth=16],Edit-Spin[id=20][edittype=0x0201][edit=15][max=1000][ed") +
"itwidth=-128],Splider-Spin[id=30][edittype=0x0203][edit=25][border=0][editwidth=-128]");
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

74:
How can I add a vertical slider (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = L"Vertical[id=10][edittype=0x0403][edit=25][border=0][height=128]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

73:
How can I add a vertical slider (method 1)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Vertical",TNoParam(),TNoParam());
		var_item->ItemHeight = 128;
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditVertical | Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
		var_item->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
		var_item->EditWidth = 32;
		var_item->set_EditValue(TVariant(25));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

72:
How can I disable an editor (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = L"Disabled[id=10][dis][edittype=0x01][edit=text-box][editwidth=-128]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

71:
How can I disable an editor (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Disabled",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditText;
		var_item->EditWidth = -128;
		var_item->set_EditValue(TVariant("text-box"));
		var_item->Enabled = false;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

70:
How can I lock an editor (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = L"Locked[id=10][edittype=0x0101][edit=disabled text-box][editwidth=-128]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

69:
How can I lock an editor (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Locked",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditReadOnly | Excontextmenulib_tlb::AllowEditEnum::exItemEditText;
		var_item->EditWidth = -128;
		var_item->set_EditValue(TVariant("disabled text-box"));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

68:
How can I assign a font field to the item (method 2)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Font",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditFont;
		var_item->EditWidth = -128;
		var_item->set_EditValue(TVariant("Tahoma"));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

67:
How can I assign a font field to the item (method 1)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = L"Font[id=10][edittype=0x07][edit=Tahoma][editwidth=-128]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

66:
How can I assign a color field to the item (method 2)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Color",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditColor;
		var_item->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
		var_item->EditWidth = -128;
		var_item->set_EditValue(TVariant(255));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

65:
How can I assign a color field to the item (method 1)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = L"Color[id=10][edittype=0x06][edit=#FF0000][border=0][editwidth=-128]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

64:
How can I assign a scrollbar field to the item (method 2)
// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"ScrollBar",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditScrollBar;
		var_item->EditWidth = -128;
		var_item->set_EditValue(TVariant("25"));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

63:
How can I assign a scrollbar field to the item (method 1)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = L"ScrollBar[id=10][edittype=0x05][edit=25][editwidth=-128]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

62:
Is it possible to change the tooltip beging shown when I change the slider/scroll/progress value

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Progress",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditProgress;
		var_item->EditWidth = -128;
		var_item->set_EditValue(TVariant(25));
		var_item->set_EditOption(Excontextmenulib_tlb::EditOptionEnum::exEditChangeToolTip,TVariant("`Current value is: ` + value"));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

61:
How can I hide the tooltip beging shown when I change the slider/scroll/progress value
// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Progress",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditProgress;
		var_item->EditWidth = -128;
		var_item->set_EditValue(TVariant(25));
		var_item->set_EditOption(Excontextmenulib_tlb::EditOptionEnum::exEditChangeToolTip,TVariant(""));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

60:
How can I assign a progress field to the item (method 2)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Progress",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditProgress;
		var_item->EditWidth = -128;
		var_item->set_EditValue(TVariant(25));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

59:
How can I assign a progress field to the item (method 1)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = L"Progress[id=10][edittype=0x04][edit=25][editwidth=-128]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

58:
How can I assign a slider field to the item (method 2)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Slider",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
		var_item->EditWidth = -128;
		var_item->set_EditValue(TVariant(25));
	Excontextmenulib_tlb::IItemPtr var_item1 = var_Items->Add(L"Slider",TNoParam(),TNoParam());
		var_item1->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditSlider;
		var_item1->EditBorder = Excontextmenulib_tlb::EditBorderEnum::exEditBorderNone;
		var_item1->EditWidth = -128;
		var_item1->set_EditOption(Excontextmenulib_tlb::EditOptionEnum::exEditMinValue,TVariant(50));
		var_item1->set_EditOption(Excontextmenulib_tlb::EditOptionEnum::exEditMaxValue,TVariant(450));
		var_item1->set_EditOption(Excontextmenulib_tlb::EditOptionEnum::exEditTickStyle,TVariant(2));
		var_item1->set_EditOption(Excontextmenulib_tlb::EditOptionEnum::exEditTickFrequency,TVariant(50));
		var_item1->set_EditOption(Excontextmenulib_tlb::EditOptionEnum::exEditTickLabel,TVariant(String("value = vmin ? '<br><font ;6><b>'+value : ( value = vmax ? '<br><font ;6><b>'+value : ( value = 200 ? '<br><font ;6><b><fgcolor") +
" FF0000>'+value : '' ) )"));
		var_item1->set_EditValue(TVariant(345));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

57:
How can I assign a slider field to the item (method 1)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = TVariant(String("Slider[id=10][edittype=0x03][edit=25][editwidth=-128],Slider[id=20][edittype=0x03][edit=345][border=0][min=50][max=450][tick=2]") +
"[freq=50][ticklabel=value = vmin ? '<br><font ;6><b>'+value : ( value = vmax ? '<br><font ;6><b>'+value : ( value = 200 ? '<br><" +
"font ;6><b><fgcolor FF0000>'+value : '' ) )][editwidth=-128]");
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

56:
How can I assign a mask (time) field to the item (method 2)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Time",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditMask;
		var_item->EditWidth = -128;
		var_item->EditMask = L"99:00:00;;0;overtype,warning=Invalid character";
		var_item->set_EditValue(TVariant("123456"));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

55:
How can I assign a mask (time) field to the item (method 1)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = L"Time[id=10][edittype=0x02][edit=12:34:56][mask=99:00:00;;0;overtype,warning=Invalid character][editwidth=-128]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

54:
How can I assign a mask (license key) field to the item (method 2)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"License Key",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditMask;
		var_item->EditWidth = -128;
		var_item->EditMask = L"AAAA-AAAA-AAAA-AAAA";
		var_item->set_EditValue(TVariant("1234"));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

53:
How can I assign a mask (license key) field to the item (method 1)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = L"License Key[id=10][edittype=0x02][edit=1234-____-____-____][mask=AAAA-AAAA-AAAA-AAAA][editwidth=-128]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

52:
How can I assign a mask (IP address) field to the item (method 2)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"IP Address",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditMask;
		var_item->EditWidth = -128;
		var_item->EditMask = L"{0,255}.{0,255}.{0,255}.{0,255}";
		var_item->set_EditValue(TVariant("1.2.3.4"));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

51:
How can I assign a mask (IP address) field to the item (method 1)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = L"IP Address[id=10][edittype=0x02][edit=1.2.3.4][mask={0,255}.{0,255}.{0,255}.{0,255}][editwidth=-128]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

50:
How can I assign a mask (phone) field to the item (method 2)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Phone",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditMask;
		var_item->EditWidth = -128;
		var_item->EditMask = L"!(9999) 000 000;;;empty,select=4,overtype,beep";
		var_item->set_EditValue(TVariant("0771638317"));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

49:
How can I assign a mask (phone) field to the item (method 1)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = L"Phone[id=10][edittype=0x02][edit=(0771) 638 317][mask=!(9999) 000 000;;;empty,select=4,overtype,beep][editwidth=-128]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

48:
How can I assign a mask (date) field to the item (method 2)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditMask;
		var_item->EditWidth = -128;
		var_item->EditMask = L"`Date: `{1,12}/{1,31}/{1950,2050};;;select=1";
		var_item->set_EditValue(TVariant(TDateTime(2015,2,15).operator double()));
	Excontextmenulib_tlb::IItemPtr var_item1 = var_Items->Add(L"Date",TNoParam(),TNoParam());
		var_item1->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditMask;
		var_item1->EditWidth = -128;
		var_item1->EditMask = L"!00/00/0000;;0;empty,validateas=1,invalid=Invalid date!,warning=Invalid character!,select=4,overtype";
		var_item1->set_EditValue(TVariant(TDateTime(2015,2,15).operator double()));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

47:
How can I assign a mask (date) field to the item (method 1)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = TVariant(String("[id=10][edittype=0x02][edit=Date: 2/15/2015][mask=`Date: `{1,12}/{1,31}/{1950,2050};;;select=1][editwidth=-128],Date[id=20][edi") +
"ttype=0x02][edit=02/15/2015][mask=!00/00/0000;;0;empty,validateas=1,invalid=Invalid date!,warning=Invalid character!,select=4,ov" +
"ertype][editwidth=-128]");
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

46:
How can I assign a mask (integer) field to the item (method 2)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Integer",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditMask;
		var_item->EditWidth = -128;
		var_item->EditMask = L";;;float,grouping=,digits=0";
		var_item->set_EditValue(TVariant(1000));
	Excontextmenulib_tlb::IItemPtr var_item1 = var_Items->Add(L"Integer-Grouping",TNoParam(),TNoParam());
		var_item1->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditMask;
		var_item1->EditWidth = -128;
		var_item1->EditMask = L";;;float,decimal=,digits=0,select=1";
		var_item1->set_EditValue(TVariant(1000));
	Excontextmenulib_tlb::IItemPtr var_item2 = var_Items->Add(L"Integer-In-Range",TNoParam(),TNoParam());
		var_item2->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditMask;
		var_item2->EditWidth = -128;
		var_item2->EditMask = L"{0,2050}";
		var_item2->set_EditValue(TVariant(1000));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

45:
How can I assign a mask (integer) field to the item (method 1)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = TVariant(String("Integer[id=10][edittype=0x02][edit=1000][mask=;;;float,grouping=,digits=0][editwidth=-128],Integer-Grouping[id=20][edittype=0x0") +
"2][edit=1,000][mask=;;;float,decimal=,digits=0,select=1][editwidth=-128],Integer-In-Range[id=30][edittype=0x02][edit=1000][mask=" +
"{0,2050}][editwidth=-128]");
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

44:
How can I assign a mask field to the item (method 2)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Mask",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditMask;
		var_item->EditWidth = -128;
		var_item->EditMask = L";;;float,select=1";
		var_item->set_EditValue(TVariant(1000));
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

43:
How can I assign a mask field to the item (method 1)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = L"Text-Box[id=10][edittype=0x02][edit=1,000][mask=;;;float,select=1][editwidth=-128]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

42:
How can I assign an edit / text-box to the item (method 2)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"Mask",TNoParam(),TNoParam());
		var_item->AllowEdit = Excontextmenulib_tlb::AllowEditEnum::exItemEditText;
		var_item->set_EditValue(TVariant("this is a text"));
		var_item->EditWidth = -128;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

41:
How can I assign an edit / text-box to the item (method 1)

// EditChange event - Occurs when the user alters the item's text box field.
void __fastcall TForm1::ExContextMenu1EditChange(TObject *Sender,Excontextmenulib_tlb::IItem   *Itm)
{
	OutputDebugString( L"Itm" );
}

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = L"Text-Box[edit=this is a text][editwidth=-128]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

40:
How can I display a tab into the context menu (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuSelBorderColor] = RGB(240,240,240);
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->ToString = TVariant(String("[id=0][group=0x0103][itemspad=4,4,4,4]([id=-10][group=0x03](),[id=0][bg=RGB(240,240,240)][group=0x03][itemspad=4,4,4,4]([id=-10") +
"0]))");
	Excontextmenulib_tlb::IItemsPtr var_Items1 = var_Items->get_item(TVariant(-10))->Items;
		var_Items1->Add(L"",TVariant(0),TVariant(0))->Padding = L"8,0,0,0";
		Excontextmenulib_tlb::IItemPtr var_item = var_Items1->Add(L"New Page",TNoParam(),TNoParam());
			var_item->ToString = TVariant(String("[typ=2][chk=1][spchk=-1][show=1][grp=10][bghot=RGB(255,255,255)][bgsel=RGB(240,240,240)][bgselhot=RGB(240,240,240)][height=16][") +
"group=0x03][tab=-100][pad=2,0,2,0]([id=50][group=0x03]([]))");
			var_item->Caption = L"Page<off -5><font ;5><b>1</b></font></off>";
			Excontextmenulib_tlb::IItemsPtr var_Items2 = var_item->Items;
				var_Items2->Add(L"add here fields for page 1",TNoParam(),TNoParam())->Enabled = false;
		Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"New Page",TNoParam(),TNoParam());
			var_item1->ToString = TVariant(String("[typ=2][chk=0][spchk=-1][show=1][grp=10][bghot=RGB(255,255,255)][bgsel=RGB(240,240,240)][bgselhot=RGB(240,240,240)][height=16][") +
"group=0x03][tab=-100][pad=2,0,2,0]([id=50][group=0x03]([]))");
			var_item1->Caption = L"Page<off -5><font ;5><b>2</b></font></off>";
			Excontextmenulib_tlb::IItemsPtr var_Items3 = var_item1->Items;
				var_Items3->Add(L"add here fields for page 2",TNoParam(),TNoParam())->Enabled = false;
		var_Items1->Add(L"",TVariant(0),TVariant(0))->Padding = L"8,0,0,0";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

39:
How can I add check-buttons to items, without showing the check-box (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"Check 1",TNoParam(),TNoParam());
				var_item1->Check = true;
				var_item1->Checked = true;
				var_item1->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemHighlight;
			Excontextmenulib_tlb::IItemPtr var_item2 = var_Items1->Add(L"Check 2",TNoParam(),TNoParam());
				var_item2->Check = true;
				var_item2->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemHighlight;
			Excontextmenulib_tlb::IItemPtr var_item3 = var_Items1->Add(L"Check 3",TNoParam(),TNoParam());
				var_item3->Check = true;
				var_item3->Checked = true;
				var_item3->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemHighlight;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

38:
How can I add check-buttons to items, without showing the check-box (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = L"[group=0x3](Check 1[chk=1][show=1],Check 2[chk=0][show=1],Check 3[chk=1][show=1])";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

37:
How can I add radio buttons to items, without showing the radio-buttons (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"Radio 1",TNoParam(),TVariant(1000));
				var_item1->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemHighlight;
				var_item1->Radio = true;
				var_item1->RadioGroup = 100;
			Excontextmenulib_tlb::IItemPtr var_item2 = var_Items1->Add(L"Radio 2",TNoParam(),TVariant(1001));
				var_item2->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemHighlight;
				var_item2->Radio = true;
				var_item2->RadioGroup = 100;
			Excontextmenulib_tlb::IItemPtr var_item3 = var_Items1->Add(L"Radio 2",TNoParam(),TVariant(1003));
				var_item3->ShowCheckedAsSelected = Excontextmenulib_tlb::ShowCheckedAsSelectedEnum::exDisplayItemHighlight;
				var_item3->Radio = true;
				var_item3->RadioGroup = 100;
			var_Items1->get_item(TVariant(1000))->Checked = true;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

36:
How can I add radio buttons to items, without showing the radio-buttons (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = TVariant(String("[group=0x3](Radio 1[rad=1][show=1][grp=100][id=1000],Radio 2[rad=0][show=1][grp=100][id=1001],Radio 2[rad=0][show=1][grp=100][i") +
"d=1002])");
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

35:
How can I add check-buttons to items (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"Check 1",TNoParam(),TNoParam());
				var_item1->Check = true;
				var_item1->Checked = true;
			var_Items1->Add(L"Check 2",TNoParam(),TNoParam())->Check = true;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

34:
How can I add check-buttons to items (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = L"[group=0x3](Check 1[chk=1],Check 2[chk=0])";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

33:
How can I add radio buttons to items (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"Radio 1",TNoParam(),TVariant(1000));
				var_item1->Radio = true;
				var_item1->RadioGroup = 100;
			Excontextmenulib_tlb::IItemPtr var_item2 = var_Items1->Add(L"Radio 2",TNoParam(),TVariant(1001));
				var_item2->Radio = true;
				var_item2->RadioGroup = 100;
			Excontextmenulib_tlb::IItemPtr var_item3 = var_Items1->Add(L"Radio 2",TNoParam(),TVariant(1003));
				var_item3->Radio = true;
				var_item3->RadioGroup = 100;
			var_Items1->get_item(TVariant(1000))->Checked = true;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

32:
How can I add radio buttons to items (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->ToString = L"[group=0x1](Radio 1[rad=1][grp=100][id=1000],Radio 2[rad=0][grp=100][id=1001],Radio 2[rad=0][grp=100][id=1002])";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

31:
How can I change the selection/highlighting color

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->SelBackColor = RGB(0,0,0);
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuSelBorderColor] = RGB(128,0,0);
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuHotForeColor] = RGB(255,255,255);
ExContextMenu1->ToString = L"[group=3](Item 1[chk],Item 2[chk])";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

30:
How can I prevent showing/hide the border on the selected/highlighted item

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuSelBorderColor] = ExContextMenu1->SelBackColor;
ExContextMenu1->ToString = L"Item 1,Item 2";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

29:
How can I display a tab into the context menu (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Background[Excontextmenulib_tlb::BackgroundPartEnum::exMenuSelBorderColor] = RGB(240,240,240);
ExContextMenu1->ToString = TVariant(String("[id=10][group=0x0103][itemspad=4,4,4,4]([id=20][group=0x03]([id=30][pad=8,0,0,0],Page<off -5><font ;5><b>1</b></font></off>[id=") +
"40][typ=2][chk=1][spchk=-1][show=1][grp=10][bghot=RGB(255,255,255)][bgsel=RGB(240,240,240)][bgselhot=RGB(240,240,240)][height=16" +
"][group=0x03][tab=9000][pad=2,0,2,0]([id=50][group=0x03](add here fields for page 1[dis])),Page<off -5><font ;5><b>2</b></font><" +
"/off>[id=120][typ=2][spchk=-1][show=1][grp=10][bghot=RGB(255,255,255)][bgsel=RGB(240,240,240)][bgselhot=RGB(240,240,240)][height" +
"=16][group=0x03][tab=9000][pad=2,0,2,0]([id=130][group=0x03](add here fields for page 2[dis])),[id=180][pad=8,0,0,0]),[id=190][b" +
"g=RGB(240,240,240)][group=0x03][itemspad=4,4,4,4]([id=9000]))");
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

28:
How do I prevent highlighting the item (method 2.b)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"No highlight",TNoParam(),TNoParam())->Enabled = false;
	var_Items->Add(L"Item 2",TNoParam(),TNoParam());
	var_Items->Add(L"Item 3",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

27:
How do I prevent highlighting the item (method 2.a)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"No highlight",TVariant(2),TNoParam());
		var_item->Items->Add(L"",TNoParam(),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
	var_Items->Add(L"Item 2",TNoParam(),TNoParam());
	var_Items->Add(L"Item 3",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

26:
How do I prevent highlighting the item (method 1.b)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Items->ToString = L"No highlight[dis],Item 2,Item 3";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

25:
How do I prevent highlighting the item (method 1.a)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Items->ToString = L"No highlight[group=0x3][arrow=0]([]),Item 2,Item 3";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

24:
How can I can I assign pictures or images for the item (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->HTMLPicture[L"pic1"] = TVariant("c:\\exontrol\\images\\zipdisk.gif");
ExContextMenu1->HTMLPicture[L"pic2"] = TVariant("c:\\exontrol\\images\\auction.gif");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->HTMLImage = L"pic1";
	var_Items->Add(L"Item",TNoParam(),TNoParam())->HTMLImage = L"pic2";
	var_Items->Add(L"",TVariant(1),TNoParam());
	var_Items->Add(L"Item <img>pic1</img>",TNoParam(),TNoParam());
	var_Items->Add(L"Item <img>pic2</img>",TNoParam(),TNoParam());
	var_Items->Add(L"",TVariant(1),TNoParam());
	var_Items->Add(L"<img>pic1</img> Item <img>pic2</img>",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

23:
How can I can I assign pictures or images for the item (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->HTMLPicture[L"pic1"] = TVariant("c:\\exontrol\\images\\zipdisk.gif");
ExContextMenu1->HTMLPicture[L"pic2"] = TVariant("c:\\exontrol\\images\\auction.gif");
ExContextMenu1->ToString = L"Item[himg=pic1],Item[himg=pic2],[sep],Item <img>pic1</img>,Item <img>pic2</img>,[sep],<img>pic1</img> Item <img>pic2</img>";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

22:
How can I can I assign icons for the item (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Images(TVariant(String("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq") +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="));
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Image = 1;
	var_Items->Add(L"Item",TNoParam(),TNoParam())->Image = 2;
	var_Items->Add(L"",TVariant(1),TNoParam());
	var_Items->Add(L"Item <img>1</img>",TNoParam(),TNoParam());
	var_Items->Add(L"Item <img>2</img>",TNoParam(),TNoParam());
	var_Items->Add(L"",TVariant(1),TNoParam());
	var_Items->Add(L"Item <img>1</img>",TNoParam(),TNoParam())->Image = 1;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

21:
How can I can I assign icons for the item (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Images(TVariant(String("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq") +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="));
ExContextMenu1->Items->ToString = L"Item[img=1],Item[img=2],[sep],Item <img>1</img>,Item <img>2</img>,[sep],Item <img>1</img>[img=1]";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

20:
How can I change the visual appearance / background color (EBN) for a collection of items/group (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Padding = L"2,2,2,2";
	var_Items->BackColor = 0x1000000;
	var_Items->Add(L"Item 1",TNoParam(),TNoParam());
	var_Items->Add(L"Item 2",TNoParam(),TNoParam());
	var_Items->Add(L"Item 3",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

19:
How can I change the visual appearance / background color (EBN) for a collection of items/group (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
ExContextMenu1->Items->ToString = L"[itemsbg=0x1000000][itemspad=2,2,2,2][group=0x103](Item 1,Item 2,Item 3)";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

18:
How can I change the background color for a collection of items/group (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Padding = L"2,2,2,2";
	var_Items->BackColor = RGB(255,0,0);
	var_Items->Add(L"Item 1",TNoParam(),TNoParam());
	var_Items->Add(L"Item 2",TNoParam(),TNoParam());
	var_Items->Add(L"Item 3",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

17:
How can I change the background color for a collection of items/group (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Items->ToString = L"[itemsbg=RGB(255,0,0)][itemspad=2,2,2,2][group=0x103](Item 1,Item 2,Item 3)";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

16:
How can I change the visual appearance / background color (EBN) for a specified item (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item 1",TNoParam(),TNoParam());
	var_Items->Add(L"Item 2",TNoParam(),TNoParam())->BackColor = 0x1000000;
	var_Items->Add(L"Item 3",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

15:
How can I change the visual appearance / background color (EBN) for a specified item (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->VisualAppearance->Add(1,TVariant("c:\\exontrol\\images\\normal.ebn"));
ExContextMenu1->Items->ToString = L"Item 1,Item 2[bg=0x1000000],Item 3";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

14:
How can I change the background color for a specified item (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item 1",TNoParam(),TNoParam());
	var_Items->Add(L"Item 2",TNoParam(),TNoParam())->BackColor = RGB(255,0,0);
	var_Items->Add(L"Item 3",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

13:
How can I change the background color for a specified item (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Items->ToString = L"Item 1,Item 2[bg=RGB(255,0,0)],Item 3";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

12:
How do I add a popup or a sub-menu so it show when cursor hovers it (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemsPtr var_Items1 = var_Items->Add(L"Popup",TVariant(2),TNoParam())->Items;
		var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
		var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
		var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

11:
How do I add a popup or a sub-menu so it show when cursor hovers it (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Items->ToString = L"Popup(Item 1,Item 2,Item 3)";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

10:
How can I arrange the items by grouping (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			Excontextmenulib_tlb::IItemPtr var_item1 = var_Items1->Add(L"Horizontal",TVariant(2),TNoParam());
				var_item1->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
				Excontextmenulib_tlb::IItemsPtr var_Items2 = var_item1->Items;
					var_Items2->Add(L"Sub-Item <b>A</b>",TNoParam(),TNoParam());
					var_Items2->Add(L"Sub-Item <b>B</b>",TNoParam(),TNoParam());
					var_Items2->Add(L"Sub-Item <b>C</b>",TNoParam(),TNoParam());
			var_Items1->Add(L"",TNoParam(),TNoParam())->CaptionWidth = 16;
			Excontextmenulib_tlb::IItemPtr var_item2 = var_Items1->Add(L"Vertical",TVariant(2),TNoParam());
				var_item2->Alignment = Excontextmenulib_tlb::AlignmentEnum::exCenter;
				var_item2->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exGroupPopupVertical | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
				Excontextmenulib_tlb::IItemsPtr var_Items3 = var_item2->Items;
					var_Items3->Add(L"Sub-Item <b>A</b>",TNoParam(),TNoParam());
					var_Items3->Add(L"Sub-Item <b>B</b>",TNoParam(),TNoParam());
					var_Items3->Add(L"Sub-Item <b>C</b>",TNoParam(),TNoParam());
			var_Items1->Add(L"",TNoParam(),TNoParam())->CaptionWidth = 16;
			Excontextmenulib_tlb::IItemPtr var_item3 = var_Items1->Add(L"Popup",TVariant(2),TNoParam());
				Excontextmenulib_tlb::IItemsPtr var_Items4 = var_item3->Items;
					var_Items4->Add(L"Sub-Item <b>A</b>",TNoParam(),TNoParam());
					var_Items4->Add(L"Sub-Item <b>B</b>",TNoParam(),TNoParam());
					var_Items4->Add(L"Sub-Item <b>C</b>",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

9:
How can I arrange the items by grouping (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Items->ToString = TVariant(String("[group=0x03](Horizontal[group=0x01](Sub-Item <b>A</b>,Sub-Item <b>B</b>,Sub-Item <b>C</b>),[captionwidth=16],Vertical[group=0x0") +
"101][align=1](Sub-Item <b>A</b>,Sub-Item <b>B</b>,Sub-Item <b>C</b>),[captionwidth=16],Popup(Sub-Item <b>A</b>,Sub-Item <b>B</b>" +
",Sub-Item <b>C</b>),[captionwidth=160])");
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

8:
How can I arrange some items vertically, and some horizontally (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"1",TNoParam(),TNoParam());
			var_Items1->Add(L"2",TNoParam(),TNoParam());
			var_Items1->Add(L"3",TNoParam(),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
	Excontextmenulib_tlb::IItemPtr var_item1 = var_Items->Add(L"",TVariant(2),TNoParam());
		Excontextmenulib_tlb::IItemsPtr var_Items2 = var_item1->Items;
			var_Items2->Add(L"4",TNoParam(),TNoParam());
			var_Items2->Add(L"5",TNoParam(),TNoParam());
			var_Items2->Add(L"6",TNoParam(),TNoParam());
		var_item1->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
	Excontextmenulib_tlb::IItemPtr var_item2 = var_Items->Add(L"",TVariant(2),TNoParam());
		Excontextmenulib_tlb::IItemsPtr var_Items3 = var_item2->Items;
			var_Items3->Add(L"7",TNoParam(),TNoParam());
			var_Items3->Add(L"8",TNoParam(),TNoParam());
			var_Items3->Add(L"9",TNoParam(),TNoParam());
		var_item2->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

7:
How can I arrange some items vertically, and some horizontally (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Items->ToString = L"[group=3](1,2,3),[group=3](4,5,6),[group=3](7,8,9)";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

6:
How can I assign multiple-lines to an item (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam())->Caption = L"Item <br><c><b>1";
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam())->Caption = L"Item <br><c><b>2";
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam())->Caption = L"Item <br><c><b>3";
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

5:
How can I assign multiple-lines to an item (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Items->ToString = L"[group=3](Item <br><c><b>1,Item <br><c><b>2,Item <br><c><b>3)";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

4:
How can I add new items arranged horizontally to the context menu (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	Excontextmenulib_tlb::IItemPtr var_item = var_Items->Add(L"",TVariant(2),TNoParam());
		Excontextmenulib_tlb::IItemsPtr var_Items1 = var_item->Items;
			var_Items1->Add(L"Item 1",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 2",TNoParam(),TNoParam());
			var_Items1->Add(L"Item 3",TNoParam(),TNoParam());
		var_item->GroupPopup = Excontextmenulib_tlb::GroupPopupEnum::exNoGroupPopupFrame | Excontextmenulib_tlb::GroupPopupEnum::exGroupPopup;
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

3:
How can I add new items arranged horizontally to the context menu (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Items->ToString = L"[group=3](Item 1,Item 2,Item 3)";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

2:
How can I add new items to the context menu (method 2)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
Excontextmenulib_tlb::IItemsPtr var_Items = ExContextMenu1->Items;
	var_Items->Add(L"Item 1",TNoParam(),TNoParam());
	var_Items->Add(L"Item 2",TNoParam(),TNoParam());
	var_Items->Add(L"Item 3",TNoParam(),TNoParam());
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());

1:
How can I add new items to the context menu (method 1)

Excontextmenulib_tlb::IExContextMenuPtr ExContextMenu1 = Variant::CreateObject(L"Exontrol.ContextMenu.1");
ExContextMenu1->Items->ToString = L"Item 1,Item 2,Item 3";
ExContextMenu1->Select(TNoParam(),TNoParam(),TNoParam());