87:
I can not reach the Maximum value I set. What can be the problem
// Changing event - Occurs when the value of the control is about to change.
procedure TForm1.ScrollBar1Changing(ASender: TObject; OldValue : Integer;var NewValue : Integer);
begin
	with ScrollBar1 do
	begin
		ToolTipText := NewValue;
	end
end;

with ScrollBar1 do
begin
	IgnoreLargeChange := True;
	Maximum := 128;
	Value := 128;
end
86:
How do I use the RenderType property

with ScrollBar1 do
begin
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	Background[EXSCROLLBARLib_TLB.exVSThumb] := $1000000;
	VisualAppearance.RenderType := 1073742079;
end
85:
How can I make a spin control

// Change event - Occurs when the value of the control is changed.
procedure TForm1.ScrollBar1Change(ASender: TObject; );
begin
	with ScrollBar1 do
	begin
		OutputDebugString( 'Change' );
		OutputDebugString( Value );
	end
end;

with ScrollBar1 do
begin
	ThumbSize := 0;
end
84:
How can I change the tooltip's border using your EBN files with a different color

with ScrollBar1 do
begin
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	Background[EXSCROLLBARLib_TLB.exToolTipAppearance] := $100ffa0;
	ToolTipText := 'This is just a text that''s displayed when the user clicks and drags the thumb to a new position';
	Value := 43;
end
83:
Can I change the color for the control's border

with ScrollBar1 do
begin
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	Appearance := EXSCROLLBARLib_TLB.AppearanceEnum($10000f8 Or Integer(EXSCROLLBARLib_TLB.Bump) Or Integer(EXSCROLLBARLib_TLB.Sunken));
end
82:
How do I change the control's border, using your EBN files

with ScrollBar1 do
begin
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	Appearance := EXSCROLLBARLib_TLB.AppearanceEnum($1000000);
end
81:
How can I change the visual appearance of the right button usign your EBN files

with ScrollBar1 do
begin
	Mode := EXSCROLLBARLib_TLB.exHorizontal;
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	VisualAppearance.Add(2,'c:\exontrol\images\pushed.ebn');
	VisualAppearance.Add(3,'c:\exontrol\images\hot.ebn');
	Background[EXSCROLLBARLib_TLB.exHSRight] := $1000000;
	Background[EXSCROLLBARLib_TLB.exHSRightP] := $2000000;
	Background[EXSCROLLBARLib_TLB.exHSRightD] := $1000000;
	Background[EXSCROLLBARLib_TLB.exHSRightH] := $3000000;
end
80:
How can I change the visual appearance of the thumb usign your EBN files

with ScrollBar1 do
begin
	Mode := EXSCROLLBARLib_TLB.exHorizontal;
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	VisualAppearance.Add(2,'c:\exontrol\images\pushed.ebn');
	VisualAppearance.Add(3,'c:\exontrol\images\hot.ebn');
	Background[EXSCROLLBARLib_TLB.exHSThumb] := $1000000;
	Background[EXSCROLLBARLib_TLB.exHSThumbP] := $2000000;
	Background[EXSCROLLBARLib_TLB.exHSThumbD] := $1000000;
	Background[EXSCROLLBARLib_TLB.exHSThumbH] := $3000000;
end
79:
How can I change the visual appearance of the left button usign your EBN files

with ScrollBar1 do
begin
	Mode := EXSCROLLBARLib_TLB.exHorizontal;
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	VisualAppearance.Add(2,'c:\exontrol\images\pushed.ebn');
	VisualAppearance.Add(3,'c:\exontrol\images\hot.ebn');
	Background[EXSCROLLBARLib_TLB.exHSLeft] := $1000000;
	Background[EXSCROLLBARLib_TLB.exHSLeftP] := $2000000;
	Background[EXSCROLLBARLib_TLB.exHSLeftD] := $1000000;
	Background[EXSCROLLBARLib_TLB.exHSLeftH] := $3000000;
end
78:
How can I change the visual appearance for all buttons usign your EBN files

