property Columns.ToString as String
Loads or saves the Columns collection using string representation.

TypeDescription
String A String expression that specifies the comma-separated list of columns to be displayed.
By default, the control contains no columns. Before adding new items, you need to add columns. Use the Add / ToString / Count method to add new columns to the control. Use the Caption property to change the column's caption. To hide a column use the Visible property of the Column object. Use the BeginUpdate and EndUpdate methods to maintain performance while adding new columns and items.

How can I use the ToString property?

VBA (MS Access, Excell...)

With TreeCube1
	.TexturePicturePath = ""
	With .FrontFace.CreateTree
		.DrawGridLines = -2
		.Columns.ToString = "Column 1,Column 2,Column 3,Column 4"
		.Items.ToString = "1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32"
	End With
End With

VB6

With TreeCube1
	.TexturePicturePath = ""
	With .FrontFace.CreateTree
		.DrawGridLines = exRowLines
		.Columns.ToString = "Column 1,Column 2,Column 3,Column 4"
		.Items.ToString = "1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32"
	End With
End With

VB.NET

With Extreecube1
	.TexturePicturePath = ""
	With .FrontFace.CreateTree()
		.DrawGridLines = exontrol.EXTREECUBELib.GridLinesEnum.exRowLines
		.Columns.ToString = "Column 1,Column 2,Column 3,Column 4"
		.Items.ToString = "1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32"
	End With
End With

VB.NET for /COM

With AxTreeCube1
	.TexturePicturePath = ""
	With .FrontFace.CreateTree()
		.DrawGridLines = EXTREECUBELib.GridLinesEnum.exRowLines
		.Columns.ToString = "Column 1,Column 2,Column 3,Column 4"
		.Items.ToString = "1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32"
	End With
End With

C++

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

	#import <ExTreeCube.dll>
	using namespace EXTREECUBELib;
*/
EXTREECUBELib::ITreeCubePtr spTreeCube1 = GetDlgItem(IDC_TREECUBE1)->GetControlUnknown();
spTreeCube1->PutTexturePicturePath(L"");
EXTREECUBELib::IFaceTreePtr var_FaceTree = spTreeCube1->GetFrontFace()->CreateTree();
	var_FaceTree->PutDrawGridLines(EXTREECUBELib::exRowLines);
	var_FaceTree->GetColumns()->PutToString(L"Column 1,Column 2,Column 3,Column 4");
	var_FaceTree->GetItems()->PutToString(L"1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32");

C++ Builder

TreeCube1->TexturePicturePath = L"";
Extreecubelib_tlb::IFaceTreePtr var_FaceTree = TreeCube1->FrontFace->CreateTree();
	var_FaceTree->DrawGridLines = Extreecubelib_tlb::GridLinesEnum::exRowLines;
	var_FaceTree->Columns->ToString = L"Column 1,Column 2,Column 3,Column 4";
	var_FaceTree->Items->ToString = L"1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32";

C#

extreecube1.TexturePicturePath = "";
exontrol.EXTREECUBELib.FaceTree var_FaceTree = extreecube1.FrontFace.CreateTree();
	var_FaceTree.DrawGridLines = exontrol.EXTREECUBELib.GridLinesEnum.exRowLines;
	var_FaceTree.Columns.ToString = "Column 1,Column 2,Column 3,Column 4";
	var_FaceTree.Items.ToString = "1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32";

JScript/JavaScript

<BODY onload="Init()">
<OBJECT CLASSID="clsid:13A5B44B-DBB7-42F2-AE2B-943A6CF6C8B9" id="TreeCube1"></OBJECT>

<SCRIPT LANGUAGE="JScript">
function Init()
{
	TreeCube1.TexturePicturePath = "";
	var var_FaceTree = TreeCube1.FrontFace.CreateTree();
		var_FaceTree.DrawGridLines = -2;
		var_FaceTree.Columns.ToString = "Column 1,Column 2,Column 3,Column 4";
		var_FaceTree.Items.ToString = "1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32";
}
</SCRIPT>
</BODY>

VBScript

<BODY onload="Init()">
<OBJECT CLASSID="clsid:13A5B44B-DBB7-42F2-AE2B-943A6CF6C8B9" id="TreeCube1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With TreeCube1
		.TexturePicturePath = ""
		With .FrontFace.CreateTree
			.DrawGridLines = -2
			.Columns.ToString = "Column 1,Column 2,Column 3,Column 4"
			.Items.ToString = "1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32"
		End With
	End With
End Function
</SCRIPT>
</BODY>

C# for /COM

axTreeCube1.TexturePicturePath = "";
EXTREECUBELib.FaceTree var_FaceTree = axTreeCube1.FrontFace.CreateTree();
	var_FaceTree.DrawGridLines = EXTREECUBELib.GridLinesEnum.exRowLines;
	var_FaceTree.Columns.ToString = "Column 1,Column 2,Column 3,Column 4";
	var_FaceTree.Items.ToString = "1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32";

X++ (Dynamics Ax 2009)

public void init()
{
	COM com_Columns,com_FaceTree,com_Items;
	anytype var_Columns,var_FaceTree,var_Items;
	;

	super();

	extreecube1.TexturePicturePath("");
	var_FaceTree = extreecube1.FrontFace().CreateTree(); com_FaceTree = var_FaceTree;
		com_FaceTree.DrawGridLines(-2/*exRowLines*/);
		var_Columns = COM::createFromObject(com_FaceTree.Columns()); com_Columns = var_Columns;
		com_Columns.ToString("Column 1,Column 2,Column 3,Column 4");
		var_Items = COM::createFromObject(com_FaceTree.Items()); com_Items = var_Items;
		com_Items.ToString("1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32");
}

Delphi 8 (.NET only)

