100
ImageSize property on 32 (specifies the size of control' icons/images/check-boxes/radio-buttons)

with Slider1 do
begin
	BeginUpdate();
	ImageSize := 32;
	Font.Size := 16;
	ThumbSize := 156;
	Images('gBJJgBAIDAAEg4AEEKAD/hz/EMNh8TIRNGwAjEZAEXjAojKAjMLjABhkaABAk0plUrlktl0vmExmUzmk1m03nE5nU7nk9miAoE+oVDolFo1HpFJpU5h8Sf9OqFNqUOqN' + 
	'UqdPq9VrFWrlbr1QpdhAFAkFis1ntFptVrtkrpszrNvmVxqk3uVtm1kmF3sdBvF/wGBmV+j9BYGHwWJulfxdax2NyFdx2JlV6l9Nw7AAGZymdz2Cy2GxErvWcz9ivlwy' + 
	'V21cuxugwktzGIzmvwtl0+53U5y0a0Wazmmyu/3dCyOMyXHx/J5nIr9q3uyqnBxFN3G46ma4vb7mD2Ng4nZze00fDkHC7t7us2rOX5tguetpHRlmz4HVqnXk1PjHO+CM' + 
	'Po9MBMC+j2vC8j7wS8cFNI4kBo05UIvfCT/NsnsApU+0Fqg/T+oy/kPxC0sEQfErKQK96+w28UWRI8UGvO8sTLS9r2PWmsMJTDTask3CsIbIEQRA3shOXEEAO/GclJ9F' + 
	'EKrrA8FRbKMXRIlb0JxCkjS1LMswhCcvuel0cv26cSMa8Ufx+2sQwhEUoSXOCjSbLcnxjKc7sdKUVyq28NtVI71P9P7JxtQEapjQ6fzfM8zPfNE2PhIsLL63E40slk5y' + 
	'7N89LcyU9SvMb3SdUc6VJLj5VLVLfO/PS9KzNFHUa/0XyBD0dxlS9cxhMlTRSoNXypPErWDPyfNS+MwprRNO0FD8wVVZ1AI08URwVRjtJ1WCn21QkkUrXVLVPQS/XIkF' + 
	'gTxT9iONZ9xVTdq+L1eKg3kkF6Upe68XtfV51/MtrVjBlwYFL1ev8y1/P6/lyzzYl02wntj0RVFmS1Qa+M5as93QxEUW9e993rfmQ2+vy65M/mL1lhl/2bj2ByVduMtN' + 
	'hCJT9hdz41nN14Ld12Z9UjfI/oUAaGseiw6+uFLLhcVabJOS5RqOE0BHlZ5VnEr5fOMs3st+aa/bbRzrJGV51Y0b0DbqaWXZD90hIsPbjWu52+6Wyadpe66hhO+P/Xio' + 
	'W5rD8ZbrUZuVg6n1dsE/cXmewu1m9PVwnd35/nueXho/NaJzmjc61W76esuT77eG8pTquy9TwWH8LEzG8RDfFalx3Gcfvna9rvG/cptGLd9tuI6TZOP5Fiqi99vea+X4' + 
	'VRcBq/JZZtVQ9cwSs5lsXE372+a9z7PbfB3VVqHyvMctLto8uob6eV0m/cD6MN2v+T33t6sBut42vdv2bJ8a997x2maFJfK+qArbGJPEKE+1qTflMsIdW/GCJX17KcT6' + 
	'/czr/X+u1g29B7j/4BQfWkkx4zIHisjhPCmE0K4SwtXM+d4BvHRwNZOoBph9IJvPek9d40FoMJxf691jj2ywQQcHEWET4XJwkTszlVqm2GokewxtBT1DpQjRxDN0rUVD' + 
	'NKdC3lb6tzNOwh6upMSSYfv4YBCl/bsn9PxiFCEo7SI6Obc9HeOrnY8x4jtHtdpN4GRbaorhsbu18Pph5CiHymI0RpSXGJ/z2oUOxYxG858AyiI+bfJtuTcG5yelBJyT' + 
	'8okhqFd4a5yxL0rvulYtKCsZiWxWkc1s1cRoxxwhA31DLE0mR9l9HqX8fJgTDmFMVH0MIsRzVYnwnMi1dyzmhLt2kS2pxIiU62Wj5ptQGlSYFakLonTUJNLKaM5Wzlff' + 
	'EkuFkk5wTrhVO2eE7G6lJhxFFYUZ55zmn0WuBCD4pzhirFCKkbomsOoIYmZx5p90LoYWGPdD5g0QmJRKYxbZ6zYoVQ2jVGylSak7KSkFH6RSjpHKFuU+YMyNo5SulkC6' + 
	'I0vonTCitMXPoEpVS2H5FQfEqp2R1opIgAEkJISYARTCukOhmPNI5Ex/wzGHUsicMwA1LHgQ90Y/KpoQHAD+pB/R4NzIaMAB9Xaw1gqaAOsh/A/ptIkWUfhGK1kZH8Rg' + 
	'H5GqvgArqRmt4AAPrTroRofBGADkqr6Rmu4D7CEaHARiwpJrEEZsXXwlVjyMWRsaRqwdkLGNBABZmytmyMnaINZqyVpLR2ftKAAAdd6h2osbaskdiq4EZtgSmyNcbVWR' + 
	'JNXe3AA7REar3b0stlAAXBtoRmvJGLjEYAHUWsFcwCD/rnaop9aEICMAPdK5hT6xpeuzdOtAgKuJeGfdq6ggEbkTvAP+p9UCHXrvKkcgIA==');
	Caption[EXSLIDERLib_TLB.exThumbPart] := '<img>1</img> thumb <img>2</img>';
	EndUpdate();
end
99
ImageSize property on 16 (default) (specifies the size of control' icons)

with Slider1 do
begin
	BeginUpdate();
	ImageSize := 16;
	ThumbSize := 96;
	Images('gBJJgBAIDAAEg4ACEKAD/hz/EMNh8TIRNGwAjEZAEXjAojJAjMLjABAAgjUYkUnlUrlktl0vmExmUzmk1m03nE5nU7nkrQCAntBoVDolFo1HoM/ADAplLptImdMYFOqd' + 
	'SqlXq1QrVbrlGpVWsFNrNdnNjsk7pQAtNroFnt0sh8Yr9iulTuNxs1Eu8OiT/vsnsNVutXlk/oGGtVKxGLxWNtsZtN8iUYuNvy0Zvd+xNYwdwvl4p870GCqc8vOeuVtt' + 
	'mp1knyOayWVy+WzN/ze1wOElenm+12WUz/Bv2/3UyyWrzeutux2GSyGP2dQ33C1ur3GD3M4zUNzHdlWjq/E3nGzVpjWv4HA7fRy/Tv2IrN8rPW6nZ3ve7mUlfu20Z8ac' + 
	'vQyb+vY9jasYoDwMm+LytVBDqKG3z8O3Cb8P+mkAuY9cCQ2uL4KaxDKvkp8RNLEjqugnrwQo/UWPzFyeQw5sNLZFENrI4kOqU66pw8uzmOKvTqNqjULJvGL1JO48GtTG' + 
	'sbLdEL3scxLlyiw8dQeoUVxdLTtyKmUjwGlslRPJsnK1HbAKbKCrsQo8uQk/CeP44iaR/ATnTNPLvyxPU+z9P9AUDQVBowiofJXQ6Oo+kKMpIkjztE4TKn4P6JowfgPn' + 
	'wD5/nAjB8AOeAPo0eAA1IAFH07UhAIMpYAVIYFHqBUhwVjV1S1EtQAHxW65V0AZwAeuQAnwB5gAPYViEDVhwAHTQBkCjB4gOhwDmCyhH0sACAg==');
	Caption[EXSLIDERLib_TLB.exThumbPart] := '<img>1</img> thumb <img>2</img>';
	EndUpdate();
end
98
I am trying to replicate the green slider image example you have in the helpfile under the "property Slider.ShowThumbProgress as Boolean" help topic

// Change event - Occurs when the value of the control is changed.
procedure TForm1.Slider1Change(ASender: TObject; );
begin
	with Slider1 do
	begin
		Caption[EXSLIDERLib_TLB.exThumbPart] := Value;
	end
end;

with Slider1 do
begin
	BeginUpdate();
	VisualAppearance.Add(1,'gBFLBCJwBAEHhEJAAChABbEGACAADACAxRDAMgBQKAAzQFAYaBgGKGAAGIZRVgmFgAQhFcZQSKUOQTDKMIziaQAChwOYlQKMYxRCKYZhpCIZBwGCIYWiiIYiQKCUIiDB' + 
	'MIxseCgAAfSg5YiACIJFAaJhnIapZDKGKQCqASAyCI2UoaDZCIoQTLUBx5AaEAwicQKTjiIiQOgjdoWU46HIhNq3bauCybRoOdj8QKdbhHMbFdz0Oq/cBvbAzVbvBqHQ' + 
	'KXLalVhWGYXRrIMbyIqnZxXFoDEQ1ZBZTjeNY5T7PNBIJ5tEyWKTTC4MeoaVpOV5dVrYHj2LY4DCtUgrbYJe47Xq+eZ1W6gOBeDZddZLP7HbZuHDbYJfBSCADkd65ToX' + 
	'AOHZEmUcg5HwXpPDeLZQm2dQ7ByTh3A+P5im0b58n6HwnF+KZpnCew8l6boPiOE5xnodh9n8XovAuW57H6HZHl2YB+l6J5Zl4fgeBeQgHgCXZICmfR8h+eAhlodxgngS' + 
	'gNgEIAoBYE4DhwF55nmBYgGgVgMHSYYIC4GoAB4OIZnOCJfkgdgQgeYpIFILoICGOIWA8DgNFCVg4g6I4Ym4PoPGQAJUnGEJkEQDBQDaBJJBwToSiSQxqEuEgklEOJ0h' + 
	'SZVEGcN5GGkXhZhYJYpHYXIXkYZoViYAAHmOEB8hkR5BnSYwemaCY2GaG4HkYWYXAACRjiSFYdEkUhUmkJQngmdh2h+CRVl0RAAAqQ40iuIRoHoGoIiKaIqWwIIXoWAS' + 
	'Ag==');
	ShowThumbProgress := True;
	VisiblePart[EXSLIDERLib_TLB.exBackgroundPart] := False;
	TickStyle := EXSLIDERLib_TLB.exNoTicks;
	Value := 3;
	Background[EXSLIDERLib_TLB.exVSThumb] := $1000000;
	EndUpdate();
end
97
How can I change the position of the control's tooltip
with Slider1 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';
	ToolTipX := 'value + 18';
	ToolTipY := 'value + 18';
end
96
How can I display the value in reverse order or from bottom to top

with Slider1 do
begin
	BeginUpdate();
	LabelTick := 'value = vmin ? ''<b>min<br>''+value : (value = vmax ? ''<b>max<br>''+value : ( value=current ? ''<b>'' + value : ''<fgcolor=808080>'' + ' + 
	'value ) )';
	Minimum := -100;
	Maximum := 100;
	TickFrequency := 10;
	ThumbSize := 40;
	Orientation := EXSLIDERLib_TLB.exReverseOrder;
	EndUpdate();
end
95
How can I display the value in reverse order or from right to left

with Slider1 do
begin
	BeginUpdate();
	LabelTick := 'value = vmin ? ''<b>min<br>''+value : (value = vmax ? ''<b>max<br>''+value : ( value=current ? ''<b>'' + value : ''<fgcolor=808080>'' + ' + 
	'value ) )';
	Minimum := -100;
	Maximum := 100;
	TickFrequency := 10;
	ThumbSize := 40;
	Orientation := Integer(EXSLIDERLib_TLB.exReverseOrder) Or Integer(EXSLIDERLib_TLB.exHorizontal);
	EndUpdate();
end
94
I need only to change the knob of the slider with a picture. Is it possible

with Slider1 do
begin
	BeginUpdate();
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	LabelTick := 'value = vmin ? ''<b>min<br>''+value : (value = vmax ? ''<b>max<br>''+value : ( value=current ? ''<b>'' + value : ''<fgcolor=808080>'' + ' + 
	'value ) )';
	Minimum := -100;
	Maximum := 100;
	TickFrequency := 10;
	Background[EXSLIDERLib_TLB.exHSThumb] := $1000000;
	ThumbSize := 40;
	EndUpdate();
end
93
Is it possible to print the control's Value on the thumb

// Change event - Occurs when the value of the control is changed.
procedure TForm1.Slider1Change(ASender: TObject; );
begin
	with Slider1 do
	begin
		Caption[EXSLIDERLib_TLB.exThumbPart] := Value;
	end
end;

with Slider1 do
begin
	TickStyle := EXSLIDERLib_TLB.exBoth;
	ThumbSize := 48;
	TickFrequency := 0;
	Value := 5;
end
92
How can I display the value on the thumb 

// Change event - Occurs when the value of the control is changed.
procedure TForm1.Slider1Change(ASender: TObject; );
begin
	with Slider1 do
	begin
		Caption[EXSLIDERLib_TLB.exThumbPart] := ValueF;
	end
end;

with Slider1 do
begin
	BeginUpdate();
	AllowFloat := True;
	MinimumF := -3.25;
	MaximumF := 3.25;
	SmallChangeF := 0.25;
	ThumbSize := 48;
	ValueF := 0;
	TickStyle := EXSLIDERLib_TLB.exBoth;
	TickFrequencyF := 0;
	EndUpdate();
end
91
How can I display a different text than the slider's value

with Slider1 do
begin
	LabelTick := '( value = current ? ''<b><font ;10>'' : '''' ) + (value array ''ab bc cd de ef fg gh hi ij jk kl'' split '' '')';
end
90
How can I show values for selec range only

with Slider1 do
begin
	SelectRange := True;
	SelStart := 1;
	SelLength := 2;
	LabelTick := 'value=current ? ''<b><font ;10>'' + value : ( value>=smin and value<=smax ? ''<fgcolor=0000FF>'' + value : '''' ) ';
end
89
Is it possible to display min max value

with Slider1 do
begin
	LabelTick := 'value = vmin ? ''<b>min<br>''+value : (value = vmax ? ''<b>max<br>''+value : ( value=current ? ''<b>'' + value : ''<fgcolor=808080>'' + ' + 
	'value ) )';
end
88
How can I show the value for current value only

with Slider1 do
begin
	LabelTick := 'value = current ? value : ''''';
end
87
Is it possible to show the value using the tooltip

// Change event - Occurs when the value of the control is changed.
procedure TForm1.Slider1Change(ASender: TObject; );
begin
	with Slider1 do
	begin
		ToolTipText := Value;
	end
end;
86
Is it possible to show labels for ticks

with Slider1 do
begin
	LabelTick := 'value';
end
85
How can I change the tooltip's border using your EBN files with a different color

with Slider1 do
begin
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	Background[EXSLIDERLib_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
84
Can I change the color for the control's border

with Slider1 do
begin
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	Appearance := EXSLIDERLib_TLB.AppearanceEnum($10000f8 Or Integer(EXSLIDERLib_TLB.Bump) Or Integer(EXSLIDERLib_TLB.Sunken));
end
83
How can I display a character from a specified font ( for vertical alignment )

with Slider1 do
begin
	ThumbSize := 96;
	Caption[EXSLIDERLib_TLB.exThumbPart] := '<img>-1</img><font Webdings;10>a</font>';
	Orientation := EXSLIDERLib_TLB.exVertical;
end
82
How can I display a character from a specified font

with Slider1 do
begin
	ThumbSize := 96;
	Caption[EXSLIDERLib_TLB.exThumbPart] := '<font Webdings;10>a</font>';
end
81
When I have a slider in vertical orientation, how can I get the caption horizontal

with Slider1 do
begin
	ThumbSize := 96;
	Caption[EXSLIDERLib_TLB.exThumbPart] := '<img>-1</img>thumb';
	Orientation := EXSLIDERLib_TLB.exVertical;
end
80
Does your control support floating points
// Change event - Occurs when the value of the control is changed.
procedure TForm1.Slider1Change(ASender: TObject; );
begin
	with Slider1 do
	begin
		OutputDebugString( ValueF );
	end
end;

with Slider1 do
begin
	BeginUpdate();
	AllowFloat := True;
	MinimumF := -3;
	MaximumF := 3;
	SmallChangeF := 0.5;
	LargeChangeF := 1;
	TickFrequencyF := SmallChangeF;
	ValueF := 0;
	EndUpdate();
end
79
How do I change the control's border, using your EBN files

with Slider1 do
begin
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	Appearance := EXSLIDERLib_TLB.AppearanceEnum($1000000);
end
78
How can I change the color of the selected range in the control

with Slider1 do
begin
	Orientation := EXSLIDERLib_TLB.exVertical;
	SelectRange := True;
	SelStart := 2;
	SelLength := 2;
	Value := 1;
	Background[EXSLIDERLib_TLB.exVSSel] := $ff;
end
77
How can I change the color of the selection in the control

with Slider1 do
begin
	SelectRange := True;
	SelStart := 2;
	SelLength := 2;
	Value := 1;
	Background[EXSLIDERLib_TLB.exHSSel] := $ff;
end
76
How can I change the visual appearance of the selected range in the control

with Slider1 do
begin
	Orientation := EXSLIDERLib_TLB.exVertical;
	SelectRange := True;
	SelStart := 2;
	SelLength := 2;
	Value := 1;
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	Background[EXSLIDERLib_TLB.exVSSel] := $1000000;
	Caption[EXSLIDERLib_TLB.exSelPart] := 'selection';
end
75
How can I change the visual appearance of the selection in the control

with Slider1 do
begin
	SelectRange := True;
	SelStart := 2;
	SelLength := 2;
	Value := 1;
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	Background[EXSLIDERLib_TLB.exHSSel] := $1000000;
	Caption[EXSLIDERLib_TLB.exSelPart] := 'selection';
end
74
Is there any option to select a range in the control, or to highlight my selection

with Slider1 do
begin
	SelectRange := True;
	SelStart := 2;
	SelLength := 2;
	Value := 1;
end
73
How can I specify the upper and lower parts using gradient colors

with Slider1 do
begin
	Value := 3;
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	VisualAppearance.Add(2,'c:\exontrol\images\pushed.ebn');
	Background[EXSLIDERLib_TLB.exHSLower] := $1000000;
	Background[EXSLIDERLib_TLB.exHSUpper] := $2000000;
end
72
How can I specify the upper and lower parts using gradient colors

with Slider1 do
begin
	Orientation := EXSLIDERLib_TLB.exVertical;
	Value := 3;
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	VisualAppearance.Add(2,'c:\exontrol\images\pushed.ebn');
	Background[EXSLIDERLib_TLB.exVSLower] := $1000000;
	Background[EXSLIDERLib_TLB.exVSUpper] := $2000000;
end
71
How can I change the color of the progress bar

with Slider1 do
begin
	ShowThumbProgress := True;
	VisiblePart[EXSLIDERLib_TLB.exBackgroundPart] := False;
	TickStyle := EXSLIDERLib_TLB.exNoTicks;
	Value := 3;
	Background[EXSLIDERLib_TLB.exVSThumb] := $ff;
end
70
How can I change the visual appearance of the progress bar using your EBN files

with Slider1 do
begin
	ShowThumbProgress := True;
	VisiblePart[EXSLIDERLib_TLB.exBackgroundPart] := False;
	TickStyle := EXSLIDERLib_TLB.exNoTicks;
	Value := 3;
	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[EXSLIDERLib_TLB.exVSThumb] := $1000000;
	Background[EXSLIDERLib_TLB.exVSThumbP] := $2000000;
	Background[EXSLIDERLib_TLB.exVSThumbD] := $1000000;
	Background[EXSLIDERLib_TLB.exVSThumbH] := $3000000;
end
69
How can I show a progress bar

with Slider1 do
begin
	ShowThumbProgress := True;
	VisiblePart[EXSLIDERLib_TLB.exBackgroundPart] := False;
	TickStyle := EXSLIDERLib_TLB.exNoTicks;
	Value := 3;
end
68
May I change the color of the ticks

with Slider1 do
begin
	TickColor := RGB(255,0,0);
end
67
How do I specify the frequency of the ticks on the control

with Slider1 do
begin
	TickFrequency := 2;
end
66
How can I show the tickers on bottom/right side only

with Slider1 do
begin
	TickStyle := EXSLIDERLib_TLB.exBottomRight;
end
65
How can I show the tickers on top/left side only

with Slider1 do
begin
	TickStyle := EXSLIDERLib_TLB.exTopLeft;
end
64
How can I show the tickers on both sides

with Slider1 do
begin
	TickStyle := EXSLIDERLib_TLB.exBoth;
end
63
How can I hide the tickers

with Slider1 do
begin
	TickStyle := EXSLIDERLib_TLB.exNoTicks;
end
62
Is there any function to show the tooltip
with Slider1 do
begin
	ShowToolTip('This message is shown when ShowToolTip methoid is called',Null,Null,Null,Null);
end
61
Is there any function to highligth the control when it gets the focus

with Slider1 do
begin
	ShowFocusRect := True;
end
60
I am using your control in a C++ application, and I would preffer handle messages instead events
with Slider1 do
begin
	NotifyParent := True;
end
59
How can I change the visual appearance of the thumb usign your EBN files

with Slider1 do
begin
	Orientation := EXSLIDERLib_TLB.exVertical;
	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[EXSLIDERLib_TLB.exVSThumb] := $1000000;
	Background[EXSLIDERLib_TLB.exVSThumbP] := $2000000;
	Background[EXSLIDERLib_TLB.exVSThumbD] := $1000000;
	Background[EXSLIDERLib_TLB.exVSThumbH] := $3000000;
end
58
How can I change the visual appearance of the thumb usign your EBN files

with Slider1 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[EXSLIDERLib_TLB.exVSThumb] := $1000000;
	Background[EXSLIDERLib_TLB.exVSThumbP] := $2000000;
	Background[EXSLIDERLib_TLB.exVSThumbD] := $1000000;
	Background[EXSLIDERLib_TLB.exVSThumbH] := $3000000;
end
57
Can I indent the caption in parts of the control

with Slider1 do
begin
	ThumbSize := 64;
	Caption[EXSLIDERLib_TLB.exThumbPart] := '20 pixels<br>from left';
	CaptionAlignment[EXSLIDERLib_TLB.exThumbPart] := EXSLIDERLib_TLB.LeftAlignment;
	CaptionIndentX[EXSLIDERLib_TLB.exThumbPart] := 20;
	Value := 3;
end
56
Does your control support owner draw feature
with Slider1 do
begin
	OwnerDrawPart[EXSLIDERLib_TLB.exThumbPart] := True;
end
55
Can I assing any extra data to a button or part of the control
with Slider1 do
begin
	UserData[EXSLIDERLib_TLB.exThumbPart] := 'This is just some extra data assigned to the control''s thumb';
end
54
How can I specify the size of the thumb
with Slider1 do
begin
	ThumbSize := 48;
end
53
Can I change the tooltip's border using your EBN files

with Slider1 do
begin
	VisualAppearance.Add(1,'c:\exontrol\images\normal.ebn');
	Background[EXSLIDERLib_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 := 4;
end
52
Can I change the tooltip's background color

with Slider1 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 := 4;
end
51
Can I change the tooltip's background color

with Slider1 do
begin
	Background[EXSLIDERLib_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 := 4;
end
50
Can I change the tooltip's foreground color

with Slider1 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 := 4;
end
49
Can I change the tooltip's foreground color

with Slider1 do
begin
	Background[EXSLIDERLib_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 := 4;
end
48
Can I change the tooltip's width

with Slider1 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 := 4;
	EndUpdate();
end
47
Can I change the tooltip's font

with Slider1 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 := 4;
	EndUpdate();
end
46
Can I change the tooltip's font

with Slider1 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 := 4;
	EndUpdate();
end
45
Can I display a tooltip when user clicks the thumb and drags it to a new position

with Slider1 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 := 4;
end
44
How can I get the value from the cursor
with Slider1 do
begin
	var_ValueFromPoint := ValueFromPoint[-1,-1];
end
43
Is there any function to identify the part from the cursor
with Slider1 do
begin
	var_PartFromPoint := PartFromPoint[-1,-1];
end
42
Is there any option to specify the value to be added or subtracted when user presses the contro's background
with Slider1 do
begin
	LargeChange := 2;
end
41
Is there any option to specify the value to be added or subtracted when user presses the up or down button
with Slider1 do
begin
	SmallChange := 1;
end
40
How do I specify the maxmimum value in the control
with Slider1 do
begin
	Maximum := 20;
	Value := 10;
end
39
How do I specify the minimum value in the control
with Slider1 do
begin
	Minimum := 2;
	Value := 3;
end
38
How do I change control's position
with Slider1 do
begin
	Value := 4;
end
37
How do I change the position of the thumb
with Slider1 do
begin
	Value := 4;
end
36
How do I enable or disable a part of the control

with Slider1 do
begin
	Value := 2;
	ThumbSize := 48;
	EnablePart[EXSLIDERLib_TLB.exThumbPart] := False;
	Caption[EXSLIDERLib_TLB.exThumbPart] := '<fgcolor=808080>thumb</fgcolor>';
end
35
How do show or hide parts in the control

with Slider1 do
begin
	VisiblePart[EXSLIDERLib_TLB.exThumbPart] := False;
end
34
How do I arrange the control vertically

with Slider1 do
begin
	Orientation := EXSLIDERLib_TLB.exVertical;
end
33
How do I prevent painting the control when I perform several changes

with Slider1 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[EXSLIDERLib_TLB.exThumbPart] := '<img>p1</img> thumb <img>p2</img> <br><br><br>... <img>1</img> icon';
	ThumbSize := 124;
	EndUpdate();
end
32
How do I add icons

with Slider1 do
begin
	ThumbSize := 64;
	Images('gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTql' + 
	'Vq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0' + 
	'ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN' + 
	'AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=');
	Caption[EXSLIDERLib_TLB.exThumbPart] := '<img>1</img>thumb';
end
31
How can I align the caption to the right

with Slider1 do
begin
	ThumbSize := 64;
	Caption[EXSLIDERLib_TLB.exThumbPart] := 'thumb right';
	CaptionAlignment[EXSLIDERLib_TLB.exThumbPart] := EXSLIDERLib_TLB.RightAlignment;
end
30
How can I align the caption to the left

with Slider1 do
begin
	ThumbSize := 64;
	Caption[EXSLIDERLib_TLB.exThumbPart] := ' thumb left';
	CaptionAlignment[EXSLIDERLib_TLB.exThumbPart] := EXSLIDERLib_TLB.LeftAlignment;
end
29
How can show the caption using a different font

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

with Slider1 do
begin
	ThumbSize := 124;
	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[EXSLIDERLib_TLB.exThumbPart] := '<img>p1</img> thumb <img>p2</img> <br><br><br>... <img>1</img> icon';
end
27
Is there any option to display icons or pictures in the parts of the control

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

with Slider1 do
begin
	ThumbSize := 96;
	Images('gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTql' + 
	'Vq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0' + 
	'ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN' + 
	'AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=');
	Caption[EXSLIDERLib_TLB.exThumbPart] := '<img>1</img> thumb <img>2</img>';
end
25
Is there any option to display icons or pictures in the parts of the control

with Slider1 do
begin
	ThumbSize := 96;
	Images('gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTql' + 
	'Vq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0' + 
	'ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN' + 
	'AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=');
	Caption[EXSLIDERLib_TLB.exThumbPart] := '<img>1:4</img><img>1:4</img><img>1:4</img><img>1</img>thumb';
end
24
Is there any option to display icons or pictures in the parts of the control

with Slider1 do
begin
	ThumbSize := 96;
	Images('gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTql' + 
	'Vq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0' + 
	'ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN' + 
	'AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=');
	Caption[EXSLIDERLib_TLB.exThumbPart] := '<img>1</img>thumb';
end
23
How can paint the caption using multiple lines

with Slider1 do
begin
	ThumbSize := 48;
	Caption[EXSLIDERLib_TLB.exThumbPart] := 'line1<br>line2';
end
22
How can change the background color for a portion of text

with Slider1 do
begin
	Caption[EXSLIDERLib_TLB.exLowerBackPart] := '<bgcolor=FF0000><fgcolor=0000FF>upper</fgcolor></bgcolor> part';
	Caption[EXSLIDERLib_TLB.exUpperBackPart] := '<bgcolor=0000FF><fgcolor=FF0000>upper</fgcolor></bgcolor> part';
	Value := 4;
end
21
How can change the foreground color for a portion of text

with Slider1 do
begin
	Caption[EXSLIDERLib_TLB.exLowerBackPart] := '<fgcolor=FF0000>upper</fgcolor> part';
	Caption[EXSLIDERLib_TLB.exUpperBackPart] := '<fgcolor=0000FF>upper</fgcolor> part';
	Value := 4;
end
20
How can show the caption as strikeout

with Slider1 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[EXSLIDERLib_TLB.exLowerBackPart] := '<s>upper</s> part';
	Caption[EXSLIDERLib_TLB.exUpperBackPart] := '<s>lower</s> part';
	Value := 4;
end
19
How can underline a portion of the caption

with Slider1 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[EXSLIDERLib_TLB.exLowerBackPart] := '<u>upper</u> part';
	Caption[EXSLIDERLib_TLB.exUpperBackPart] := '<u>lower</u> part';
	Value := 4;
end
18
How can I draw in italic a portion of the caption

with Slider1 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[EXSLIDERLib_TLB.exLowerBackPart] := '<i>upper</i> part';
	Caption[EXSLIDERLib_TLB.exUpperBackPart] := '<i>lower</i> part';
	Value := 4;
end
17
How can I draw in bold a portion of the caption

with Slider1 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[EXSLIDERLib_TLB.exLowerBackPart] := '<b>upper</b> part';
	Caption[EXSLIDERLib_TLB.exUpperBackPart] := '<b>lower</b> part';
	Value := 4;
end
16
How can I put a text on the background part in the lower or upper side

with Slider1 do
begin
	Caption[EXSLIDERLib_TLB.exLowerBackPart] := 'upper';
	Caption[EXSLIDERLib_TLB.exUpperBackPart] := 'lower';
	Value := 4;
end
15
How can I put a text on the background part

with Slider1 do
begin
	Caption[EXSLIDERLib_TLB.exBackgroundPart] := 'background';
end
14
How can I put a text on the thumb

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

with Slider1 do
begin
	Picture := Slider1.ExecuteTemplate('loadpicture(`c:\exontrol\images\zipdisk.gif`)');
	PictureDisplay := EXSLIDERLib_TLB.MiddleCenter;
end
11
How do I resize/stretch a picture on the control's background

with Slider1 do
begin
	Picture := Slider1.ExecuteTemplate('loadpicture(`c:\exontrol\images\zipdisk.gif`)');
	PictureDisplay := EXSLIDERLib_TLB.Stretch;
end
10
How do I put a picture on the control's center right bottom side

with Slider1 do
begin
	Picture := Slider1.ExecuteTemplate('loadpicture(`c:\exontrol\images\zipdisk.gif`)');
	PictureDisplay := EXSLIDERLib_TLB.LowerRight;
end
9
How do I put a picture on the control's center left bottom side

with Slider1 do
begin
	Picture := Slider1.ExecuteTemplate('loadpicture(`c:\exontrol\images\zipdisk.gif`)');
	PictureDisplay := EXSLIDERLib_TLB.LowerLeft;
end
8
How do I put a picture on the control's center top side

with Slider1 do
begin
	Picture := Slider1.ExecuteTemplate('loadpicture(`c:\exontrol\images\zipdisk.gif`)');
	PictureDisplay := EXSLIDERLib_TLB.UpperCenter;
	Value := 5;
end
7
How do I put a picture on the control's right top corner

with Slider1 do
begin
	Picture := Slider1.ExecuteTemplate('loadpicture(`c:\exontrol\images\zipdisk.gif`)');
	PictureDisplay := EXSLIDERLib_TLB.UpperRight;
	Value := 5;
end
6
How do I put a picture on the control's left top corner

with Slider1 do
begin
	Picture := Slider1.ExecuteTemplate('loadpicture(`c:\exontrol\images\zipdisk.gif`)');
	PictureDisplay := EXSLIDERLib_TLB.UpperLeft;
	Value := 5;
end
5
How do I put a picture on the control's background

with Slider1 do
begin
	Picture := Slider1.ExecuteTemplate('loadpicture(`c:\exontrol\images\zipdisk.gif`)');
end
4
How can I change the size of control's font

with Slider1 do
begin
	ThumbSize := 96;
	Font.Size := 12;
	ForeColor := RGB(255,0,0);
	Caption[EXSLIDERLib_TLB.exThumbPart] := 'thumb';
end
3
How do I change the control's font

with Slider1 do
begin
	ThumbSize := 32;
	Font.Name := 'Tahoma';
	ForeColor := RGB(255,0,0);
	Caption[EXSLIDERLib_TLB.exThumbPart] := 'thumb';
end
2
How can I change the control's foreground color

with Slider1 do
begin
	ForeColor := RGB(255,0,0);
	ThumbSize := 32;
	Caption[EXSLIDERLib_TLB.exThumbPart] := 'thumb';
end
1
How can I change the control's background color

with Slider1 do
begin
	BackColor := RGB(0,255,0);
end