with ScrollBar1 do
begin
	Mode := EXSCROLLBARLib_TLB.exHorizontal;
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	VisualAppearance.Add(2,'c:\exontrol\images\pushed.ebn');
	VisualAppearance.Add(3,'c:\exontrol\images\hot.ebn');
	Background[EXSCROLLBARLib_TLB.exSBtn] := $1000000;
	Background[EXSCROLLBARLib_TLB.exSBtnP] := $2000000;
	Background[EXSCROLLBARLib_TLB.exSBtnD] := $1000000;
	Background[EXSCROLLBARLib_TLB.exSBtnH] := $3000000;
end
77:
How can I change the visual appearance of the down button usign your EBN files

with ScrollBar1 do
begin
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	VisualAppearance.Add(2,'c:\exontrol\images\pushed.ebn');
	VisualAppearance.Add(3,'c:\exontrol\images\hot.ebn');
	Background[EXSCROLLBARLib_TLB.exVSDown] := $1000000;
	Background[EXSCROLLBARLib_TLB.exVSDownP] := $2000000;
	Background[EXSCROLLBARLib_TLB.exVSDownD] := $1000000;
	Background[EXSCROLLBARLib_TLB.exVSDownH] := $3000000;
end
76:
How can I change the visual appearance of the thumb usign your EBN files

with ScrollBar1 do
begin
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	VisualAppearance.Add(2,'c:\exontrol\images\pushed.ebn');
	VisualAppearance.Add(3,'c:\exontrol\images\hot.ebn');
	Background[EXSCROLLBARLib_TLB.exVSThumb] := $1000000;
	Background[EXSCROLLBARLib_TLB.exVSThumbP] := $2000000;
	Background[EXSCROLLBARLib_TLB.exVSThumbD] := $1000000;
	Background[EXSCROLLBARLib_TLB.exVSThumbH] := $3000000;
end
75:
How can I change the visual appearance of the up button usign your EBN files

with ScrollBar1 do
begin
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	VisualAppearance.Add(2,'c:\exontrol\images\pushed.ebn');
	VisualAppearance.Add(3,'c:\exontrol\images\hot.ebn');
	Background[EXSCROLLBARLib_TLB.exVSUp] := $1000000;
	Background[EXSCROLLBARLib_TLB.exVSUpP] := $2000000;
	Background[EXSCROLLBARLib_TLB.exVSUpD] := $1000000;
	Background[EXSCROLLBARLib_TLB.exVSUpH] := $3000000;
end
74:
How can I change the visual appearance for all buttons usign your EBN files

with ScrollBar1 do
begin
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	VisualAppearance.Add(2,'c:\exontrol\images\pushed.ebn');
	VisualAppearance.Add(3,'c:\exontrol\images\hot.ebn');
	Background[EXSCROLLBARLib_TLB.exSBtn] := $1000000;
	Background[EXSCROLLBARLib_TLB.exSBtnP] := $2000000;
	Background[EXSCROLLBARLib_TLB.exSBtnD] := $1000000;
	Background[EXSCROLLBARLib_TLB.exSBtnH] := $3000000;
end
73:
Can I indent the caption in the button or part

with ScrollBar1 do
begin
	Caption[EXSCROLLBARLib_TLB.exThumbPart] := '<img>0</img>thumb indented by 20 pixels and moved up by 5 pixels';
	CaptionAlignment[EXSCROLLBARLib_TLB.exThumbPart] := EXSCROLLBARLib_TLB.LeftAlignment;
	CaptionIndentX[EXSCROLLBARLib_TLB.exThumbPart] := 20;
	CaptionIndentY[EXSCROLLBARLib_TLB.exThumbPart] := -5;
end
72:
Can I indent the caption in the button or part

with ScrollBar1 do
begin
	Caption[EXSCROLLBARLib_TLB.exThumbPart] := '<img>0</img>thumb indented by 20 pixels';
	CaptionAlignment[EXSCROLLBARLib_TLB.exThumbPart] := EXSCROLLBARLib_TLB.LeftAlignment;
	CaptionIndentX[EXSCROLLBARLib_TLB.exThumbPart] := 20;
end
71:
Can i specify to ignore the large change value when getting the maximum value
with ScrollBar1 do
begin
	IgnoreLargeChange := True;
end
70:
Is there any way to specify the order of the buttons/parts

