13:
Can I display items one below to other

with AxToolBarCRD1 do
begin
	Format := '(1/2):64,(3/4):64';
	get_Item(TObject(1)).Caption := 'Item <off 4><b>A';
	get_Item(TObject(2)).Caption := 'Item <off 4><b>B';
	get_Item(TObject(3)).Caption := 'Item <off 4><b>C';
	get_Item(TObject(4)).Caption := 'Item <off 4><b>D';
end
12:
How can I add a separator item

with AxToolBarCRD1 do
begin
	Format := '1,2,-1,3,4';
end
11:
Is it possible to disable an item

with AxToolBarCRD1 do
begin
	Images('gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTql' + 
	'Vq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0' + 
	'ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN' + 
	'AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=');
	BackColor := Color.FromArgb(255,255,255);
	Format := '1,2,3';
	get_Item(TObject(1)).Caption := '<img>1</img>';
	get_Item(TObject(2)).Caption := '<img>2</img>';
	with get_Item(TObject(3)) do
	begin
		Caption := '<img>3</img>Disabled';
		Enabled := False;
	end;
end
10:
Is it possible to change the item's caption/image when user hovers the cursor

// MouseIn event - Occurs when the mouse enters the part.
procedure TWinForm1.AxToolBarCRD1_MouseIn(sender: System.Object; e: AxEXTOOLBARCRDLib._IToolBarCRDEvents_MouseInEvent);
begin
	with AxToolBarCRD1 do
	begin
		get_Item(TObject(e.iD)).Caption := 'hover';
	end
end;

// MouseOut event - Occurs when the mouse exists the part.
procedure TWinForm1.AxToolBarCRD1_MouseOut(sender: System.Object; e: AxEXTOOLBARCRDLib._IToolBarCRDEvents_MouseOutEvent);
begin
	with AxToolBarCRD1 do
	begin
		get_Item(TObject(e.iD)).Caption := e.iD;
	end
end;

with AxToolBarCRD1 do
begin
	Format := '1,2,3,4';
end
9:
Does your control support tooltip for items

with AxToolBarCRD1 do
begin
	Format := '(1/2),3';
	with get_Item(TObject(1)) do
	begin
		Caption := 'Item <b>1';
		ToolTip := 'This is a bit of text that''s shown when cursor hovers the item';
	end;
	get_Item(TObject(2)).Caption := 'Item <b>2';
	get_Item(TObject(3)).Caption := 'Item <b>3';
end
8:
Is it possible to add an anchor element, similar to a link into a webpage

// AnchorClick event - Occurs when an anchor element is clicked.
procedure TWinForm1.AxToolBarCRD1_AnchorClick(sender: System.Object; e: AxEXTOOLBARCRDLib._IToolBarCRDEvents_AnchorClickEvent);
begin
	with AxToolBarCRD1 do
	begin
		OutputDebugString( e.anchorID );
	end
end;

with AxToolBarCRD1 do
begin
	BackColor := Color.FromArgb(255,255,255);
	Format := '"<a a1>link</a>":32,1,2,3';
end
7:
How can I change the background of the hovering item

with AxToolBarCRD1 do
begin
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	set_Background(EXTOOLBARCRDLib.BackgroundPartEnum.exToolBarButtonHotBackColor,$1000000);
	Format := '1,2,3,4';
end
6:
Can I display an item aligned to the right

with AxToolBarCRD1 do
begin
	Format := '1,2,|,3:64';
	get_Item(TObject(3)).Caption := '< <b>right</b> >';
end
5:
Can I display pictures in the toolbar

with AxToolBarCRD1 do
begin
	set_HTMLPicture('pic1','c:\exontrol\images\card.png');
	set_HTMLPicture('pic2','c:\exontrol\images\diary.png');
	Format := '1,2,3';
	get_Item(TObject(1)).Caption := '<img>pic1:48</img>';
	get_Item(TObject(2)).Caption := '<img>pic2:30</img>';
	get_Item(TObject(3)).Caption := '<img>pic1:24</img> Picture';
end
4:
Can I display icons in the toolbar

with AxToolBarCRD1 do
begin
	Images('gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTql' + 
	'Vq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0' + 
	'ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN' + 
	'AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=');
	BackColor := Color.FromArgb(255,255,255);
	Format := '1,2,3';
	get_Item(TObject(1)).Caption := '<img>1</img>';
	get_Item(TObject(2)).Caption := '<img>2</img>';
	get_Item(TObject(3)).Caption := '<img>3</img>Icon';
end
3:
How can I get ride of the top-bottom lines

with AxToolBarCRD1 do
begin
	Appearance := EXTOOLBARCRDLib.AppearanceEnum.Etched;
	BackColor := Color.FromArgb(255,255,255);
	Format := '1,-1,2';
	get_Item(TObject(1)).Caption := 'Exit';
	get_Item(TObject(2)).Caption := 'Item <b>A\r\nItem <b>A#1\r\nItem <b>B#2\r\nItem <b>C#3';
end
2:
How can I display a drop-down panel

// Select event - Notifies once the user clicks the item.
procedure TWinForm1.AxToolBarCRD1_Select(sender: System.Object; e: AxEXTOOLBARCRDLib._IToolBarCRDEvents_SelectEvent);
begin
	with AxToolBarCRD1 do
	begin
		OutputDebugString( 'Select' );
		OutputDebugString( e.selectedID );
	end
end;

with AxToolBarCRD1 do
begin
	Format := '1,-1,2';
	get_Item(TObject(1)).Caption := 'Exit';
	get_Item(TObject(2)).Caption := 'Item <b>A\r\nItem <b>A#1\r\nItem <b>B#2\r\nItem <b>C#3';
end
1:
How can I add / display items with the toolbar

// Select event - Notifies once the user clicks the item.
procedure TWinForm1.AxToolBarCRD1_Select(sender: System.Object; e: AxEXTOOLBARCRDLib._IToolBarCRDEvents_SelectEvent);
begin
	with AxToolBarCRD1 do
	begin
		OutputDebugString( 'Select' );
		OutputDebugString( get_Item(TObject(e.iD)).Caption );
	end
end;

with AxToolBarCRD1 do
begin
	Format := '1,-1,2,3';
	get_Item(TObject(1)).Caption := 'Exit';
	get_Item(TObject(2)).Caption := 'Item <b>A';
	get_Item(TObject(3)).Caption := 'Item <b>B';
end