21
How do I specify that an object should be moved not resized
with SplitBar1 do
begin
	ObjectsLT := 'Command1';
	ObjectsRB := 'Command1';
end
20
I've noticed some margins that are not painted. How can I prevent/remove that
with SplitBar1 do
begin
	BorderWidth := 0;
	BorderHeight := 0;
	SplitBackColor := RGB(0,0,0);
end
19
How can I change the shape of the cursor
with SplitBar1 do
begin
	Cursor := 'exCross';
end
18
How can I display a tooltip when cursor hovers the split bar (pictures)
with SplitBar1 do
begin
	HTMLPicture['pic1'] := 'c:\exontrol\images\zipdisk.gif';
	ToolTipText := '<img>pic1</img>This is a bit of text that''s displayed when the control hovers the split bar.';
end
17
How can I display a tooltip when cursor hovers the split bar (images)
with SplitBar1 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=');
	ToolTipText := '<img>1</img>This is a bit of text that''s displayed when the control hovers the split bar.';
end
16
Is it possible to move the associated objects once the user drags the split bar, not just when it ends
with SplitBar1 do
begin
	ObjectsLT := 'Command1';
	ObjectsRB := 'Command2';
	MoveOnDrop := False;
end
15
How do I know what events your control supports
// Event event - Notifies the application once the control fires an event.
procedure TForm1.SplitBar1Event(ASender: TObject; EventID : Integer);
begin
	with SplitBar1 do
	begin
		OutputDebugString( EventParam[-2] );
	end
end;


14
Is it possible to get notified once the user moves the split bar
// Drag event - Notifies that the user drags the split bar.
procedure TForm1.SplitBar1Drag(ASender: TObject; Position : Integer);
begin
	with SplitBar1 do
	begin
		OutputDebugString( 'New Position' );
		OutputDebugString( Position );
	end
end;


13
How do I get notified once the user drop the split bar to a new position
// DragEnd event - Occurs once the user ends dragging the split bar.
procedure TForm1.SplitBar1DragEnd(ASender: TObject; Position : Integer;Cancel : WordBool);
begin
	with SplitBar1 do
	begin
		OutputDebugString( 'New Position' );
		OutputDebugString( Position );
	end
end;


12
How do I programmatically move the split bar, to the right/bottom most position
with SplitBar1 do
begin
	ObjectsLT := 'Command1';
	ObjectsRB := 'Command2';
	MoveTo(Max);
end
11
How do I programmatically move the split bar, to the left/top most position
with SplitBar1 do
begin
	ObjectsLT := 'Command1';
	ObjectsRB := 'Command2';
	MoveTo(Min);
end
10
How do I programmatically move the split bar
with SplitBar1 do
begin
	ObjectsLT := 'Command1';
	ObjectsRB := 'Command2';
	MoveTo(-10);
end
9
I've noticed that the objects are hidden, when the split bar is closed to the limit. Is it possible to prevent that
// Show event - Occurs when an object requires to be shown or hidden.
procedure TForm1.SplitBar1Show(ASender: TObject; Object : OleVariant;Visible : WordBool);
begin
	with SplitBar1 do
	begin
		OutputDebugString( Object );
		OutputDebugString( Visible );
	end
end;

with SplitBar1 do
begin
	ObjectsLT := 'Command1';
	ObjectsRB := 'Command2';
	HideOnLimit := False;
end
8
How can I specify the limit to move the splitbar (hard coded value)
with SplitBar1 do
begin
	LimitLT := '32D';
	LimitRB := '32D';
end
7
How can I specify the limit to move the splitbar (percent)
with SplitBar1 do
begin
	LimitLT := '50%';
	LimitRB := '50%';
end
6
How do I change the split bar's visual appearance using your EBN files (BASE64)
with SplitBar1 do
begin
	BeginUpdate();
	BackColor := RGB(255,255,255);
	VisualAppearance.Add(1,'gBFLBCJwBAEHhEJAAEhABV0GACAADACAxSDEMQBQKAAzQFAYbhgHCGAAGUYBRgmFgAQhFcZQSKUOQTDKMIziaQIRDINQlSTJcQxHJEExZCKLACkKKwMgkEYfTLGUxQGA' + 
	'sXBgEoWRjkAYJADYBIJDCME7yHBJDSdGaYIRBGCZbiGOYxQjKMqwJJUfBLEAZKLnGRIbpOA5VSBVcT1VZlPTBHqxaxhED6SjaOJqRpcERTeJobT1FgWRpqUYRSwMMJqW' + 
	'jCNhABKsBgdO4AKpffIwAxNf4XSBIAIQSSBUjGOg6TiMWB4JRqOxCEzpUZDNBIUQTRoAJrgOCAYhcZJVXhAeTbXibZZ8RzgCj4Lg+AQ5cLHbxyPJHZxlHadZ7nOYPThX' + 
	'FMLBImudA7MEOQjiuFh1ngDQ+C6V4Thw/Z4B0eRnleMJXm6cp8DoHhzD+MZ0jWe52EkP4lC+cZNn4f5fkKFZ6BIXYSjoBgciCBxmAEP4gkgNgOgMIAXGQb4EkUWBVlkO' + 
	'5hggPgaD+IYDj2WQTmICBUFWBZhhgbgOgcXYRC4KoCAcJxkieC5iGgOgvCmXYYjGdwtF+F5tnwOojkidgBgDGpCEIfRemGLZxhGRBnk2dR3l4CQWEgdAeCGJZpHUXxZD' + 
	'2T4Sl2ZptlyEZdkkZZLHMXwXEoXhyFuY5JkWCIiCcFZHDwHRTi0UQABAECAg');
	SplitBackColor := $1000000;
	EndUpdate();
end
5
How do I change the split bar's visual appearance using your EBN files (file)
with SplitBar1 do
begin
	BeginUpdate();
	BackColor := RGB(255,255,255);
	VisualAppearance.Add(1,'C:\Program Files\Exontrol\ExSplitBar\Sample\EBN\vthumb.ebn');
	SplitBackColor := $1000000;
	EndUpdate();
end
4
How do I specify the objects to be resized to left/top or right/bottom side of the split bar (method runtime)
with SplitBar1 do
begin
	AddObjectLT('Command1');
	AddObjectRB('Command2');
	AddObjectRB('SplitBar2');
	AddObjectRB('Command3');
end
3
How do I specify the objects to be resized to left/top or right/bottom side of the split bar (method design)
with SplitBar1 do
begin
	ObjectsLT := 'Command1';
	ObjectsRB := 'Command2,SplitBar2,Command3';
	AddObjectLT('Command1');
	AddObjectRB('Command2');
	AddObjectRB('SplitBar2');
	AddObjectRB('Command3');
end
2
How do I change the split bar's color
with SplitBar1 do
begin
	SplitBackColor := RGB(0,255,0);
end
1
How do I change the control's background color
with SplitBar1 do
begin
	BackColor := RGB(255,255,0);
	BorderWidth := 4;
	BorderHeight := 4;
end