with AxTreeCube1 do
begin
	TexturePicturePath := '';
	with FrontFace.CreateTree() do
	begin
		DrawGridLines := EXTREECUBELib.GridLinesEnum.exRowLines;
		Columns.ToString := 'Column 1,Column 2,Column 3,Column 4';
		Items.ToString := '1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32';
	end;
end

Delphi (standard)

with TreeCube1 do
begin
	TexturePicturePath := '';
	with FrontFace.CreateTree() do
	begin
		DrawGridLines := EXTREECUBELib_TLB.exRowLines;
		Columns.ToString := 'Column 1,Column 2,Column 3,Column 4';
		Items.ToString := '1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32';
	end;
end

VFP

with thisform.TreeCube1
	.TexturePicturePath = ""
	with .FrontFace.CreateTree
		.DrawGridLines = -2
		.Columns.ToString = "Column 1,Column 2,Column 3,Column 4"
		.Items.ToString = "1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32"
	endwith
endwith

dBASE Plus

local oTreeCube,var_FaceTree

oTreeCube = form.EXTREECUBEACTIVEXCONTROL1.nativeObject
oTreeCube.TexturePicturePath = ""
var_FaceTree = oTreeCube.FrontFace.CreateTree()
	var_FaceTree.DrawGridLines = -2
	var_FaceTree.Columns.ToString = "Column 1,Column 2,Column 3,Column 4"
	var_FaceTree.Items.ToString = "1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32"

XBasic (Alpha Five)

Dim oTreeCube as P
Dim var_FaceTree as P

oTreeCube = topparent:CONTROL_ACTIVEX1.activex
oTreeCube.TexturePicturePath = ""
var_FaceTree = oTreeCube.FrontFace.CreateTree()
	var_FaceTree.DrawGridLines = -2
	var_FaceTree.Columns.ToString = "Column 1,Column 2,Column 3,Column 4"
	var_FaceTree.Items.ToString = "1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32"

Visual Objects

local var_FaceTree as IFaceTree

oDCOCX_Exontrol1:TexturePicturePath := ""
var_FaceTree := oDCOCX_Exontrol1:FrontFace:CreateTree()
	var_FaceTree:DrawGridLines := exRowLines
	var_FaceTree:Columns:ToString := "Column 1,Column 2,Column 3,Column 4"
	var_FaceTree:Items:ToString := "1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32"

PowerBuilder

OleObject oTreeCube,var_FaceTree

oTreeCube = ole_1.Object
oTreeCube.TexturePicturePath = ""
var_FaceTree = oTreeCube.FrontFace.CreateTree()
	var_FaceTree.DrawGridLines = -2
	var_FaceTree.Columns.ToString = "Column 1,Column 2,Column 3,Column 4"
	var_FaceTree.Items.ToString = "1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32"

Visual DataFlex

Procedure OnCreate
	Forward Send OnCreate
	Set ComTexturePicturePath to ""
	Variant voFace
	Get ComFrontFace to voFace
	Handle hoFace
	Get Create (RefClass(cComFace)) to hoFace
	Set pvComObject of hoFace to voFace
		Variant voFaceTree
		Get ComCreateTree of hoFace to voFaceTree
		Handle hoFaceTree
		Get Create (RefClass(cComFaceTree)) to hoFaceTree
		Set pvComObject of hoFaceTree to voFaceTree
			Set ComDrawGridLines of hoFaceTree to OLEexRowLines
			Variant voColumns
			Get ComColumns of hoFaceTree to voColumns
			Handle hoColumns
			Get Create (RefClass(cComColumns)) to hoColumns
			Set pvComObject of hoColumns to voColumns
				Set ComToString of hoColumns to "Column 1,Column 2,Column 3,Column 4"
			Send Destroy to hoColumns
			Variant voItems
			Get ComItems of hoFaceTree to voItems
			Handle hoItems
			Get Create (RefClass(cComItems)) to hoItems
			Set pvComObject of hoItems to voItems
				Set ComToString of hoItems to "1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32"
			Send Destroy to hoItems
		Send Destroy to hoFaceTree
	Send Destroy to hoFace
End_Procedure

XBase++

#include "AppEvent.ch"
#include "ActiveX.ch"

PROCEDURE Main
 	LOCAL oForm
	LOCAL nEvent := 0, mp1 := NIL, mp2 := NIL, oXbp := NIL
	LOCAL oFaceTree
	LOCAL oTreeCube

	oForm := XbpDialog():new( AppDesktop() )
	oForm:drawingArea:clipChildren := .T.
	oForm:create( ,,{100,100}, {640,480},, .F. )
	oForm:close  := {|| PostAppEvent( xbeP_Quit )}

	oTreeCube := XbpActiveXControl():new( oForm:drawingArea )
	oTreeCube:CLSID  := "Exontrol.TreeCube.1" /*{13A5B44B-DBB7-42F2-AE2B-943A6CF6C8B9}*/
	oTreeCube:create(,, {10,60},{610,370} )

		oTreeCube:TexturePicturePath := ""
		oFaceTree := oTreeCube:FrontFace():CreateTree()
			oFaceTree:DrawGridLines := -2/*exRowLines*/
			oFaceTree:Columns():ToString := "Column 1,Column 2,Column 3,Column 4"
			oFaceTree:Items():ToString := "1;2;3;4,5;6;7;8,9;10;11;12,13;14;15;16,17;18;29;20,21;22;23;24,25;26;27;28,29;30;31;32"

	oForm:Show()
	DO WHILE nEvent != xbeP_Quit
		nEvent := AppEvent( @mp1, @mp2, @oXbp )
		oXbp:handleEvent( nEvent, mp1, mp2 )
	ENDDO 
RETURN