exsplitbar - sample code

How do I specify the objects to be resized to left/top or right/bottom side of the split bar?

VBA (MS Access, Excell...)

With SplitBar1
	.ObjectsLT = "Command1"
	.ObjectsRB = "Command2,SplitBar2,Command3"
End With

VB6

With SplitBar1
	.ObjectsLT = "Command1"
	.ObjectsRB = "Command2,SplitBar2,Command3"
End With

VB.NET

With Exsplitbar1
	.ObjectsLT = "Button1"
	.ObjectsRB = "Button2,exsplitBar2,Button3"
End With

VB.NET for /COM

With AxSplitBar1
	.AddObjectLT(Button1)
	.AddObjectRB(Button2)
	.AddObjectRB(AxSplitBar2)
	.AddObjectRB(Button3)
End With

C++

/*
	Copy and paste the following directives to your header file as
	it defines the namespace 'EXSPLITBARLib' for the library: 'ExSplitBar 1.0 Control Library'

	#import <ExSplitBar.dll>
	using namespace EXSPLITBARLib;
*/
EXSPLITBARLib::ISplitBarPtr spSplitBar1 = GetDlgItem(IDC_SPLITBAR1)->GetControlUnknown();
spSplitBar1->AddObjectLT( (long)::GetDlgItem( m_hWnd, IDC_BUTTON1 ) );
spSplitBar1->AddObjectRB( (long)::GetDlgItem( m_hWnd, IDC_BUTTON2 ) );
spSplitBar1->AddObjectRB( GetDlgItem(IDC_SPLITBAR2)->GetControlUnknown() );
spSplitBar1->AddObjectRB( (long)::GetDlgItem( m_hWnd, IDC_BUTTON3 ) );

C++ Builder

SplitBar1->AddObjectLT(TVariant(Button1->Handle));
SplitBar1->AddObjectRB(TVariant(Button2->Handle));
SplitBar1->AddObjectRB(TVariant(SplitBar2->DefaultInterface));
SplitBar1->AddObjectRB(TVariant(Button3->Handle));

C#

exsplitbar1.ObjectsLT = "button1";
exsplitbar1.ObjectsRB = "button2,exsplitBar2,button3";

C# for /COM

axSplitBar1.AddObjectLT(button1);
axSplitBar1.AddObjectRB(button2);
axSplitBar1.AddObjectRB(axSplitBar2);
axSplitBar1.AddObjectRB(button3);

Delphi (standard)

with SplitBar1 do
begin
	AddObjectLT(Button1.Handle);
	AddObjectRB(Button2.Handle);
	AddObjectRB(SplitBar2.DefaultInterface);
	AddObjectRB(Button3.Handle);
end

VFP

with thisform.SplitBar1
	.ObjectsLT = "Command1"
	.ObjectsRB = "Command2,SplitBar2,Command3"
endwith

Copyright 1999-2019 Exontrol. All rights reserved.