with ScrollBar1 do
begin
	OrderParts := 'l,r,t';
	Value := 15;
end
69:
Does your control support owner draw feature
with ScrollBar1 do
begin
	OwnerDrawPart[EXSCROLLBARLib_TLB.exThumbPart] := True;
end
68:
Can I assing any extra data to a button or part of the control
with ScrollBar1 do
begin
	UserData[EXSCROLLBARLib_TLB.exThumbPart] := 'This is just some extra data assigned to the control''s thumb';
end
67:
How can I specify the size of the thumb

with ScrollBar1 do
begin
	HTMLPicture['p1'] := 'c:\exontrol\images\zipdisk.gif';
	HTMLPicture['p2'] := 'c:\exontrol\images\auction.gif';
	Caption[EXSCROLLBARLib_TLB.exThumbPart] := '<img>p1</img> thumb <img>p2</img>';
	ThumbSize := 48;
end
66:
Is there any property to disable the up or down button, as a disable when there is no scroll

with ScrollBar1 do
begin
	DisableNoScroll := True;
end
65:
Is there any property to disable the up or down button, so user can't click it

with ScrollBar1 do
begin
	EnablePart[EXSCROLLBARLib_TLB.exRightBPart] := False;
end
64:
Is there any property to disable the up or down button, so user can't click it

with ScrollBar1 do
begin
	DisableNoScroll := True;
end
63:
Can I change the tooltip's border using your EBN files

with ScrollBar1 do
begin
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	Background[EXSCROLLBARLib_TLB.exToolTipAppearance] := $1000000;
	ToolTipText := 'This is just a text that''s displayed when the user clicks and drags the thumb to a new position';
	Value := 43;
end
62:
Can I change the tooltip's background color

with ScrollBar1 do
begin
	ToolTipText := 'This is <bgcolor=FF0000>just a text</bgcolor> that''s displayed when the user clicks and drags the thumb to a new position';
	Value := 43;
end
61:
Can I change the tooltip's background color

with ScrollBar1 do
begin
	Background[EXSCROLLBARLib_TLB.exToolTipBackColor] := $ff;
	ToolTipText := 'This is just a text that''s displayed when the user clicks and drags the thumb to a new position';
	Value := 43;
end
60:
Can I change the tooltip's foreground color

with ScrollBar1 do
begin
	ToolTipText := 'This is <fgcolor=FF0000>just a text</fgcolor> that''s displayed when the user clicks and drags the thumb to a new position';
	Value := 43;
end
59:
Can I change the tooltip's foreground color

with ScrollBar1 do
begin
	Background[EXSCROLLBARLib_TLB.exToolTipForeColor] := $ff;
	ToolTipText := 'This is just a text that''s displayed when the user clicks and drags the thumb to a new position';
	Value := 43;
end
58:
Can I change the tooltip's width

with ScrollBar1 do
begin
	BeginUpdate();
	ToolTipWidth := 256;
	ToolTipText := 'This is <font Tahoma;12>just a text with a different font</font> that''s displayed when the user clicks and drags the thumb to a ' + 
	'new position';
	Value := 43;
	EndUpdate();
end
57:
Can I change the tooltip's font

with ScrollBar1 do
begin
	BeginUpdate();
	ToolTipTitle := 'Title';
	ToolTipText := 'This is <font Tahoma;12>just a text with a different font</font> that''s displayed when the user clicks and drags the thumb to a ' + 
	'new position';
	Value := 43;
	EndUpdate();
end
56:
Can I change the tooltip's font

with ScrollBar1 do
begin
	BeginUpdate();
	f := (IUnknown(ComObj.CreateComObject(ComObj.ProgIDToClassID('StdFont'))) as stdole_TLB.StdFont);
	with f do
	begin
		Name := 'Tahoma';
		Size := 12;
	end;
	ToolTipFont := (IUnknown(f) as stdole_TLB.StdFont);
	ToolTipTitle := 'Title';
	ToolTipText := 'This is just a text that''s displayed when the user clicks and drags the thumb to a new position';
	Value := 43;
	EndUpdate();
end
55:
Can I display a tooltip when user clicks the thumb and drags it to a new position

with ScrollBar1 do
begin
	ToolTipTitle := 'Title';
	ToolTipText := 'This is just a text that''s displayed when the user clicks and drags the thumb to a new position';
	Value := 43;
end
54:
Is there any function to specify the size/width of the buttons

with ScrollBar1 do
begin
	Mode := EXSCROLLBARLib_TLB.exHorizontal;
	BtnWidth := 32;
end
53:
Is there any function to specify the size/height of the buttons

with ScrollBar1 do
begin
	BtnHeight := 32;
end
52:
How do scroll to a specified position
with ScrollBar1 do
begin
	Value := 10;
end
51:
How do scroll to a specified position
with ScrollBar1 do
begin
	Scroll(EXSCROLLBARLib_TLB.exScrollToPosition,10);
end
50:
How do simulate clicking the down button
with ScrollBar1 do
begin
	Scroll(EXSCROLLBARLib_TLB.exScrollRight,0);
end
49:
I am using your control in a C++ application, and I would preffer handle messages instead events
with ScrollBar1 do
begin
	SendMessage := True;
end
48:
How can I get the value from the cursor
with ScrollBar1 do
begin
	var_ValueFromPoint := ValueFromPoint[-1,-1];
end
47:
Is there any function to identify the part from the cursor
with ScrollBar1 do
begin
	var_PartFromPoint := PartFromPoint[-1,-1];
end
46:
Is there any option to specify the value to be added or subtracted when user presses the contro's background
with ScrollBar1 do
begin
	LargeChange := 20;
end
45:
Is there any option to specify the value to be added or subtracted when user presses the up or down button
with ScrollBar1 do
begin
	SmallChange := 5;
end
44:
How do I specify the maxmimum value in the control
with ScrollBar1 do
begin
	Maximum := 95;
	Value := 90;
end
43:
How do I specify the minimum value in the control
with ScrollBar1 do
begin
	Minimum := 5;
	Value := 7;
end
42:
How do I change control's position
with ScrollBar1 do
begin
	Value := 43;
end
41:
How do I change the position of the thumb
with ScrollBar1 do
begin
	Value := 43;
end
40:
How do I enable or disable a button or a part of the control

with ScrollBar1 do
begin
	VisiblePart[EXSCROLLBARLib_TLB.exLeftB1Part] := True;
	EnablePart[EXSCROLLBARLib_TLB.exLeftB1Part] := False;
	Caption[EXSCROLLBARLib_TLB.exLeftB1Part] := '<img>0</img><fgcolor=808080>extra button</fgcolor>';
end
39:
How do show or hide buttons in the control

with ScrollBar1 do
begin
	VisiblePart[EXSCROLLBARLib_TLB.exLeftB1Part] := True;
	Caption[EXSCROLLBARLib_TLB.exLeftB1Part] := '<img>0</img>extra button';
	VisiblePart[EXSCROLLBARLib_TLB.exRightB6Part] := True;
	Caption[EXSCROLLBARLib_TLB.exRightB6Part] := '<img>0</img>extra button';
	VisiblePart[EXSCROLLBARLib_TLB.exRightB5Part] := True;
	Caption[EXSCROLLBARLib_TLB.exRightB5Part] := '<img>0</img>extra button';
end
38:
How do I arrange the control horizontally

with ScrollBar1 do
begin
	Mode := EXSCROLLBARLib_TLB.exHorizontal;
end
37:
How do I prevent painting the control when I perform several changes

with ScrollBar1 do
begin
	BeginUpdate();
	Images('gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTql' + 
	'Vq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0' + 
	'ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN' + 
	'AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=');
	HTMLPicture['p1'] := 'c:\exontrol\images\zipdisk.gif';
	HTMLPicture['p2'] := 'c:\exontrol\images\auction.gif';
	Caption[EXSCROLLBARLib_TLB.exThumbPart] := '<img>p1</img> thumb <img>p2</img> ... <img>1</img> icon';
	ThumbSize := 48;
	EndUpdate();
end
36:
How do I add icons

with ScrollBar1 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=');
	Caption[EXSCROLLBARLib_TLB.exThumbPart] := '<img>1</img>thumb';
end
35:
How do I change the caption for the extra button I added
with ScrollBar1 do
begin
	VisiblePart[EXSCROLLBARLib_TLB.exLeftB1Part] := True;
	Caption[EXSCROLLBARLib_TLB.exLeftB1Part] := '<img>0</img>extra button';
end
34:
How can I align the caption to the right

with ScrollBar1 do
begin
	Caption[EXSCROLLBARLib_TLB.exThumbPart] := '<img>0</img>thumb right';
	CaptionAlignment[EXSCROLLBARLib_TLB.exThumbPart] := EXSCROLLBARLib_TLB.RightAlignment;
end
33:
How can I align the caption to the left

with ScrollBar1 do
begin
	Caption[EXSCROLLBARLib_TLB.exThumbPart] := '<img>0</img> thumb left';
	CaptionAlignment[EXSCROLLBARLib_TLB.exThumbPart] := EXSCROLLBARLib_TLB.LeftAlignment;
end
32:
How can show the caption using a different font

with ScrollBar1 do
begin
	Caption[EXSCROLLBARLib_TLB.exLowerBackPart] := '<img>0</img><font Tahoma;12>upper</font> part';
	Caption[EXSCROLLBARLib_TLB.exUpperBackPart] := '<img>0</img><font ;4>lower</font> part';
	Value := 45;
end
31:
Is there any option to display icons or pictures in the parts of the control

with ScrollBar1 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=');
	HTMLPicture['p1'] := 'c:\exontrol\images\zipdisk.gif';
	HTMLPicture['p2'] := 'c:\exontrol\images\auction.gif';
	Caption[EXSCROLLBARLib_TLB.exThumbPart] := '<img>p1</img> thumb <img>p2</img> ... <img>1</img> icon';
	ThumbSize := 48;
end
30:
Is there any option to display icons or pictures in the parts of the control

with ScrollBar1 do
begin
	HTMLPicture['p1'] := 'c:\exontrol\images\zipdisk.gif';
	HTMLPicture['p2'] := 'c:\exontrol\images\auction.gif';
	Caption[EXSCROLLBARLib_TLB.exThumbPart] := '<img>p1</img> thumb <img>p2</img>';
	ThumbSize := 48;
end
29:
Is there any option to display icons or pictures in the parts of the control

with ScrollBar1 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=');
	Caption[EXSCROLLBARLib_TLB.exThumbPart] := '<img>1</img> thumb <img>2</img>';
end
28:
Is there any option to display icons or pictures in the parts of the control

with ScrollBar1 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=');
	Caption[EXSCROLLBARLib_TLB.exThumbPart] := '<img>1:4</img><img>1:4</img><img>1:4</img><img>1</img>thumb';
end
27:
Is there any option to display icons or pictures in the parts of the control

with ScrollBar1 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=');
	Caption[EXSCROLLBARLib_TLB.exThumbPart] := '<img>1</img>thumb';
end
26:
How can paint the caption using multiple lines

with ScrollBar1 do
begin
	Caption[EXSCROLLBARLib_TLB.exThumbPart] := '<img>0</img>line1<br>line2';
end
25:
How can change the background color for a portion of text

with ScrollBar1 do
begin
	Caption[EXSCROLLBARLib_TLB.exLowerBackPart] := '<img>0</img><bgcolor=FF0000><fgcolor=0000FF>upper</fgcolor></bgcolor> part';
	Caption[EXSCROLLBARLib_TLB.exUpperBackPart] := '<img>0</img><bgcolor=0000FF><fgcolor=FF0000>upper</fgcolor></bgcolor> part';
	Value := 45;
end
24:
How can change the foreground color for a portion of text

with ScrollBar1 do
begin
	Caption[EXSCROLLBARLib_TLB.exLowerBackPart] := '<img>0</img><fgcolor=FF0000>upper</fgcolor> part';
	Caption[EXSCROLLBARLib_TLB.exUpperBackPart] := '<img>0</img><fgcolor=0000FF>upper</fgcolor> part';
	Value := 45;
end
23:
How can show the caption as strikeout

with ScrollBar1 do
begin
	f := (IUnknown(ComObj.CreateComObject(ComObj.ProgIDToClassID('StdFont'))) as stdole_TLB.StdFont);
	with f do
	begin
		Name := 'Tahoma';
		Size := 12;
	end;
	Font := (IUnknown(f) as stdole_TLB.StdFont);
	Caption[EXSCROLLBARLib_TLB.exLowerBackPart] := '<img>0</img><s>upper</s> part';
	Caption[EXSCROLLBARLib_TLB.exUpperBackPart] := '<img>0</img><s>lower</s> part';
	Value := 45;
end
22:
How can underline a portion of the caption

with ScrollBar1 do
begin
	f := (IUnknown(ComObj.CreateComObject(ComObj.ProgIDToClassID('StdFont'))) as stdole_TLB.StdFont);
	with f do
	begin
		Name := 'Tahoma';
		Size := 12;
	end;
	Font := (IUnknown(f) as stdole_TLB.StdFont);
	Caption[EXSCROLLBARLib_TLB.exLowerBackPart] := '<img>0</img><u>upper</u> part';
	Caption[EXSCROLLBARLib_TLB.exUpperBackPart] := '<img>0</img><u>lower</u> part';
	Value := 45;
end
21:
How can I draw in italic a portion of the caption

with ScrollBar1 do
begin
	f := (IUnknown(ComObj.CreateComObject(ComObj.ProgIDToClassID('StdFont'))) as stdole_TLB.StdFont);
	with f do
	begin
		Name := 'Tahoma';
		Size := 12;
	end;
	Font := (IUnknown(f) as stdole_TLB.StdFont);
	Caption[EXSCROLLBARLib_TLB.exLowerBackPart] := '<img>0</img><i>upper</i> part';
	Caption[EXSCROLLBARLib_TLB.exUpperBackPart] := '<img>0</img><i>lower</i> part';
	Value := 45;
end
20:
How can I draw in bold a portion of the caption

with ScrollBar1 do
begin
	f := (IUnknown(ComObj.CreateComObject(ComObj.ProgIDToClassID('StdFont'))) as stdole_TLB.StdFont);
	with f do
	begin
		Name := 'Tahoma';
		Size := 12;
	end;
	Font := (IUnknown(f) as stdole_TLB.StdFont);
	Caption[EXSCROLLBARLib_TLB.exLowerBackPart] := '<img>0</img><b>upper</b> part';
	Caption[EXSCROLLBARLib_TLB.exUpperBackPart] := '<img>0</img><b>lower</b> part';
	Value := 45;
end
19:
How can I put a text on the background part in the lower or upper , horizontally

with ScrollBar1 do
begin
	Caption[EXSCROLLBARLib_TLB.exLowerBackPart] := '<img>0</img>upper';
	Caption[EXSCROLLBARLib_TLB.exUpperBackPart] := '<img>0</img>lower';
	Value := 45;
end
18:
How can I put a text on the background part in the lower or upper side

with ScrollBar1 do
begin
	Caption[EXSCROLLBARLib_TLB.exLowerBackPart] := 'upper';
	Caption[EXSCROLLBARLib_TLB.exUpperBackPart] := 'lower';
	Value := 45;
end
17:
How can I put a text on the background part, horizontally

with ScrollBar1 do
begin
	Caption[EXSCROLLBARLib_TLB.exBackgroundPart] := '<img>0</img>background';
end
16:
How can I put a text on the background part

with ScrollBar1 do
begin
	Caption[EXSCROLLBARLib_TLB.exBackgroundPart] := 'background';
end
15:
How can I put a text on the thumb, horizontally

with ScrollBar1 do
begin
	Caption[EXSCROLLBARLib_TLB.exThumbPart] := '<img>0</img>thumb';
end
14:
How can I put a text on the thumb

with ScrollBar1 do
begin
	Caption[EXSCROLLBARLib_TLB.exThumbPart] := 'thumb';
end
13:
How can I disable the control
with ScrollBar1 do
begin
	Enabled := False;
end
12:
How do I put a picture on the center of the control

with ScrollBar1 do
begin
	Picture := ScrollBar1.ExecuteTemplate('loadpicture(`c:\exontrol\images\zipdisk.gif`)');
	PictureDisplay := EXSCROLLBARLib_TLB.MiddleCenter;
	VisiblePart[EXSCROLLBARLib_TLB.exBackgroundPart] := False;
	BackColor := $80000004;
end
11:
How do I resize/stretch a picture on the control's background

with ScrollBar1 do
begin
	Picture := ScrollBar1.ExecuteTemplate('loadpicture(`c:\exontrol\images\zipdisk.gif`)');
	PictureDisplay := EXSCROLLBARLib_TLB.Stretch;
	VisiblePart[EXSCROLLBARLib_TLB.exBackgroundPart] := False;
	BackColor := $80000004;
end
10:
How do I put a picture on the control's center right bottom side

with ScrollBar1 do
begin
	Picture := ScrollBar1.ExecuteTemplate('loadpicture(`c:\exontrol\images\zipdisk.gif`)');
	PictureDisplay := EXSCROLLBARLib_TLB.LowerRight;
	VisiblePart[EXSCROLLBARLib_TLB.exBackgroundPart] := False;
	BackColor := $80000004;
end
9:
How do I put a picture on the control's center left bottom side

with ScrollBar1 do
begin
	Picture := ScrollBar1.ExecuteTemplate('loadpicture(`c:\exontrol\images\zipdisk.gif`)');
	PictureDisplay := EXSCROLLBARLib_TLB.LowerLeft;
	VisiblePart[EXSCROLLBARLib_TLB.exBackgroundPart] := False;
	BackColor := $80000004;
end
8:
How do I put a picture on the control's center top side

with ScrollBar1 do
begin
	Picture := ScrollBar1.ExecuteTemplate('loadpicture(`c:\exontrol\images\zipdisk.gif`)');
	PictureDisplay := EXSCROLLBARLib_TLB.UpperCenter;
	Value := 50;
	VisiblePart[EXSCROLLBARLib_TLB.exBackgroundPart] := False;
	BackColor := $80000004;
end
7:
How do I put a picture on the control's right top corner

with ScrollBar1 do
begin
	Picture := ScrollBar1.ExecuteTemplate('loadpicture(`c:\exontrol\images\zipdisk.gif`)');
	PictureDisplay := EXSCROLLBARLib_TLB.UpperRight;
	VisiblePart[EXSCROLLBARLib_TLB.exBackgroundPart] := False;
	BackColor := $80000004;
	Value := 50;
end
6:
How do I put a picture on the control's left top corner

with ScrollBar1 do
begin
	Picture := ScrollBar1.ExecuteTemplate('loadpicture(`c:\exontrol\images\zipdisk.gif`)');
	PictureDisplay := EXSCROLLBARLib_TLB.UpperLeft;
	VisiblePart[EXSCROLLBARLib_TLB.exBackgroundPart] := False;
	BackColor := $80000004;
	Value := 50;
end
5:
How do I put a picture on the control's background

with ScrollBar1 do
begin
	Picture := ScrollBar1.ExecuteTemplate('loadpicture(`c:\exontrol\images\zipdisk.gif`)');
	VisiblePart[EXSCROLLBARLib_TLB.exBackgroundPart] := False;
	BackColor := $80000004;
end
4:
How can I change the size of control's font

with ScrollBar1 do
begin
	Font.Size := 12;
	ForeColor := RGB(255,0,0);
	Caption[EXSCROLLBARLib_TLB.exThumbPart] := '<img>0</img>thumb';
end
3:
How do I change the control's font

with ScrollBar1 do
begin
	Font.Name := 'Tahoma';
	ForeColor := RGB(255,0,0);
	Caption[EXSCROLLBARLib_TLB.exThumbPart] := '<img>0</img>thumb';
end
2:
How can I change the control's foreground color

with ScrollBar1 do
begin
	ForeColor := RGB(255,0,0);
	Caption[EXSCROLLBARLib_TLB.exThumbPart] := '<img>0</img>thumb';
end
1:
How can I change the control's background color

with ScrollBar1 do
begin
	BackColor := RGB(0,255,0);
	VisiblePart[EXSCROLLBARLib_TLB.exBackgroundPart] := False;
end