METHOD OCX_Exontrol1AnchorClick(AnchorID,Options) CLASS MainDialog
	// AnchorClick event - Occurs when an anchor element is clicked.
	OutputDebugString(String2Psz( AsString(AnchorID) ))
RETURN NIL

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:AllowSelectNothing := true
oDCOCX_Exontrol1:AllowEdit := exDisallow
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Node := var_Nodes:Add("Sub 2","1234",nil,nil,nil)
		var_Node:FixedWidth := 256
		var_Node:CaptionSingleLine := exCaptionBreakWrap
		var_Node:Caption := "<solidline><b>Bank Account</b></solidline><br>+ owner: String <r><a 1;properties>+</a><br><solidline>+ balance: Currency = 0</solidline><br>+ deposit(amount: Currency)<r><a 2;methods>+</a><br>+ withdraw(amount: Currency)"

METHOD OCX_Exontrol1AnchorClick(AnchorID,Options) CLASS MainDialog
	// AnchorClick event - Occurs when an anchor element is clicked.
	OutputDebugString(String2Psz( AsString(AnchorID) ))
RETURN NIL

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:AllowSelectNothing := true
oDCOCX_Exontrol1:AllowEdit := exDisallow
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Node := var_Nodes:Add("Sub 2","1234",nil,nil,nil)
		var_Node:FixedWidth := 96
		var_Node:CaptionSingleLine := exCaptionBreakWrap
		var_Node:Caption := "<solidline><b>Bank Account</b></solidline><br>+ owner: String <r><a 1;properties>+</a><br><solidline>+ balance: Currency = 0</solidline><br>+ deposit(amount: Currency)<r><a 2;methods>+</a><br>+ withdraw(amount: Currency)"

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:AllowSelectNothing := true
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Node := var_Nodes:Add("Sub 2","1234",nil,nil,nil)
		var_Node:CaptionSingleLine := exCaptionBreakWrap
		var_Node:Caption := "<solidline><b>Bank Account</b></solidline><br>+ owner: String <r><a 1;properties>+</a><br><solidline>+ balance: Currency = 0</solidline><br>+ deposit(amount: Currency)<r><a 2;methods>+</a><br>+ withdraw(amount: Currency)"

local var_Node as INode
local var_Nodes as INodes

var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Node := var_Nodes:Add("Sub 2","1234",nil,nil,nil)
		var_Node:CaptionSingleLine := exCaptionBreakWrap
		var_Node:Caption := "This is a bit of long text is displayed on first line.<br>The second line."

local var_Node as INode
local var_Nodes as INodes

var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Node := var_Nodes:Add("Sub 2","1234",nil,nil,nil)
		var_Node:Width := 96
		var_Node:CaptionSingleLine := exCaptionWordWrap
		var_Node:Caption := "This is a bit of long text that should break into words."

local var_Node as INode
local var_Nodes as INodes

var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Node := var_Nodes:Add("Sub 2","1234",nil,nil,nil)
		var_Node:CaptionSingleLine := exCaptionWordWrap
		var_Node:Caption := "This is a bit of long text that should break into words."

local var_Node as INode
local var_Nodes as INodes

var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Node := var_Nodes:Add("Sub 2","1234",nil,nil,nil)
		var_Node:CaptionSingleLine := exCaptionSingleLine
		var_Node:Caption := "This is a bit of long text that should be truncated."
		var_Node:FixedWidth := 128

local var_Node as INode
local var_Nodes as INodes

var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Node := var_Nodes:Add("Sub 2","1234",nil,nil,nil)
		var_Node:CaptionSingleLine := exCaptionSingleLine
		var_Node:Caption := "This is a bit of long text that should not be broken."

oDCOCX_Exontrol1:[Background,exScrollHoverAll] := -1

oDCOCX_Exontrol1:[Background,exScrollHoverAll] := RGB(1,0,0)

METHOD OCX_Exontrol1MouseMove(Button,Shift,X,Y) CLASS MainDialog
	// MouseMove event - Occurs when the user moves the mouse.
	oDCOCX_Exontrol1:ShowToolTip("new content","",nil,"+8","+8")
RETURN NIL

METHOD OCX_Exontrol1MouseMove(Button,Shift,X,Y) CLASS MainDialog
	// MouseMove event - Occurs when the user moves the mouse.
	oDCOCX_Exontrol1:ShowToolTip("<null>","<null>",nil,"+8","+8")
RETURN NIL


oDCOCX_Exontrol1:Root:ToolTip := "This is a bit of text that's shown when the cursor hovers the node."

local var_Appearance as IAppearance
local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ImageSize := 32
oDCOCX_Exontrol1:Font:Size := 16
oDCOCX_Exontrol1:Images("gBJJgBAIDAAEg4AEEKAD/hz/EMNh8TIRNGwAjEZAEXjAojKAjMLjABhkaABAk0plUrlktl0vmExmUzmk1m03nE5nU7nk9miAoE+oVDolFo1HpFJpU5h8Sf9OqFNqUOqNUqdPq9VrFWrlbr1QpdhAFAkFis1ntFptVrtkrpszrNvmVxqk3uVtm1kmF3sdBvF/wGBmV+j9BYGHwWJulfxdax2NyFdx2JlV6l9Nw7AAGZymdz2Cy2GxErvWcz9ivlwyV21cuxugwktzGIzmvwtl0+53U5y0a0Wazmmyu/3dCyOMyXHx/J5nIr9q3uyqnBxFN3G46ma4vb7mD2Ng4nZze00fDkHC7t7us2rOX5tguetpHRlmz4HVqnXk1PjHO+CMPo9MBMC+j2vC8j7wS8cFNI4kBo05UIvfCT/NsnsApU+0Fqg/T+oy/kPxC0sEQfErKQK96+w28UWRI8UGvO8sTLS9r2PWmsMJTDTask3CsIbIEQRA3shOXEEAO/GclJ9FEKrrA8FRbKMXRIlb0JxCkjS1LMswhCcvuel0cv26cSMa8Ufx+2sQwhEUoSXOCjSbLcnxjKc7sdKUVyq28NtVI71P9P7JxtQEapjQ6fzfM8zPfNE2PhIsLL63E40slk5y7N89LcyU9SvMb3SdUc6VJLj5VLVLfO/PS9KzNFHUa/0XyBD0dxlS9cxhMlTRSoNXypPErWDPyfNS+MwprRNO0FD8wVVZ1AI08URwVRjtJ1WCn21QkkUrXVLVPQS/XIkFgTxT9iONZ9xVTdq+L1eKg3kkF6Upe68XtfV51/MtrVjBlwYFL1ev8y1/P6/lyzzYl02wntj0RVFmS1Qa+M5as93QxEUW9e993rfmQ2+vy65M/mL1lhl/2bj2ByVduMtNhCJT9hdz41nN14Ld12Z9UjfI/oUAaGseiw6+uFLLhcVabJOS5RqOE0BHlZ5VnEr5fOMs3st+aa/bbRzrJGV51Y0b0DbqaWXZD90hIsPbjWu52+6Wyadpe66hhO+P/XioW5rD8ZbrUZuVg6n1dsE/cXmewu1m9PVwnd35/nueXho/NaJzmjc61W76esuT77eG8pTquy9TwWH8LEzG8RDfFalx3Gcfvna9rvG/cptGLd9tuI6TZOP5Fiqi99vea+X4VRcBq/JZZtVQ9cwSs5lsXE372+a9z7PbfB3VVqHyvMctLto8uob6eV0m/cD6MN2v+T33t6sBut42vdv2bJ8a997x2maFJfK+qArbGJPEKE+1qTflMsIdW/GCJX17KcT6/czr/X+u1g29B7j/4BQfWkkx4zIHisjhPCmE0K4SwtXM+d4BvHRwNZOoBph9IJvPek9d40FoMJxf691jj2ywQQcHEWET4XJwkTszlVqm2GokewxtBT1DpQjRxDN0rUVDNKdC3lb6tzNOwh6upMSSYfv4YBCl/bsn9PxiFCEo7SI6Obc9HeOrnY8x4jtHtdpN4GRbaorhsbu18Pph5CiHymI0RpSXGJ/z2oUOxYxG858AyiI+bfJtuTcG5yelBJyT8okhqFd4a5yxL0rvulYtKCsZiWxWkc1s1cRoxxwhA31DLE0mR9l9HqX8fJgTDmFMVH0MIsRzVYnwnMi1dyzmhLt2kS2pxIiU62Wj5ptQGlSYFakLonTUJNLKaM5WzlffEkuFkk5wTrhVO2eE7G6lJhxFFYUZ55zmn0WuBCD4pzhirFCKkbomsOoIYmZx5p90LoYWGPdD5g0QmJRKYxbZ6zYoVQ2jVGylSak7KSkFH6RSjpHKFuU+YMyNo5SulkC6I0vonTCitMXPoEpVS2H5FQfEqp2R1opIgAEkJISYARTCukOhmPNI5Ex/wzGHUsicMwA1LHgQ90Y/KpoQHAD+pB/R4NzIaMAB9Xaw1gqaAOsh/A/ptIkWUfhGK1kZH8RgH5GqvgArqRmt4AAPrTroRofBGADkqr6Rmu4D7CEaHARiwpJrEEZsXXwlVjyMWRsaRqwdkLGNBABZmytmyMnaINZqyVpLR2ftKAAAdd6h2osbaskdiq4EZtgSmyNcbVWRJNXe3AA7REar3b0stlAAXBtoRmvJGLjEYAHUWsFcwCD/rnaop9aEICMAPdK5hT6xpeuzdOtAgKuJeGfdq6ggEbkTvAP+p9UCHXrvKkcgIA==")
var_Appearance := oDCOCX_Exontrol1:VisualAppearance
	var_Appearance:Add(4,"gBFLBCJwBAEHhEJAAEhABUYCg6AADACAxRDgMQBQKAAzQFAYbhkGCGAAGMZxRgmFgAQhFcZQSKUOQTDKMIziYBYfgkMIgSbJUgDGAkRRdDSOYDmGQYDiCIoRShOMIjHLUXxtDaIZwhEAoJb+RgAUY/cTzaAEUwHHiTKInaCQShsFYJUJAdRURQ9EwvCIZBpEWwLChENQwWLCNj2TScBwjCyqbale45ViqdoDU5EUiXJJ8ZxnECfYyrGjaMpCeKBUrGYTVRBIMxLLSia5oeJqMrnBpNVrIUgXCAGFwHK6BcauXIIDp6XoWWRbAAWDpVVzNNC3YzkCIceADHKiXxmVz4JLdGZ1QTGID2XaYaxWK4oZjsVSc4KDHbETbHFi9Fo3NaaxGisew+GYc4HlCR5NAAAIIEkQJSGMOgdE4RhYDwJJsAaAYQgmPpolCWgSCiBJzjcEIAkQXIBm8d5UhOQgCDUIBDDJDhgggJgKgKYJIDSVoDk8KBFF4OohEMZgWDsYYDj4GoGmGSB2B6B5iAiBgYDsYRjGSbIJo4RgqDuIpIAoLoLmMCJGDKDJjJiLA7xqUAAgGTwYnYPoPmQCQGEKEJkEkFg9gGY44BoRoSmSSQ2EKEggHgRhShSZRJFYVoVmWCRmFKFAgGOTheheZgJgYYoYmYSYWGaF4lkMMJ0hqZpJjYbobmcCZGHKHJmjmJh0h2Z4JmYcIaE8WZ2H6H5oAoBoCiCaBKBYfdjGoJoKiKaJKDaDojmkChGgmIgpCoVoWiWaJZiSd4mmmSh2h6J5qAqBoiiiaY5iSeIpmqComiqKpqkqNouiuah6hqMIsmsSpWiuGhP1kOoumuSp2j6L5sAsBo54gKwWkaMZsgsJpKjKbJLDaRYxYWRpSjSbIZiSe41m2CxmlqNptksdpejebR5iSfI4m4S4W16boLiaao6m5fJ9jubwLkaco8m8S5WnaPZunuOp4j6b5Lnac4SA0PAGlgP4wEwFwGkGcIMCcCpCnCCxiA8NYAAmMJfkSbhFCcFpFnGDBnBqRpUhuEwTDeZ5lHCfw6HIQxLCaAxygyJwqgGcATE4FA6hWY4tjEAAQBAgIA==")
oDCOCX_Exontrol1:[Background,exNodeFrame] := 0x4000000
oDCOCX_Exontrol1:HasButtons := exPlus
var_Node := oDCOCX_Exontrol1:Root
	var_Node:Image := 1
	var_Node:AddAssistant("Assistant 1",nil,nil)
	var_Node:AddAssistant("Assistant 2",nil,nil)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil):Image := 2
	var_Nodes:Add("Sub 2","1234",nil,nil,nil):Image := 3
	var_Nodes:Add("Child <b>2</b>",nil,"1235",nil,nil):Expanded := false
	var_Nodes:Add("Sub 2","1235",nil,nil,nil)
oDCOCX_Exontrol1:EndUpdate()

local var_Appearance as IAppearance
local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ImageSize := 16
oDCOCX_Exontrol1:Images("gBJJgBAIDAAEg4ACEKAD/hz/EMNh8TIRNGwAjEZAEXjAojJAjMLjABAAgjUYkUnlUrlktl0vmExmUzmk1m03nE5nU7nkrQCAntBoVDolFo1HoM/ADAplLptImdMYFOqdSqlXq1QrVbrlGpVWsFNrNdnNjsk7pQAtNroFnt0sh8Yr9iulTuNxs1Eu8OiT/vsnsNVutXlk/oGGtVKxGLxWNtsZtN8iUYuNvy0Zvd+xNYwdwvl4p870GCqc8vOeuVttmp1knyOayWVy+WzN/ze1wOElenm+12WUz/Bv2/3UyyWrzeutux2GSyGP2dQ33C1ur3GD3M4zUNzHdlWjq/E3nGzVpjWv4HA7fRy/Tv2IrN8rPW6nZ3ve7mUlfu20Z8acvQyb+vY9jasYoDwMm+LytVBDqKG3z8O3Cb8P+mkAuY9cCQ2uL4KaxDKvkp8RNLEjqugnrwQo/UWPzFyeQw5sNLZFENrI4kOqU66pw8uzmOKvTqNqjULJvGL1JO48GtTGsbLdEL3scxLlyiw8dQeoUVxdLTtyKmUjwGlslRPJsnK1HbAKbKCrsQo8uQk/CeP44iaR/ATnTNPLvyxPU+z9P9AUDQVBowiofJXQ6Oo+kKMpIkjztE4TKn4P6JowfgPnwD5/nAjB8AOeAPo0eAA1IAFH07UhAIMpYAVIYFHqBUhwVjV1S1EtQAHxW65V0AZwAeuQAnwB5gAPYViEDVhwAHTQBkCjB4gOhwDmCyhH0sACAg==")
var_Appearance := oDCOCX_Exontrol1:VisualAppearance
	var_Appearance:Add(4,"gBFLBCJwBAEHhEJAAEhABUYCg6AADACAxRDgMQBQKAAzQFAYbhkGCGAAGMZxRgmFgAQhFcZQSKUOQTDKMIziYBYfgkMIgSbJUgDGAkRRdDSOYDmGQYDiCIoRShOMIjHLUXxtDaIZwhEAoJb+RgAUY/cTzaAEUwHHiTKInaCQShsFYJUJAdRURQ9EwvCIZBpEWwLChENQwWLCNj2TScBwjCyqbale45ViqdoDU5EUiXJJ8ZxnECfYyrGjaMpCeKBUrGYTVRBIMxLLSia5oeJqMrnBpNVrIUgXCAGFwHK6BcauXIIDp6XoWWRbAAWDpVVzNNC3YzkCIceADHKiXxmVz4JLdGZ1QTGID2XaYaxWK4oZjsVSc4KDHbETbHFi9Fo3NaaxGisew+GYc4HlCR5NAAAIIEkQJSGMOgdE4RhYDwJJsAaAYQgmPpolCWgSCiBJzjcEIAkQXIBm8d5UhOQgCDUIBDDJDhgggJgKgKYJIDSVoDk8KBFF4OohEMZgWDsYYDj4GoGmGSB2B6B5iAiBgYDsYRjGSbIJo4RgqDuIpIAoLoLmMCJGDKDJjJiLA7xqUAAgGTwYnYPoPmQCQGEKEJkEkFg9gGY44BoRoSmSSQ2EKEggHgRhShSZRJFYVoVmWCRmFKFAgGOTheheZgJgYYoYmYSYWGaF4lkMMJ0hqZpJjYbobmcCZGHKHJmjmJh0h2Z4JmYcIaE8WZ2H6H5oAoBoCiCaBKBYfdjGoJoKiKaJKDaDojmkChGgmIgpCoVoWiWaJZiSd4mmmSh2h6J5qAqBoiiiaY5iSeIpmqComiqKpqkqNouiuah6hqMIsmsSpWiuGhP1kOoumuSp2j6L5sAsBo54gKwWkaMZsgsJpKjKbJLDaRYxYWRpSjSbIZiSe41m2CxmlqNptksdpejebR5iSfI4m4S4W16boLiaao6m5fJ9jubwLkaco8m8S5WnaPZunuOp4j6b5Lnac4SA0PAGlgP4wEwFwGkGcIMCcCpCnCCxiA8NYAAmMJfkSbhFCcFpFnGDBnBqRpUhuEwTDeZ5lHCfw6HIQxLCaAxygyJwqgGcATE4FA6hWY4tjEAAQBAgIA==")
oDCOCX_Exontrol1:[Background,exNodeFrame] := 0x4000000
oDCOCX_Exontrol1:HasButtons := exPlus
var_Node := oDCOCX_Exontrol1:Root
	var_Node:Image := 1
	var_Node:AddAssistant("Assistant 1",nil,nil)
	var_Node:AddAssistant("Assistant 2",nil,nil)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil):Image := 2
	var_Nodes:Add("Sub 2","1234",nil,nil,nil):Image := 3
	var_Nodes:Add("Child <b>2</b>",nil,"1235",nil,nil):Expanded := false
	var_Nodes:Add("Sub 2","1235",nil,nil,nil)
oDCOCX_Exontrol1:EndUpdate()

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:[DefaultNodePadding,exPaddingAll] := 4
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1<br>","1234","AK1",nil,nil):BackgroundExt := "none[(4,100%-22,100%-8,18)](bottom[4](left[10%,back=RGB(255,0,0)]),none[(0,100%-4,100%,4),pattern=0x000,frame=RGB(192,192,192)],none[(2,100%-22,100%-4,22),text=`10%`,align=0x11]])"
	var_Nodes:Add("Sub 2<br>","1234","AK2",nil,nil):BackgroundExt := "none[(4,100%-22,100%-8,18)](bottom[4](left[50%,back=RGB(0,255,0)]),none[(0,100%-4,100%,4),pattern=0x000,frame=RGB(192,192,192)],none[(2,100%-22,100%-4,22),text=`50%`,align=0x11]])"
	var_Nodes:Add("Sub 3<br>","1234","AK3",nil,nil):BackgroundExt := "none[(4,100%-22,100%-8,18)](bottom[4](left[100%,back=RGB(0,0,255)]),none[(0,100%-4,100%,4),pattern=0x000,frame=RGB(192,192,192)],none[(2,100%-22,100%-4,22),text=`100%`,align=0x11]])"
	var_Nodes:Add("Child <b>2.1</b>",nil,nil,nil,nil):AddGroup("Child <b>2.2</b>",nil,nil)
var_Node := oDCOCX_Exontrol1:Nodes:[Item,"AK1"]
	var_Node:[BackgroundExtValue,exIndexExt3,exClientExt] := "25%"
	var_Node:[BackgroundExtValue,exIndexExt5,exTextExt] := var_Node:[BackgroundExtValue,exIndexExt3,exClientExt]
oDCOCX_Exontrol1:EndUpdate()

local var_Frame,var_Frame1,var_Frame2,var_Frame3 as IFrame
local var_Nodes as INodes
local f1,f2 as USUAL

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:IndentSiblingY := 32
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234","AK1",nil,nil)
	var_Nodes:Add("Sub 2","1234","AK2",nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2.1</b>",nil,nil,nil,nil):AddGroup("Child <b>2.2</b>",nil,nil)
var_Frame := oDCOCX_Exontrol1:Frames:Add("AK1")
	var_Frame:Pattern:Type := exPatternEmpty
	var_Frame:[Padding,exPaddingBottom] := 20
	var_Frame:BackgroundExt := "bottom[4](left[50%,back=RGB(255,0,0)]),none[(0,100%-4,100%,4),pattern=0x000,frame=RGB(192,192,192)],none[(2,100%-22,100%-4,22),text=`50%`]"
	f1 := var_Frame:Index
var_Frame1 := oDCOCX_Exontrol1:Frames:[Item,f1]
	var_Frame1:[BackgroundExtValue,exIndexExt2,exClientExt] := "25%"
	var_Frame1:[BackgroundExtValue,exIndexExt4,exTextExt] := var_Frame1:[BackgroundExtValue,exIndexExt2,exClientExt]
var_Frame2 := oDCOCX_Exontrol1:Frames:Add("AK2")
	var_Frame2:Pattern:Type := exPatternEmpty
	var_Frame2:[Padding,exPaddingBottom] := 20
	var_Frame2:BackgroundExt := "bottom[12](left[50%,back=RGB(255,0,0)]),none[(0,100%-12,100%,12),pattern=0x000,frame=RGB(192,192,192)],none[(2,100%-22,100%-4,22),text=`50%`]"
	f2 := var_Frame2:Index
var_Frame3 := oDCOCX_Exontrol1:Frames:[Item,f2]
	var_Frame3:[BackgroundExtValue,exIndexExt2,exClientExt] := "75%"
	var_Frame3:[BackgroundExtValue,exIndexExt2,exBackColorExt] := 65280
	var_Frame3:[BackgroundExtValue,exIndexExt4,exTextExt] := var_Frame3:[BackgroundExtValue,exIndexExt2,exClientExt]
oDCOCX_Exontrol1:EndUpdate()

oDCOCX_Exontrol1:WidthNode := 64
oDCOCX_Exontrol1:Root:Caption := "This is a bit of text that should break the line"

local var_Frame as IFrame
local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:IndentSiblingY := 32
oDCOCX_Exontrol1:VisualAppearance:Add(1,"gBFLBCJwBAEHhEJAADhABWMMACAADACAxRDAMgBQKAAzQFAYawdBgABoGUZ4JhUAIIRZGMIjFDcEwxC6NIpAWCYQDENAxAJCI4DBCAZBwGKPRiASQZUhmHIDTbIEBxfIMIRLE6PZgjOYZchqRYZSjAdIzUAFFr1J4AKbfKJpfoKBJERrScgxeBUNAZBKlY7paoKSpSGw1CTLNoRAKoYTTBK2bbmWwoap2So1XhAdS0XJcWxfGKRbxmWaZZh+R5mXpCMjVMAGGQPIa8MLCSwIJBaHqUQLZNixLStAyxHCtKKhG+vJwHL6BcqnPKKRqSUKcWbcQADFZdYTdNjbch1TWvSZVQSecSke7BQjGJQ2YxWcZUXReeaBDK9ZS4WK+HhRjqAZpCkeoNC8P4DDiWp3nYVwdkaSgrGGVhSnSHJum6CgGAiBIUA0JgziGVJkGWRgTiGBAiG+ZgyDYQhCgQJZbG+UIAGEFgGBEBw9FILJNAMXgMgOIJYD4EoEGESBCBYVIKGMIJTCiDpDliNQ+A+eB+CGCAiCiFgkgmT54HCdoGE0MhgkAM4LhOWJ/CQThIk4NQik4I5+DgP5IDOBJ/B2TgDnwaQ3k+cR0l4P5jBOfguDOCIimCSgwCMKJuDsIRjmkUJ/B8JBBkIRAYmQcRglwP5lAOfhNDKCAikSRgxE8WJyEQIJkEGdhHhuD5xlSXYQicMR0lsP5FBmXhoD+ZhTBgfQrgwMwUnQP5HikfoFhwZxxlYdwbW0CJaWKag8EuI5oTufwwkeIoskIMYPDOfB0iOaZznwbw2GoKoQGaKQFjqEBQikBBjGCf4nCgShoLyTCZnIP5GlqOo5YgAxejyL4GAqeBWi+BI6ngQYvisY5+jMMBHHKHJAjIRoDFqPI0gYOxSlIFptCERpSBGbQgn6SItmyUwAHaM4MgqXBljSLl7GANRuiuMBajsBQLEgRY0gOSxKmUP5uDuCpODIaxxgqbI/g+cR8lSQBwDEYpsBObpBBabAPG6S5yniM4HHKIJBDiT4TnyKQ6nEbBjBeRhPnKGwYCkMYCgcGAnnGDBSD+RIHhKKJDDmMRSkSbg/nKY58jAOxzCyUIuk0CpMlCKfXAyUwsdIEwMHxZ5TiieoSA6fQjEoLh0hKWxJC0NISksSQsDSHQaFeUQIAKRJIDuT5DnyQ4tnWfR7GCLZMBqXI+i2S5KlyOvukOfxZDICAylSSg8jWUwyGmXYPnMNhpl6/sLg0gxjNBmNkRIQR3CRHMOQIYlwjBxHQH4T45hSBBGO/sVgQRkv7EyO4P4mgeC5E+MsTIvBfgWD+PFBIFgvgaTaPwP4mxdA/CmNQOoWgci5FGJsLAqRYiKE0PgV4TQOh0EIHkQ4xw6DnBMLsb4Hx/AHEAHEdYpwIj2D+JwDwORfjjE+B0H4dA1ASKcK8UYnxzhXAyOsPQvhfgYDoPEQ4RwMBziqDYXY6g9AmFyCwMomwThxHkH0fA5x/jbHuJ8f4dxxj4D8Ecf41A+j8HMMoUgTBMjGG+Pgf4nx1j/EAFAAwAggAIAYFQQ4WgEggDIAQgI=")
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234","AK1",nil,nil)
	var_Nodes:Add("Sub 2","1234","AK2",nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2.1</b>",nil,nil,nil,nil):AddGroup("Child <b>2.2</b>",nil,nil)
var_Frame := oDCOCX_Exontrol1:Frames:Add("AK1,AK2")
	var_Frame:[Padding,exPaddingAll] := 8
	var_Frame:[Padding,exPaddingBottom] := 22
	var_Frame:BackColor := 0x1000000
	var_Frame:Pattern:Type := exPatternEmpty
	var_Frame:BackgroundExt := "top[4],left[4],right[4],client,bottom[4],bottom[16,back=0x01000000,text=`<sha ;;0>attention`,align=0x11]"
oDCOCX_Exontrol1:EndUpdate()

local var_Frame as IFrame
local var_Nodes as INodes
local var_Pattern as IPattern

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:IndentSiblingY := 32
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234","AK1",nil,nil)
	var_Nodes:Add("Sub 2","1234","AK2",nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2.1</b>",nil,nil,nil,nil):AddGroup("Child <b>2.2</b>",nil,nil)
var_Frame := oDCOCX_Exontrol1:Frames:Add("AK1,AK2")
	var_Frame:[Padding,exPaddingAll] := 8
	var_Pattern := var_Frame:Pattern
		var_Pattern:Type := exPatternCross
		var_Pattern:Color := RGB(190,190,190)
oDCOCX_Exontrol1:EndUpdate()

local var_Frame as IFrame
local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:IndentSiblingY := 32
oDCOCX_Exontrol1:VisualAppearance:Add(1,"gBFLBCJwBAEHhEJAADhABWMMACAADACAxRDAMgBQKAAzQFAYawdBgABoGUZ4JhUAIIRZGMIjFDcEwxC6NIpAWCYQDENAxAJCI4DBCAZBwGKPRiASQZUhmHIDTbIEBxfIMIRLE6PZgjOYZchqRYZSjAdIzUAFFr1J4AKbfKJpfoKBJERrScgxeBUNAZBKlY7paoKSpSGw1CTLNoRAKoYTTBK2bbmWwoap2So1XhAdS0XJcWxfGKRbxmWaZZh+R5mXpCMjVMAGGQPIa8MLCSwIJBaHqUQLZNixLStAyxHCtKKhG+vJwHL6BcqnPKKRqSUKcWbcQADFZdYTdNjbch1TWvSZVQSecSke7BQjGJQ2YxWcZUXReeaBDK9ZS4WK+HhRjqAZpCkeoNC8P4DDiWp3nYVwdkaSgrGGVhSnSHJum6CgGAiBIUA0JgziGVJkGWRgTiGBAiG+ZgyDYQhCgQJZbG+UIAGEFgGBEBw9FILJNAMXgMgOIJYD4EoEGESBCBYVIKGMIJTCiDpDliNQ+A+eB+CGCAiCiFgkgmT54HCdoGE0MhgkAM4LhOWJ/CQThIk4NQik4I5+DgP5IDOBJ/B2TgDnwaQ3k+cR0l4P5jBOfguDOCIimCSgwCMKJuDsIRjmkUJ/B8JBBkIRAYmQcRglwP5lAOfhNDKCAikSRgxE8WJyEQIJkEGdhHhuD5xlSXYQicMR0lsP5FBmXhoD+ZhTBgfQrgwMwUnQP5HikfoFhwZxxlYdwbW0CJaWKag8EuI5oTufwwkeIoskIMYPDOfB0iOaZznwbw2GoKoQGaKQFjqEBQikBBjGCf4nCgShoLyTCZnIP5GlqOo5YgAxejyL4GAqeBWi+BI6ngQYvisY5+jMMBHHKHJAjIRoDFqPI0gYOxSlIFptCERpSBGbQgn6SItmyUwAHaM4MgqXBljSLl7GANRuiuMBajsBQLEgRY0gOSxKmUP5uDuCpODIaxxgqbI/g+cR8lSQBwDEYpsBObpBBabAPG6S5yniM4HHKIJBDiT4TnyKQ6nEbBjBeRhPnKGwYCkMYCgcGAnnGDBSD+RIHhKKJDDmMRSkSbg/nKY58jAOxzCyUIuk0CpMlCKfXAyUwsdIEwMHxZ5TiieoSA6fQjEoLh0hKWxJC0NISksSQsDSHQaFeUQIAKRJIDuT5DnyQ4tnWfR7GCLZMBqXI+i2S5KlyOvukOfxZDICAylSSg8jWUwyGmXYPnMNhpl6/sLg0gxjNBmNkRIQR3CRHMOQIYlwjBxHQH4T45hSBBGO/sVgQRkv7EyO4P4mgeC5E+MsTIvBfgWD+PFBIFgvgaTaPwP4mxdA/CmNQOoWgci5FGJsLAqRYiKE0PgV4TQOh0EIHkQ4xw6DnBMLsb4Hx/AHEAHEdYpwIj2D+JwDwORfjjE+B0H4dA1ASKcK8UYnxzhXAyOsPQvhfgYDoPEQ4RwMBziqDYXY6g9AmFyCwMomwThxHkH0fA5x/jbHuJ8f4dxxj4D8Ecf41A+j8HMMoUgTBMjGG+Pgf4nx1j/EAFAAwAggAIAYFQQ4WgEggDIAQgI=")
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234","AK1",nil,nil)
	var_Nodes:Add("Sub 2","1234","AK2",nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2.1</b>",nil,nil,nil,nil):AddGroup("Child <b>2.2</b>",nil,nil)
var_Frame := oDCOCX_Exontrol1:Frames:Add("AK1,AK2")
	var_Frame:[Padding,exPaddingAll] := 8
	var_Frame:BackColor := 0x1000000
	var_Frame:Pattern:Type := exPatternEmpty
oDCOCX_Exontrol1:EndUpdate()

local var_Frame as IFrame
local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:IndentSiblingY := 32
oDCOCX_Exontrol1:VisualAppearance:Add(1,"gBFLBCJwBAEHhEJAADhABDYGg6AADACAxRDAMgBQKAAzQFAYawdBgABoGUZ4JhUAIIRZGMIjFDcEwxC6NIpAWCYQDEMw0AJCIyDFCAZBsHKPRoASQZUhmHIDTbIEBxfIMIRLE6PRhmGL4HjWOo0TLAdI0PJMBr3J4AKbfOJpfDSQZDRrTMyReDkNBBBKlY7rKoqRpCFYtDSJNoWVBIahhNiGbbiCQYfouFZdUpRV5VLTUVxbF6YZDvKZZZjmH48RpPUIyNS2FyxHDEIxyEALYACS5fTrCNZPVjgAY4fSqMToDDpKoSWp0QjlOS5jiyYoJZ7nWa2PDdUzXCC3LgADabThqdapcBAeqYHhORRRFSiYD4eAxYw2NaTUrSeS8JBmnmSIYlaOY6H2dwHC0CZWHSeobEmRpbGuOpeFsbhRmgS5/loAJtl4fg5E6b4LFEAwEEISgGhMGZQmocgZMWJA2AMEAxAgTYAlGEJZAkCgdngNYZAYEYYBGdRnk8CBUmqBZOhgZgagaYZIHYHoHmICIGCKCJhiOPgmgUIRTEYKgviKQpyC6C5jAiRgygyYxIlYNoNmOAp2DoM5jwEb8miIUhCCGJBCBIRoRmSCQmEqEpkkkNhOhOZQJBCBgjmUSB0zCSBnjYWoWmWSR2F6F5mAmBhihiZZpFyBoHGQc54n4PxPCOSJxDwZppkIb4cGcSZOHaHInwWeYdmeKZ2HyH5nCmNJxhqD5ZB4aIRg+E5kngOpOiOJoMiOKJaD6EokGkShChaJJpHoVoYiaaYqHaGQ6GiE5i1aJRyBSdA9A8M4QmQOJqiqMorisawKj7ggrEqRo1iyaxqmaOIumsc4OicPJqFkWhXDwIhjHiXQ3GwawikeMhsksLpOjKLQLDaUYzm0KxWlSNZtDMdpEDubAahIVw7A6Q4slYNYNFMXJXDWLhriKZ46G6S4um6OovAuNpxjubwrladI9m4O4SmAOptlgbhSDoMADECUAzmKIxDAWQZNBwGwJkIMIsDcDJDnCPBHA6RIxAwTwCkCcADiIUoHGUI4WioMhMhMIJKTeHIPCWSWUCcKJKnIfI3CqS4ykyPwykwcxMgMIZHg4TBuByFIOCOBJhDCDAjASRHB34RZRDQbQnEiUp0H0NxKlONJND8UpUHUQwPEAMBzlOBw6gaSB9HSXpXkuQpsjoL4LlKcxklmNhdh8apaHaTYjG6Wp2n2NxwlydwtlYLpYjWcx7F0EMYYuxsi4DaJsMoqQ1MuHKLkNowh4D8BuBEYo8QuBvAmMceInBDgdGQPITgnwWBbDgEUUw/g2jvD2O4XSdATDBC4wsUoiQwBYagEcJ41B6idC+F0arQQ3hjGuPYLorw0jbEsB0DIWxoAbA4OwHIvRuDmFiFAKYlBihZCoFQfA3gjiPc+J43g5V+BvFGOcfQXhXipHWJUHwGQmjgHuNocIEAiNHFCKgKAlACgBCQFESgfwfjTHoH0L4bxsj3H6H8R43R8h+A+J8do+h/gFA+MgKAfATChAcPcaA6xvgRAGEwNIDQQg0BMEQZAngJiiDsAUIAyALgDDAIQB4ggoA6AUEEDAKwCDgFoBkQYEA2BOGAHEGYAQDCUAEIAF4fgBANACCgEgxBICYAkOILQFQhDICuAsMIhAXiGCgLoDQQwMBrAYOEWgORDgQHYEsIQcQSgJDCBIDggAmAkDQAgYIFgRDEEQJACQEQTAlGIKgTIExxB0CiIkWITgUBFCQKUCoYhiBXEWEIIQIwEC4ESBAKA3AhgZHGEAIYCAogIn+FARIjQIiqBoMYXA3QNhjEIGwRwURfA5GOckDo4xaB5AiDESgQgGgYp6BAagAgwBjB4D8Q40B9AhCIBgQYkQJAqlQLkDoIwyCEEYJIKQPgkjJAyCkEo5BaCZAgHICgPhkA5AAIYMAEBngZGGDgHgBw4DsA+IMdAfBKgSFUFQZQuQugrDKIQVglgpC+CyMsDIaQWjlFoLkB4khKA7CUCFSAxwmChEoGEZAOADgAHgB0QYtBjiZBmCIMoTBs2uHMFwaImRphKDQE0HIrQahmGAHYTAgRhBfCYAkQgMxBhQlGCEYwYhnBAHCDkU4RByidCmJ4OozhMjZB2OcOg8ROizGcSgLIwgNBmHYAARATw/BBEMDAYQGAhhcHEKAEIphAjQC0AUII6ASgIFANQE04hdAdCEKgQoDROBTHwDAZKDQMBnHEDwBYoQ2AtnEMYDA6B6ggFGPQQ1YgdBNCQKkIoJRSg0E8JUKQ2gshLGGB0DYCw6BYCIEIGIEhg4JCoAoQIeAXCFG0HkJ4qR2g/FQFUAwosfiNCgOoHoRRUgVBcKUKg0BdhOCEKMAoexxAmAiMAGIogaCCDhccQIXAVCFCgLEK4ah+heFYBURwsQrBaGGFkdYJQ0CsGqKYWwVhdDLCuAIVoWQEiDCcKsYwBBA1zEmAkA4wB6AeEIGARQEQ1j1EAK8ewBhhBYB2A0MArEzixBsB4YoWBtgZDGMIFoewDi1L0EAEggBNhHEgIkWYQwkiBCEAUZANQ2D9FCBoWwghojaBWEkNI7QaipFoLYVw1AtDLCqGsIwrAQCzEGEIZoCBNgwCoJ0EArRbCwAUN4LY2w+hvHcAUYIuArgOHEEAFYaw3BKEgOsG4oAACAEAQEA==")
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234","AK1",nil,nil)
	var_Nodes:Add("Sub 2","1234","AK2",nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2.1</b>",nil,nil,nil,nil):AddGroup("Child <b>2.2</b>",nil,nil)
var_Frame := oDCOCX_Exontrol1:Frames:Add("AK1,AK2")
	var_Frame:[Padding,exPaddingAll] := 8
	var_Frame:BackColor := 0x1000000
	var_Frame:Pattern:Type := exPatternEmpty
oDCOCX_Exontrol1:EndUpdate()

local var_Frame as IFrame
local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234","AK1",nil,nil)
	var_Nodes:Add("Sub 2","1234","AK2",nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2.1</b>",nil,nil,nil,nil):AddGroup("Child <b>2.2</b>",nil,nil)
var_Frame := oDCOCX_Exontrol1:Frames:Add("AK1,AK2")
	var_Frame:BackColor := RGB(255,0,0)
	var_Frame:Pattern:Type := exPatternEmpty
oDCOCX_Exontrol1:EndUpdate()

local var_Frame as IFrame
local var_Nodes as INodes
local var_Pattern as IPattern

oDCOCX_Exontrol1:BeginUpdate()
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234","AK1",nil,nil)
	var_Nodes:Add("Sub 2","1234","AK2",nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2.1</b>",nil,nil,nil,nil):AddGroup("Child <b>2.2</b>",nil,nil)
var_Frame := oDCOCX_Exontrol1:Frames:Add("AK1,AK2")
	var_Frame:ShowOnBackground := false
	var_Frame:[Padding,exPaddingAll] := -4
	var_Pattern := var_Frame:Pattern
		var_Pattern:Type := exPatternFrame | exPatternFDiagonal
		var_Pattern:Color := RGB(190,190,190)
		var_Pattern:FrameColor := RGB(128,128,128)
oDCOCX_Exontrol1:EndUpdate()

local var_Frame as IFrame
local var_Nodes as INodes
local var_Pattern as IPattern

oDCOCX_Exontrol1:BeginUpdate()
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234","AK1",nil,nil)
	var_Nodes:Add("Sub 2","1234","AK2",nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2.1</b>",nil,nil,nil,nil):AddGroup("Child <b>2.2</b>",nil,nil)
var_Frame := oDCOCX_Exontrol1:Frames:Add("AK1,AK2")
	var_Frame:ShowOnBackground := false
	var_Pattern := var_Frame:Pattern
		var_Pattern:Type := exPatternFrame | exPatternFDiagonal
		var_Pattern:Color := RGB(190,190,190)
		var_Pattern:FrameColor := RGB(128,128,128)
oDCOCX_Exontrol1:EndUpdate()

local var_Frame as IFrame
local var_Nodes as INodes
local var_Pattern as IPattern

oDCOCX_Exontrol1:BeginUpdate()
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234","AK1",nil,nil)
	var_Nodes:Add("Sub 2","1234","AK2",nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2.1</b>",nil,nil,nil,nil):AddGroup("Child <b>2.2</b>",nil,nil)
var_Frame := oDCOCX_Exontrol1:Frames:Add("AK1,AK2")
	var_Frame:Visible := true
	var_Pattern := var_Frame:Pattern
		var_Pattern:Type := exPatternFrame | exPatternFDiagonal
		var_Pattern:Color := RGB(190,190,190)
		var_Pattern:FrameColor := RGB(128,128,128)
oDCOCX_Exontrol1:EndUpdate()

local var_Frame,var_Frame1 as IFrame
local var_Node as INode
local var_Nodes as INodes
local var_Pattern,var_Pattern1 as IPattern

oDCOCX_Exontrol1:BeginUpdate()
var_Node := oDCOCX_Exontrol1:Root
	var_Node:AddAssistant("Assistant 1",nil,nil)
	var_Node:AddAssistant("Assistant 2",nil,nil)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234","AK1",nil,nil)
	var_Nodes:Add("Sub 2","1234","AK2",nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2.1</b>",nil,"GR1",nil,nil):AddGroup("Child <b>2.2</b>",nil,nil):Key := "GR2"
var_Frame := oDCOCX_Exontrol1:Frames:Add("1234")
	var_Pattern := var_Frame:Pattern
		var_Pattern:Type := exPatternFrame | exPatternFDiagonal
		var_Pattern:Color := RGB(190,190,190)
		var_Pattern:FrameColor := RGB(128,128,128)
var_Frame1 := oDCOCX_Exontrol1:Frames:Add("GR2")
	var_Pattern1 := var_Frame1:Pattern
		var_Pattern1:Type := exPatternFrame | exPatternFDiagonal
		var_Pattern1:Color := RGB(190,190,190)
		var_Pattern1:FrameColor := RGB(128,128,128)
oDCOCX_Exontrol1:EndUpdate()

local var_Frame as IFrame
local var_Node as INode
local var_Nodes as INodes
local var_Pattern as IPattern

oDCOCX_Exontrol1:BeginUpdate()
var_Node := oDCOCX_Exontrol1:Root
	var_Node:AddAssistant("Assistant 1",nil,nil)
	var_Node:AddAssistant("Assistant 2",nil,nil)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234","AK1",nil,nil)
	var_Nodes:Add("Sub 2","1234","AK2",nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2.1</b>",nil,"GR1",nil,nil):AddGroup("Child <b>2.2</b>",nil,nil):Key := "GR2"
var_Frame := oDCOCX_Exontrol1:Frames:Add("root")
	var_Frame:Nodes := "GR1(group)"
	var_Pattern := var_Frame:Pattern
		var_Pattern:Type := exPatternFrame | exPatternFDiagonal
		var_Pattern:Color := RGB(190,190,190)
		var_Pattern:FrameColor := RGB(128,128,128)
oDCOCX_Exontrol1:EndUpdate()

local var_Frame as IFrame
local var_Node as INode
local var_Nodes as INodes
local var_Pattern as IPattern

oDCOCX_Exontrol1:BeginUpdate()
var_Node := oDCOCX_Exontrol1:Root
	var_Node:AddAssistant("Assistant 1",nil,nil)
	var_Node:AddAssistant("Assistant 2",nil,nil)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234","AK1",nil,nil)
	var_Nodes:Add("Sub 2","1234","AK2",nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2.1</b>",nil,nil,nil,nil):AddGroup("Child <b>2.2</b>",nil,nil)
var_Frame := oDCOCX_Exontrol1:Frames:Add("root")
	var_Frame:Nodes := "root(assistant)"
	var_Pattern := var_Frame:Pattern
		var_Pattern:Type := exPatternFrame | exPatternFDiagonal
		var_Pattern:Color := RGB(190,190,190)
		var_Pattern:FrameColor := RGB(128,128,128)
oDCOCX_Exontrol1:EndUpdate()

local var_Frame as IFrame
local var_Node as INode
local var_Nodes as INodes
local var_Pattern as IPattern

oDCOCX_Exontrol1:BeginUpdate()
var_Node := oDCOCX_Exontrol1:Root
	var_Node:AddAssistant("Assistant 1",nil,nil)
	var_Node:AddAssistant("Assistant 2",nil,nil)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234","AK1",nil,nil)
	var_Nodes:Add("Sub 2","1234","AK2",nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2.1</b>",nil,nil,nil,nil):AddGroup("Child <b>2.2</b>",nil,nil)
var_Frame := oDCOCX_Exontrol1:Frames:Add("root")
	var_Frame:Nodes := "root(child)"
	var_Pattern := var_Frame:Pattern
		var_Pattern:Type := exPatternFrame | exPatternFDiagonal
		var_Pattern:Color := RGB(190,190,190)
		var_Pattern:FrameColor := RGB(128,128,128)
oDCOCX_Exontrol1:EndUpdate()

local var_Frame as IFrame
local var_Node as INode
local var_Nodes as INodes
local var_Pattern as IPattern

oDCOCX_Exontrol1:BeginUpdate()
var_Node := oDCOCX_Exontrol1:Root
	var_Node:AddAssistant("Assistant 1",nil,nil)
	var_Node:AddAssistant("Assistant 2",nil,nil)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234","AK1",nil,nil)
	var_Nodes:Add("Sub 2","1234","AK2",nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2.1</b>",nil,nil,nil,nil):AddGroup("Child <b>2.2</b>",nil,nil)
var_Frame := oDCOCX_Exontrol1:Frames:Add("root")
	var_Frame:Nodes := "root(all)"
	var_Pattern := var_Frame:Pattern
		var_Pattern:Type := exPatternFrame | exPatternFDiagonal
		var_Pattern:Color := RGB(190,190,190)
		var_Pattern:FrameColor := RGB(128,128,128)
oDCOCX_Exontrol1:EndUpdate()

local var_Node as INode
local var_Nodes as INodes
local var_Pattern as IPattern

oDCOCX_Exontrol1:BeginUpdate()
var_Node := oDCOCX_Exontrol1:Root
	var_Node:AddAssistant("Assistant 1",nil,nil)
	var_Node:AddAssistant("Assistant 2",nil,nil)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234","AK1",nil,nil)
	var_Nodes:Add("Sub 2","1234","AK2",nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2.1</b>",nil,nil,nil,nil):AddGroup("Child <b>2.2</b>",nil,nil)
var_Pattern := oDCOCX_Exontrol1:Frames:Add("AK1,AK2"):Pattern
	var_Pattern:Type := exPatternFrame | exPatternFDiagonal
	var_Pattern:Color := RGB(190,190,190)
	var_Pattern:FrameColor := RGB(128,128,128)
oDCOCX_Exontrol1:EndUpdate()

local var_Frame as IFrame
local var_Nodes as INodes
local var_Pattern as IPattern

oDCOCX_Exontrol1:IndentSiblingY := 30
oDCOCX_Exontrol1:ShowLinksDir := true
oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
oDCOCX_Exontrol1:AntiAliasing := true
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"LA",nil,nil):ShowLinkDir := false
	var_Nodes:Add("L1_B",nil,"LB",nil,nil)
	var_Nodes:Add("L2_A","LA","LA2",nil,nil)
	var_Nodes:Add("L2_B","LB","LB2",nil,nil)
var_Frame := oDCOCX_Exontrol1:Frames:Add("LB")
	var_Frame:[Padding,exPaddingAll] := -2
	var_Pattern := var_Frame:Pattern
		var_Pattern:Type := exPatternBDiagonal
		var_Pattern:Color := RGB(128,128,128)
	var_Frame:ShowOnBackground := false

local var_Appearance as IAppearance
local var_Node,var_Node1,var_Node10,var_Node11,var_Node12,var_Node13,var_Node14,var_Node15,var_Node16,var_Node17,var_Node18,var_Node19,var_Node2,var_Node20,var_Node21,var_Node22,var_Node23,var_Node24,var_Node25,var_Node26,var_Node27,var_Node28,var_Node29,var_Node3,var_Node30,var_Node31,var_Node32,var_Node33,var_Node34,var_Node35,var_Node36,var_Node37,var_Node38,var_Node39,var_Node4,var_Node40,var_Node41,var_Node42,var_Node43,var_Node44,var_Node45,var_Node46,var_Node47,var_Node48,var_Node49,var_Node5,var_Node50,var_Node51,var_Node52,var_Node53,var_Node54,var_Node55,var_Node56,var_Node57,var_Node58,var_Node59,var_Node6,var_Node7,var_Node8,var_Node9 as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
var_Appearance := oDCOCX_Exontrol1:VisualAppearance
	var_Appearance:Add(1,"gBFLBCJwBAEHhEJAADhABdQFg6AADACAxRDAMgBQKAAzQFAYawdBgABoGUZ4JhUAIIRZGMIjFDcEwxC6NIpAWCYQDENQwSSMMJwSKYYBiASEYJASQZUhmHIDTbIEBxfIMIRLE6PZbmEYYfgeNY6TQCcIgVD0ExhAZ2Q4EQAKRpOFY/DBQNLgAKNCQ3LaQY7BaKgZouTYDVrVNSVFC0IBkGoSbauCIJHrGCZ1RBYMI0VDNRwHJiMbRtSyqXjGJ4pSrAcq0FAgYRHI6jZxnGL5chqPqGVjMNZ1bQuKwzT0Ld5wTYsdydBK1MIkTKKaoORZgRpYUI6FAeSgBWyPcCqPSoDrKdo4XLdYwbeAFcSPD6+NBhG7tXm/NarNTgTB6DBthsGJbgYYw9AQVxBoOch2hEbh+nAARYkQdZ7CMPYGH+FxmlqbJ5lqDAdjMC5AmIW54hwaBvA4IQ8D+T8IFscgenAAZMHiEgWiWdRZlSAAhAkFAGq6dAdEcIYVF4QJKCAHQDBCBJYGUGQNhCEIhiSCJaGAYQWBsIYmEEFgJAGQ42CyC4iliPgygsT4olSXg3g2Qwwk0MpMiMLJIg8Y54niTYOmPPJMDMDIonSSU7jMJJbDaTYjlYUoMmMCRWFQAAlEkZgtDgTgjgCJQpEoIgkgkIQHnIAB7CACARnIaIaiaGYuG6GxmhmFB7CGSICAyHwoAmQxQlQNIlikWgthYIwaAYVQvAuQpsg0IxIhKTIzCwToTiiaYACkChGhKJJpEOQoWC+C5imyCgiggYpUzMZ5Yj6AIfg6UpcjgLYInIPILhOTYaEIUg9EoItfCGCByAiCV2lIKILCGK4qnKO4YggWpQgIJxJmIaJhDgDgKECaIykkUhUhILQLEKRh9iiYpzCSSQxmgcgkm2NppAKbI8C4RoBiQYgSgSMQQEEEIDjECBDA8LorjKa47EQMQSm4DpEhEKBDBeRgBGqMQnmkA5in4JAJAINoEC6JR4jyaQ6E6AhEhIIxNBMRJPiQCYyHCGAUgUMQwEgEhhkEOBHBOBJxCMHJHjGXB/CKSBxlENwaj1qgsEwERICIDB/iQDgjgiYYvE2cx8l2KIinoEI5CYSYiFqEAz0mMBZBbwIkEsEN+gMSpSHSTITEqSoEFyGBHCoSoihqEAsgsIo8ikKhKGiVJ6AADwTkicQlAkUhElA+Z4VUHpHGuRA8lMdI9DscJc8r5QQAaIYsGUOpOjoOwHCEJAUgBh8B1EAAcHIzg5gPCGNgdQfRPhnGiLINhhQEDCBcGUDYphxjLHkNgfwTARhiHEBYWAVxpI1HQDcDjthiAADoKcCgJgbs7FyG4LQagBBgE0CMOYOxLhtGY/AcAegNgTHIPkHISAHADEQNYOA2BwAHEQHABwQxMDbCQEscoEBAAgEOD0V4cR0jyGCPAPwHAvh0EAOIHIDRfA/EaGMfYfguAACiBQIg/xWAbH0F8J4bxSD6G8MUMo7Q9ieHuI8eA0gLjfG2PUPQnwvhvHsPsGABxhD8E+AMbgfhVDJH2L8U48wAjbEGPwPo7x8j4F4FccwHAhhiEgBQEQhAnCDGgHwBonxiAZD+G8Lo/hHj3H8PELIiBwgOFCNQHAqQAhYBWAUIARAECgHyKkIIqAIgGGCLgUIFAhB5CQAcFAGgcEHHKBwUYkAdiHDgOaAIKBigYCCFAFQhBzChAWKEOYzwDhCEwFMBQNxwD3C8CsPgHQhANEuA4Uw+gdhHDAOwBogRYAzFuGAQIEgQAzCSGUAIbAXAFCiKIGghhBCQAeAFIgDgwjMByEAAYXg1hiEwFgBYAQugAGIPsTodgnDSBgMca4LhqChCgD4CIYgYBDmcI4GIxgUCYAm1oPIjwgjmFQMYWA1gNCiBUqcII6gegUEAHwB4oRwhzEGLge4GAOC6HUAcMIsAbCGDqLYHYVBACTAkIIIAYigCIGcBQCArQKiiFQFERQUQhDMAOBgcIWAggUBGIMfAVAHhCBwEgBAMg+jbFqCcHYLxvg4D2A8QI3AziMHiJoUgFhACyCwIINofwHiJDAJUKw2B2ARGEEAIwCxIh2BaNQQA/ROBRGoFYQ48B/AeEGEt99lQOgDFgGcAtFgdgHEANIMAhAIDKAygkQAEAAjxBeIoCI7QfjUEEEwDIIgWBFEQHUSANxsAqEEEUdwlA4iJCSFYEwhBsCXE0KoIAexnj4DoDkEwaBmgYCGAwMADAkCFCMMYAQOgMhQEIHsaIVQQDXFOOgRtwAUguAcAUU1iw1CWA6OwdIOQFBxCgCkDgeBribBmIgP4KQiAAB+KoAg2QNiDDoG0BQyQzg+EGOAWAFgRC4DsEURQYAdhWFKAoKAVQAB/AcHEaAORiioFqBYMWFATCZEsBsIYcA0gMGCJwGAhg4DQAwKsDAYQGzZBkAcSA8gODEBEGQVIQhajUEeeYKY1QIDrBCIAEg0xIAwEgBNkAAADUTA6B4MQEwv0UEGLAUgzhf04AKGEg4BhYD2B0MUAABApAAvqI8WAqAdDGGwJsEIXwWDtE0AAA4fhmDZCmJMMwbBkgBIC")
	var_Appearance:Add(2,"gBFLBCJwBAEHhEJAADhABEEMACAADACAxRDAMgBQKAAzQFAYawdBgABoGUZ4JhUAIIRZGMIgdBINQTDCLYyiUBYJhAMYSAJCI4jBCAZRXEAaQIkKY4ZDKCY2QLIEgSFCETQlEAYZgkCB5UiGNIkQLSFDABJMBraDgSAApeoYVj4NZASANFB0bKcQAVDSOKRjeCacpOUpQRZLIyiLZVWQSGoYLahW4YQiKIJKRTXdhULQtLS5FaWZbte6LchqOAAYbOV6ynSeV6NUJNc5xVicBgrBKlI6nGxIJqaZpVYzPeQQTTUby5OyEbyADJ4DqEAKaUrZNoZfhkBhlNa2YguC4gAzudaUZhCOqABpWYYLDS/JSGCYJGDcOaVRZ0FJUVwPg8GZkkCcBQDGJw0HOJ5gECdRUi0dxXi2IJbG4Jp+huHpzH0GouF2eA+B4F4bkESwEEISgGhMGZQmocgZFQFAki4TIAAECBNgCUYQsaCgRjQdRjAYERhmIBB5gIQBwm2BROlOSgaDMIZCmoHoHmICIGB8MJiEOFgmD+IoIGEA4GA4aI0kSC5NliRJrgyYxIlYNoNkyGJkliDpPlidQDD2ZADBYQg6iQQ46EaEZkgkJhKhGTw5DSSITk4eRFAMNRlEMXhWDuZYJC4WoWmWA4+CYORMGmBQDguTBDg4Zg8GaA5CGqGpmkmNhuhuZoim4chAkuaZUmmHZPBgahoh6Z5JnYfofmGI5IjmIJnEmWh3D4D0nn+IpokmboBgeaBSnodw6E+I5YnOIBpgoZoaiaJ9IHOJAAAmVoSh2aRaF6G4pmqCBqh6KAqCkEJqD6TxzlKHosmsSpWjaExPEqZosh0apqkKMotmwCwCjkPQrjKeg0D8T4TlaQ4ymySw2k6LhPFsRpFDsLRDmCdw9i0GxmlqNptksdJ2jebBTjaYoQC0ex+maOZuguJppjkLBZByeI7m4S5GnKPJvEkApvD4Jwim6EY7i8C5Wn6P4vHuZoRhcT4cBad5BnCDAnAqO5wFOZwCigZxZiyepEnCXBXBaRZxgwFwTD6MJ6goaw+nETBnCKSIxjwdh1h6T5jm8IOuEyNwukuT4siie5JguaZsn+ShzAyZw6kyMJ4hCQ44g6U5/DeTI0E0FxGlGcojnMSgvDSSROFQOANnMfxCD+dItFcVpVnWDRbFOFxMH0dQDiATItgaZpUnUOJ3GaWZ2gOdxklCDQNjYX4KmEaYYmMM43EkP0d4tR3gbBKKgOwGgtjsFQGodQuxCAvAWFIMwnwGgcEyCYC4FRijxE4Gl0AnAuCOFWBUAABwth+AACAEBAQ=")
	var_Appearance:Add(3,"gBFLBCJwBAEHhEJAADhABI8IQAAYAQGKIYBkAKBQAGaAoDDWDoMAANAyjPBMKgBBCLIxhEYobgmGIXRpFMbxAKQahLEiTIklBI8ExXFqMQCkGKocgONYgTLOMZOXCEEwCgI=")
oDCOCX_Exontrol1:AntiAliasing := true
oDCOCX_Exontrol1:IndentSiblingY := 4
oDCOCX_Exontrol1:ShowRoundLink := true
oDCOCX_Exontrol1:PenLink := exPenSolid
oDCOCX_Exontrol1:SelColor := RGB(255,255,0)
oDCOCX_Exontrol1:HasButtons := exPlus
oDCOCX_Exontrol1:[DefaultNodePadding,exPaddingAll] := 6
var_Node := oDCOCX_Exontrol1:Root
	var_Node:Caption := "Constuction of a House"
	var_Node:BackColor := 0x1000000
	var_Node:ForeColor := RGB(255,255,255)
	var_Node1 := var_Node:AddAssistant("<font ;6>Work:<r>100.00%<br>Budget:<r>$215,500.00",nil,nil)
		var_Node1:Left := false
		var_Node1:ShowLinks := false
		var_Node1:[Padding,exPaddingAll] := 0
		var_Node1:FixedWidth := 72
		var_Node1:BackColor := 0x2000000
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Node2 := var_Nodes:Add("1. Internal","Root","Internal",nil,nil)
		var_Node2:ArrangeSiblingNodesAs := exTree
		var_Node2:ShowRoundLink := false
		var_Node2:BackColor := 0x1ff0000
		var_Node2:ForeColor := RGB(255,255,255)
		var_Node3 := var_Node2:AddAssistant("<font ;6>Work:<r>45.60%<br>Budget:<r>$86,500.00",nil,nil)
			var_Node3:Left := false
			var_Node3:ShowLinks := false
			var_Node3:[Padding,exPaddingAll] := 0
			var_Node3:FixedWidth := 72
			var_Node3:BackColor := 0x2000000
	var_Node4 := var_Nodes:Add("1.1 Electrical","Internal","Electrical",nil,nil)
		var_Node4:ShowRoundLink := false
		var_Node4:BackColor := 0x100ff00
		var_Node4:ForeColor := RGB(255,255,255)
		var_Node5 := var_Node4:AddAssistant("<font ;6>Work:<r>11.80%<br>Budget:<r>$25,000.00",nil,nil)
			var_Node5:Left := false
			var_Node5:ShowLinks := false
			var_Node5:[Padding,exPaddingAll] := 0
			var_Node5:FixedWidth := 72
			var_Node5:BackColor := 0x2000000
	var_Node6 := var_Nodes:Add("1.1.1 Rough-in electrical","Electrical","RoughElectrical",nil,nil)
		var_Node6:BackColor := 0x3000000
		var_Node6:[Padding,exPaddingAll] := 0
		var_Node7 := var_Node6:AddAssistant("<font ;6>Work:<r>2.80%<br>Budget:<r>$5,000.00",nil,nil)
			var_Node7:Left := false
			var_Node7:ShowLinks := false
			var_Node7:[Padding,exPaddingAll] := 0
			var_Node7:FixedWidth := 72
			var_Node7:BackColor := 0x2000000
	var_Node8 := var_Nodes:Add("1.1.2 Install and Terminate","Electrical","InstallTerminate",nil,nil)
		var_Node8:BackColor := 0x3000000
		var_Node8:[Padding,exPaddingAll] := 0
		var_Node9 := var_Node8:AddAssistant("<font ;6>Work:<r>1.90%<br>Budget:<r>$5,000.00",nil,nil)
			var_Node9:Left := false
			var_Node9:ShowLinks := false
			var_Node9:[Padding,exPaddingAll] := 0
			var_Node9:FixedWidth := 72
			var_Node9:BackColor := 0x2000000
	var_Node10 := var_Nodes:Add("1.1.3 HVAC Equipment","Electrical","HVAC",nil,nil)
		var_Node10:BackColor := 0x3000000
		var_Node10:[Padding,exPaddingAll] := 0
		var_Node11 := var_Node10:AddAssistant("<font ;6>Work:<r>7.10%<br>Budget:<r>$15,000.00",nil,nil)
			var_Node11:Left := false
			var_Node11:ShowLinks := false
			var_Node11:[Padding,exPaddingAll] := 0
			var_Node11:FixedWidth := 72
			var_Node11:BackColor := 0x2000000
	var_Node12 := var_Nodes:Add("1.2 Plumbing","Internal","Plumbing",nil,nil)
		var_Node12:ShowRoundLink := false
		var_Node12:BackColor := 0x100ff00
		var_Node12:ForeColor := RGB(255,255,255)
		var_Node13 := var_Node12:AddAssistant("<font ;6>Work:<r>33.80%<br>Budget:<r>$61,000.00",nil,nil)
			var_Node13:Left := false
			var_Node13:ShowLinks := false
			var_Node13:[Padding,exPaddingAll] := 0
			var_Node13:FixedWidth := 72
			var_Node13:BackColor := 0x2000000
	var_Node14 := var_Nodes:Add("1.2.1 Rough-in plumbing","Plumbing","RoughPlumbing",nil,nil)
		var_Node14:BackColor := 0x3000000
		var_Node14:[Padding,exPaddingAll] := 0
		var_Node15 := var_Node14:AddAssistant("<font ;6>Work:<r>11.30%<br>Budget:<r>$22,000.00",nil,nil)
			var_Node15:Left := false
			var_Node15:ShowLinks := false
			var_Node15:[Padding,exPaddingAll] := 0
			var_Node15:FixedWidth := 72
			var_Node15:BackColor := 0x2000000
	var_Node16 := var_Nodes:Add("1.2.2 Set plumbing fixtures and trim","Plumbing","PlumbingFixtures",nil,nil)
		var_Node16:Width := 256
		var_Node16:BackColor := 0x3000000
		var_Node16:[Padding,exPaddingAll] := 0
		var_Node17 := var_Node16:AddAssistant("<font ;6>Work:<r>13.20%<br>Budget:<r>$31,000.00",nil,nil)
			var_Node17:Left := false
			var_Node17:ShowLinks := false
			var_Node17:[Padding,exPaddingAll] := 0
			var_Node17:FixedWidth := 72
			var_Node17:BackColor := 0x2000000
	var_Node18 := var_Nodes:Add("1.2.3 Test and clean","Plumbing","PlumbingTest",nil,nil)
		var_Node18:BackColor := 0x3000000
		var_Node18:[Padding,exPaddingAll] := 0
		var_Node19 := var_Node18:AddAssistant("<font ;6>Work:<r>9.30%<br>Budget:<r>$8,000.00",nil,nil)
			var_Node19:Left := false
			var_Node19:ShowLinks := false
			var_Node19:[Padding,exPaddingAll] := 0
			var_Node19:FixedWidth := 72
			var_Node19:BackColor := 0x2000000
	var_Node20 := var_Nodes:Add("2. Foundation","Root","Foundation",nil,nil)
		var_Node20:ArrangeSiblingNodesAs := exTree
		var_Node20:ShowRoundLink := false
		var_Node20:BackColor := 0x1ff0000
		var_Node20:ForeColor := RGB(255,255,255)
		var_Node21 := var_Node20:AddAssistant("<font ;6>Work:<r>24.00%<br>Budget:<r>$46,000.00",nil,nil)
			var_Node21:Left := false
			var_Node21:ShowLinks := false
			var_Node21:[Padding,exPaddingAll] := 0
			var_Node21:FixedWidth := 72
			var_Node21:BackColor := 0x2000000
	var_Node22 := var_Nodes:Add("2.1 Excavate","Foundation","Excavate",nil,nil)
		var_Node22:ShowRoundLink := false
		var_Node22:BackColor := 0x100ff00
		var_Node22:ForeColor := RGB(255,255,255)
		var_Node23 := var_Node22:AddAssistant("<font ;6>Work:<r>24.00%<br>Budget:<r>$46,000.00",nil,nil)
			var_Node23:Left := false
			var_Node23:ShowLinks := false
			var_Node23:[Padding,exPaddingAll] := 0
			var_Node23:FixedWidth := 72
			var_Node23:BackColor := 0x2000000
	var_Node24 := var_Nodes:Add("2.1.1 Pour Concrete","Excavate","Concrete",nil,nil)
		var_Node24:BackColor := 0x3000000
		var_Node24:[Padding,exPaddingAll] := 0
		var_Node25 := var_Node24:AddAssistant("<font ;6>Work:<r>7.90%<br>Budget:<r>$30,000.00",nil,nil)
			var_Node25:Left := false
			var_Node25:ShowLinks := false
			var_Node25:[Padding,exPaddingAll] := 0
			var_Node25:FixedWidth := 72
			var_Node25:BackColor := 0x2000000
	var_Node26 := var_Nodes:Add("2.1.2 Cure & Strip Forms","Excavate","CureForms",nil,nil)
		var_Node26:BackColor := 0x3000000
		var_Node26:[Padding,exPaddingAll] := 0
		var_Node27 := var_Node26:AddAssistant("<font ;6>Work:<r>10.30%<br>Budget:<r>$70,000.00",nil,nil)
			var_Node27:Left := false
			var_Node27:ShowLinks := false
			var_Node27:[Padding,exPaddingAll] := 0
			var_Node27:FixedWidth := 72
			var_Node27:BackColor := 0x2000000
	var_Node28 := var_Nodes:Add("2.2 Steel Erection","Foundation","Steel",nil,nil)
		var_Node28:ShowRoundLink := false
		var_Node28:BackColor := 0x100ff00
		var_Node28:ForeColor := RGB(255,255,255)
		var_Node29 := var_Node28:AddAssistant("<font ;6>Work:<r>5.00%<br>Budget:<r>$9,000.00",nil,nil)
			var_Node29:Left := false
			var_Node29:ShowLinks := false
			var_Node29:[Padding,exPaddingAll] := 0
			var_Node29:FixedWidth := 72
			var_Node29:BackColor := 0x2000000
	var_Node30 := var_Nodes:Add("2.2.1 Steel Columns","Steel","SteelColumns",nil,nil)
		var_Node30:BackColor := 0x3000000
		var_Node30:[Padding,exPaddingAll] := 0
		var_Node31 := var_Node30:AddAssistant("<font ;6>Work:<r>2.80%<br>Budget:<r>$50,000.00",nil,nil)
			var_Node31:Left := false
			var_Node31:ShowLinks := false
			var_Node31:[Padding,exPaddingAll] := 0
			var_Node31:FixedWidth := 72
			var_Node31:BackColor := 0x2000000
	var_Node32 := var_Nodes:Add("2.2.2 Beams","Steel","Beams",nil,nil)
		var_Node32:Width := 256
		var_Node32:BackColor := 0x3000000
		var_Node32:[Padding,exPaddingAll] := 0
		var_Node33 := var_Node32:AddAssistant("<font ;6>Work:<r>1.90%<br>Budget:<r>$2,000.00",nil,nil)
			var_Node33:Left := false
			var_Node33:ShowLinks := false
			var_Node33:[Padding,exPaddingAll] := 0
			var_Node33:FixedWidth := 72
			var_Node33:BackColor := 0x2000000
	var_Node34 := var_Nodes:Add("2.2.3 Joist","Steel","Joist",nil,nil)
		var_Node34:BackColor := 0x3000000
		var_Node34:[Padding,exPaddingAll] := 0
		var_Node35 := var_Node34:AddAssistant("<font ;6>Work:<r>1.10%<br>Budget:<r>$2,000.00",nil,nil)
			var_Node35:Left := false
			var_Node35:ShowLinks := false
			var_Node35:[Padding,exPaddingAll] := 0
			var_Node35:FixedWidth := 72
			var_Node35:BackColor := 0x2000000
	var_Node36 := var_Nodes:Add("3. External","Root","External",nil,nil)
		var_Node36:ArrangeSiblingNodesAs := exTree
		var_Node36:ShowRoundLink := false
		var_Node36:BackColor := 0x1ff0000
		var_Node36:ForeColor := RGB(255,255,255)
		var_Node37 := var_Node36:AddAssistant("<font ;6>Work:<r>30.40%<br>Budget:<r>$83,500.00",nil,nil)
			var_Node37:Left := false
			var_Node37:ShowLinks := false
			var_Node37:[Padding,exPaddingAll] := 0
			var_Node37:FixedWidth := 72
			var_Node37:BackColor := 0x2000000
	var_Node38 := var_Nodes:Add("3.1 Masonry Work","External","Masonry",nil,nil)
		var_Node38:ShowRoundLink := false
		var_Node38:BackColor := 0x100ff00
		var_Node38:ForeColor := RGB(255,255,255)
		var_Node39 := var_Node38:AddAssistant("<font ;6>Work:<r>16.20%<br>Budget:<r>$16,000.00",nil,nil)
			var_Node39:Left := false
			var_Node39:ShowLinks := false
			var_Node39:[Padding,exPaddingAll] := 0
			var_Node39:FixedWidth := 72
			var_Node39:BackColor := 0x2000000
	var_Node40 := var_Nodes:Add("3.1.1 Lay Masonry","Masonry","LayMasonry",nil,nil)
		var_Node40:BackColor := 0x3000000
		var_Node40:[Padding,exPaddingAll] := 0
		var_Node41 := var_Node40:AddAssistant("<font ;6>Work:<r>9.00%<br>Budget:<r>$35,000.00",nil,nil)
			var_Node41:Left := false
			var_Node41:ShowLinks := false
			var_Node41:[Padding,exPaddingAll] := 0
			var_Node41:FixedWidth := 72
			var_Node41:BackColor := 0x2000000
	var_Node42 := var_Nodes:Add("3.1.2 Install roof drains","Masonry","RoofDrains",nil,nil)
		var_Node42:BackColor := 0x3000000
		var_Node42:[Padding,exPaddingAll] := 0
		var_Node43 := var_Node42:AddAssistant("<font ;6>Work:<r>3.10%<br>Budget:<r>$2,000.00",nil,nil)
			var_Node43:Left := false
			var_Node43:ShowLinks := false
			var_Node43:[Padding,exPaddingAll] := 0
			var_Node43:FixedWidth := 72
			var_Node43:BackColor := 0x2000000
	var_Node44 := var_Nodes:Add("3.1.3 Install tile in toilet rooms","Masonry","TileToiles",nil,nil)
		var_Node44:BackColor := 0x3000000
		var_Node44:[Padding,exPaddingAll] := 0
		var_Node45 := var_Node44:AddAssistant("<font ;6>Work:<r>1.30%<br>Budget:<r>$10,000.00",nil,nil)
			var_Node45:Left := false
			var_Node45:ShowLinks := false
			var_Node45:[Padding,exPaddingAll] := 0
			var_Node45:FixedWidth := 72
			var_Node45:BackColor := 0x2000000
	var_Node46 := var_Nodes:Add("3.1.4 Roofing","Masonry","Roofing",nil,nil)
		var_Node46:BackColor := 0x3000000
		var_Node46:[Padding,exPaddingAll] := 0
		var_Node47 := var_Node46:AddAssistant("<font ;6>Work:<r>2.80%<br>Budget:<r>$15,000.00",nil,nil)
			var_Node47:Left := false
			var_Node47:ShowLinks := false
			var_Node47:[Padding,exPaddingAll] := 0
			var_Node47:FixedWidth := 72
			var_Node47:BackColor := 0x2000000
	var_Node48 := var_Nodes:Add("3.2 Building Finishes","External","Building",nil,nil)
		var_Node48:ShowRoundLink := false
		var_Node48:BackColor := 0x100ff00
		var_Node48:ForeColor := RGB(255,255,255)
		var_Node49 := var_Node48:AddAssistant("<font ;6>Work:<r>14.20%<br>Budget:<r>$21,500.00",nil,nil)
			var_Node49:Left := false
			var_Node49:ShowLinks := false
			var_Node49:[Padding,exPaddingAll] := 0
			var_Node49:FixedWidth := 72
			var_Node49:BackColor := 0x2000000
	var_Node50 := var_Nodes:Add("3.2.1 Paint Walls","Building","Paint",nil,nil)
		var_Node50:BackColor := 0x3000000
		var_Node50:[Padding,exPaddingAll] := 0
		var_Node51 := var_Node50:AddAssistant("<font ;6>Work:<r>4.00%<br>Budget:<r>$8,000.00",nil,nil)
			var_Node51:Left := false
			var_Node51:ShowLinks := false
			var_Node51:[Padding,exPaddingAll] := 0
			var_Node51:FixedWidth := 72
			var_Node51:BackColor := 0x2000000
	var_Node52 := var_Nodes:Add("3.2.2 Ceiling Tiles","Building","CeilingTiles",nil,nil)
		var_Node52:Width := 256
		var_Node52:BackColor := 0x3000000
		var_Node52:[Padding,exPaddingAll] := 0
		var_Node53 := var_Node52:AddAssistant("<font ;6>Work:<r>3.60%<br>Budget:<r>$4,000.00",nil,nil)
			var_Node53:Left := false
			var_Node53:ShowLinks := false
			var_Node53:[Padding,exPaddingAll] := 0
			var_Node53:FixedWidth := 72
			var_Node53:BackColor := 0x2000000
	var_Node54 := var_Nodes:Add("3.2.3 Hang Wallpaper","Building","Wallpaper",nil,nil)
		var_Node54:BackColor := 0x3000000
		var_Node54:[Padding,exPaddingAll] := 0
		var_Node55 := var_Node54:AddAssistant("<font ;6>Work:<r>2.30%<br>Budget:<r>$1,500.00",nil,nil)
			var_Node55:Left := false
			var_Node55:ShowLinks := false
			var_Node55:[Padding,exPaddingAll] := 0
			var_Node55:FixedWidth := 72
			var_Node55:BackColor := 0x2000000
	var_Node56 := var_Nodes:Add("3.2.4 Carpet","Building","Carpet",nil,nil)
		var_Node56:BackColor := 0x3000000
		var_Node56:[Padding,exPaddingAll] := 0
		var_Node57 := var_Node56:AddAssistant("<font ;6>Work:<r>1.80%<br>Budget:<r>$6,000.00",nil,nil)
			var_Node57:Left := false
			var_Node57:ShowLinks := false
			var_Node57:[Padding,exPaddingAll] := 0
			var_Node57:FixedWidth := 72
			var_Node57:BackColor := 0x2000000
	var_Node58 := var_Nodes:Add("3.2.5 Hardware","Building","Hardware",nil,nil)
		var_Node58:BackColor := 0x3000000
		var_Node58:[Padding,exPaddingAll] := 0
		var_Node59 := var_Node58:AddAssistant("<font ;6>Work:<r>2.50%<br>Budget:<r>$2,000.00",nil,nil)
			var_Node59:Left := false
			var_Node59:ShowLinks := false
			var_Node59:[Padding,exPaddingAll] := 0
			var_Node59:FixedWidth := 72
			var_Node59:BackColor := 0x2000000
oDCOCX_Exontrol1:EndUpdate()

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:IndentSiblingY := 30
oDCOCX_Exontrol1:ShowLinksDir := true
oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
oDCOCX_Exontrol1:AntiAliasing := true
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Node := var_Nodes:Add("L1 A1",nil,"LA",nil,nil)
		var_Node:BackColor := RGB(255,0,0)
		var_Node:[Padding,exPaddingAll] := 16
	var_Nodes:Add("L1 B1",nil,"LB",nil,nil)
	var_Nodes:Add("L2 A1","LA","LA2",nil,nil)
	var_Nodes:Add("L2 B2","LB","LB2",nil,nil)
oDCOCX_Exontrol1:Nodes:[Item,"root"]:Caption := "Ls As"
oDCOCX_Exontrol1:EndUpdate()

local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:[DefaultNodePadding,exPaddingAll] := 8
oDCOCX_Exontrol1:IndentSiblingY := 30
oDCOCX_Exontrol1:ShowLinksDir := true
oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
oDCOCX_Exontrol1:AntiAliasing := true
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1 A1",nil,"LA",nil,nil)
	var_Nodes:Add("L1 B1",nil,"LB",nil,nil)
	var_Nodes:Add("L2 A1","LA","LA2",nil,nil)
	var_Nodes:Add("L2 B2","LB","LB2",nil,nil)
oDCOCX_Exontrol1:Nodes:[Item,"root"]:Caption := "Ls As"
oDCOCX_Exontrol1:EndUpdate()

oDCOCX_Exontrol1:Nodes:Add("Text",nil,"1234",nil,nil)
oDCOCX_Exontrol1:EditNode("1234")

local var_Nodes as INodes

oDCOCX_Exontrol1:WidthNode := 16
oDCOCX_Exontrol1:IndentSiblingY := 30
oDCOCX_Exontrol1:ShowLinksDir := true
oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
oDCOCX_Exontrol1:AntiAliasing := true
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1 A1",nil,"LA",nil,nil)
	var_Nodes:Add("L1 B1",nil,"LB",nil,nil)
	var_Nodes:Add("L2 A1","LA","LA2",nil,nil)
	var_Nodes:Add("L2 B2","LB","LB2",nil,nil)
oDCOCX_Exontrol1:Nodes:[Item,"root"]:Caption := "Ls As"

local var_Print as IExPrint
local var_Nodes as INodes

oDCOCX_Exontrol1:FixedWidthNode := 512
oDCOCX_Exontrol1:IndentSiblingY := 30
oDCOCX_Exontrol1:ShowLinksDir := true
oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
oDCOCX_Exontrol1:AntiAliasing := true
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"LA",nil,nil):ShowLinkDir := false
	var_Nodes:Add("L1_B",nil,"LB",nil,nil)
	var_Nodes:Add("L2_A","LA","LA2",nil,nil)
	var_Nodes:Add("L2_B","LB","LB2",nil,nil)
// Generate Source for 'ExPrint 1.0 Control Library(ExPrint.dll)' server from Tools\Automation Server...
var_Print := IExPrint{"Exontrol.Print"}
	var_Print:Options := "FitToPage = On"
	var_Print:PrintExt := oDCOCX_Exontrol1
	var_Print:Preview()

local var_Print as IExPrint
local var_Nodes as INodes

oDCOCX_Exontrol1:IndentSiblingY := 30
oDCOCX_Exontrol1:ShowLinksDir := true
oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
oDCOCX_Exontrol1:AntiAliasing := true
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"LA",nil,nil):ShowLinkDir := false
	var_Nodes:Add("L1_B",nil,"LB",nil,nil)
	var_Nodes:Add("L2_A","LA","LA2",nil,nil)
	var_Nodes:Add("L2_B","LB","LB2",nil,nil)
// Generate Source for 'ExPrint 1.0 Control Library(ExPrint.dll)' server from Tools\Automation Server...
var_Print := IExPrint{"Exontrol.Print"}
	var_Print:PrintExts := oDCOCX_Exontrol1
	var_Print:Preview()

local var_Nodes as INodes

oDCOCX_Exontrol1:AntiAliasing := true
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("<sha ;;0>Event <b><font ;6><off 4>1",nil,"LA",nil,nil):ShowLinkDir := false
	var_Nodes:Add("<sha ;;0>Event <b><font ;6><off 4>2",nil,"LB",nil,nil)
	var_Nodes:Add("<sha ;;0>Event <b><font ;6><off -6>2<off 4>3<off 4>1","LA","LA2",nil,nil)
	var_Nodes:Add("Event","LB","LB2",nil,nil)

local var_Nodes as INodes

oDCOCX_Exontrol1:AllowMoveChart := exDisallow
oDCOCX_Exontrol1:AllowMoveNode := exLeftClick
oDCOCX_Exontrol1:AntiAliasing := true
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"LA",nil,nil):ShowLinkDir := false
	var_Nodes:Add("L1_B",nil,"LB",nil,nil)
	var_Nodes:Add("L2_A","LA","LA2",nil,nil)
	var_Nodes:Add("L2_B","LB","LB2",nil,nil)

oDCOCX_Exontrol1:AllowMoveNode := exDisallow

oDCOCX_Exontrol1:AllowResizeChart := exDisallow

oDCOCX_Exontrol1:AllowEdit := exDisallow

METHOD OCX_Exontrol1MouseUp(Button,Shift,X,Y) CLASS MainDialog
	// MouseUp event - Occurs when the user releases a mouse button.
	// Items.Add(Me.NodeFromPoint(-1,-1).Caption,0,1234)
	local var_PopupMenu as IPopupMenu
	// Generate Source for 'ExPopupMenu 1.0 Control Library(ExPMenu.dll)' server from Tools\Automation Server...
	var_PopupMenu := IPopupMenu{"Exontrol.ExPopupMenu"}
		OutputDebugString(String2Psz( AsString(var_PopupMenu:ShowAtCursor) ))
RETURN NIL

local var_Nodes as INodes

oDCOCX_Exontrol1:IndentSiblingY := 30
oDCOCX_Exontrol1:ShowLinksDir := true
oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
oDCOCX_Exontrol1:AntiAliasing := true
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"LA",nil,nil):ShowLinkDir := false
	var_Nodes:Add("L1_B",nil,"LB",nil,nil)
	var_Nodes:Add("L2_A","LA","LA2",nil,nil)
	var_Nodes:Add("L2_B","LB","LB2",nil,nil)

METHOD OCX_Exontrol1AnchorClick(AnchorID,Options) CLASS MainDialog
	// AnchorClick event - Occurs when an anchor element is clicked.
	OutputDebugString(String2Psz( AsString(Options) ))
RETURN NIL

local var_Nodes as INodes

oDCOCX_Exontrol1:Root:Image := 0
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("<a;http://www.exontrol.com>exontrol</a>",nil,"1234",nil,nil)

local var_Nodes as INodes

oDCOCX_Exontrol1:IndentSiblingY := 30
oDCOCX_Exontrol1:ShowLinksDir := true
oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
oDCOCX_Exontrol1:AntiAliasing := true
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"LA",nil,nil):LinkCaption := "<fgcolor=FF0000><font ;6>caption<br><c><bgcolor=FFFFFF><a>link"
	var_Nodes:Add("L1_B",nil,"LB",nil,nil)
	var_Nodes:Add("L2_A","LA","LA2",nil,nil)
	var_Nodes:Add("L2_B","LB","LB2",nil,nil)

local var_Nodes as INodes

oDCOCX_Exontrol1:IndentSiblingY := 30
oDCOCX_Exontrol1:ShowLinksDir := true
oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
oDCOCX_Exontrol1:AntiAliasing := true
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"LA",nil,nil):ShowLinkDir := false
	var_Nodes:Add("L1_B",nil,"LB",nil,nil)
	var_Nodes:Add("L2_A","LA","LA2",nil,nil)
	var_Nodes:Add("L2_B","LB","LB2",nil,nil)

oDCOCX_Exontrol1:[HTMLPicture,"pic1"] := "c:\exontrol\images\zipdisk.gif"
oDCOCX_Exontrol1:ToolTipDelay := 1
oDCOCX_Exontrol1:Root:ToolTip := "<br><font Tahoma;10>This</font> is a <b>multi-lines</b> tooltip assigned to a column. The tooltip supports built-in HTML tags, icons and pictures.<br><br><br><img>pic1</img> picture ... <br><br>"

local var_Node,var_Node1 as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:VisualAppearance:Add(1,"c:\exontrol\images\hot.ebn")
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Node := var_Nodes:Add("Sub 1","1234",nil,nil,nil)
		var_Node:Caption := "This is a bit of long text that should break the line.<br>-using no color"
		var_Node:BackColor := 0x1000000
	var_Node1 := var_Nodes:Add("Sub 2","1234",nil,nil,nil)
		var_Node1:Caption := "This is a bit of long text that should break the line.<br>-using a color"
		var_Node1:BackColor := 0x100ff00

local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:Layout := exLayoutLTR
oDCOCX_Exontrol1:ShowLinksDir := true
oDCOCX_Exontrol1:IndentSiblingX := 32
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child1",nil,"1234",nil,nil)
	var_Nodes:Add("Child2",nil,"1235",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Nodes:Add("Sub 2","1234",nil,nil,nil):Caption := "This is a bit of long text that should break the line."
oDCOCX_Exontrol1:EndUpdate()

local var_Node,var_Node1,var_Node2 as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:PictureHeightNode := 48
oDCOCX_Exontrol1:PictureAspectRatioNode := exAspectRatioHeight
oDCOCX_Exontrol1:FixedWidthNode := 82
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Node := var_Nodes:Add("PNG <b>1",nil,"0",nil,nil)
		var_Node:Picture := "c:\exontrol\images\card.png"
		var_Node:Alignment := CenterAlignment
	var_Node1 := var_Nodes:Add("PNG <b>2",nil,"1",nil,nil)
		var_Node1:Picture := "c:\exontrol\images\diary.png"
		var_Node1:Alignment := CenterAlignment
	var_Node2 := var_Nodes:Add("PNG <b>3",nil,"2",nil,nil)
		var_Node2:Picture := "c:\exontrol\images\sun.png"
		var_Node2:Alignment := CenterAlignment
oDCOCX_Exontrol1:Root:Alignment := CenterAlignment
oDCOCX_Exontrol1:EndUpdate()

local var_Node,var_Node1,var_Node2 as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:PictureHeightNode := 48
oDCOCX_Exontrol1:PictureAspectRatioNode := exAspectRatioHeight
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Node := var_Nodes:Add("PNG <b>1",nil,"0",nil,nil)
		var_Node:Picture := "c:\exontrol\images\card.png"
	var_Node1 := var_Nodes:Add("PNG <b>2",nil,"1",nil,nil)
		var_Node1:Picture := "c:\exontrol\images\diary.png"
	var_Node2 := var_Nodes:Add("PNG <b>3",nil,"2",nil,nil)
		var_Node2:Picture := "c:\exontrol\images\sun.png"
oDCOCX_Exontrol1:EndUpdate()

local var_Node,var_Node1,var_Node2 as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:PictureWidthNode := 48
oDCOCX_Exontrol1:PictureAspectRatioNode := exAspectRatioWidth
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Node := var_Nodes:Add("PNG <b>1",nil,"0",nil,nil)
		var_Node:Picture := "c:\exontrol\images\card.png"
	var_Node1 := var_Nodes:Add("PNG <b>2",nil,"1",nil,nil)
		var_Node1:Picture := "c:\exontrol\images\diary.png"
	var_Node2 := var_Nodes:Add("PNG <b>3",nil,"2",nil,nil)
		var_Node2:Picture := "c:\exontrol\images\sun.png"
oDCOCX_Exontrol1:EndUpdate()

local var_Node,var_Node1,var_Node2 as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Node := var_Nodes:Add("Ratio/None",nil,"0",nil,nil)
		var_Node:Picture := "c:\exontrol\images\card.png"
		var_Node:PictureWidth := 48
		var_Node:PictureHeight := 48
	var_Node1 := var_Nodes:Add("Ratio/Width",nil,"1",nil,nil)
		var_Node1:Picture := "c:\exontrol\images\card.png"
		var_Node1:PictureWidth := 48
		var_Node1:PictureAspectRatio := exAspectRatioWidth
	var_Node2 := var_Nodes:Add("Ratio/Height",nil,"2",nil,nil)
		var_Node2:Picture := "c:\exontrol\images\card.png"
		var_Node2:PictureHeight := 48
		var_Node2:PictureAspectRatio := exAspectRatioHeight
oDCOCX_Exontrol1:EndUpdate()

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:AntiAliasing := true
oDCOCX_Exontrol1:ShowLinksDir := false
oDCOCX_Exontrol1:PenWidthLink := 1
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"LA",nil,nil):LinkTo := "LB"
	var_Nodes:Add("L1_B<br><br>Cust",nil,"LB",nil,nil)
	var_Node := var_Nodes:Add("L2_A","LA","LA2",nil,nil)
		var_Node:LinkTo := "LB,LB22"
		var_Node:[LinkToColor,"LB"] := RGB(255,0,0)
		var_Node:[LinkToWidth,"LB"] := 2
		var_Node:[LinkToPen,"LB"] := exPenDot
		var_Node:[LinkToShowDir,"LB"] := true
		var_Node:[LinkToRound,"LB"] := true
		var_Node:[LinkToRound,"LB22"] := true
		var_Node:[LinkToShowDir,"LB22"] := true
		var_Node:[LinkToColor,"LB22"] := RGB(128,0,0)
		var_Node:[LinkToWidth,"LB22"] := 2
	var_Nodes:Add("L2_B1","LB","LB21",nil,nil)
	var_Nodes:Add("L2_B2","LB","LB22",nil,nil)
	var_Nodes:Add("L2_B3","LB","LB23",nil,nil)

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:AntiAliasing := true
oDCOCX_Exontrol1:ShowLinksDir := false
oDCOCX_Exontrol1:PenWidthLink := 1
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"LA",nil,nil):LinkTo := "LB"
	var_Nodes:Add("L1_B<br><br>Cust",nil,"LB",nil,nil)
	var_Node := var_Nodes:Add("L2_A","LA","LA2",nil,nil)
		var_Node:LinkTo := "LB"
		var_Node:[LinkToColor,"LB"] := RGB(255,0,0)
		var_Node:[LinkToWidth,"LB"] := 2
		var_Node:[LinkToPen,"LB"] := exPenDot
		var_Node:[LinkToShowDir,"LB"] := true
		var_Node:[LinkToRound,"LB"] := true
	var_Nodes:Add("L2_B1","LB","LB21",nil,nil)
	var_Nodes:Add("L2_B2","LB","LB22",nil,nil)
	var_Nodes:Add("L2_B3","LB","LB23",nil,nil)

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:ShowLinksDir := false
oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
oDCOCX_Exontrol1:AntiAliasing := true
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"LA",nil,nil):LinkTo := "LB"
	var_Node := var_Nodes:Add("L1_B<br><br>Cust",nil,"LB",nil,nil)
		var_Node:LinkTo := "LA2"
		var_Node:[LinkToColor,"LA2"] := RGB(255,0,0)
		var_Node:[LinkToWidth,"LA2"] := 2
		var_Node:[LinkToPen,"LA2"] := exPenDashDot
		var_Node:[LinkToShowDir,"LA2"] := true
	var_Nodes:Add("L2_A","LA","LA2",nil,nil)
	var_Nodes:Add("L2_B1","LB","LB21",nil,nil)
	var_Nodes:Add("L2_B2","LB","LB22",nil,nil)
	var_Nodes:Add("L2_B3","LB","LB23",nil,nil)

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
oDCOCX_Exontrol1:AntiAliasing := true
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"LA",nil,nil):LinkTo := "LB"
	var_Node := var_Nodes:Add("L1_B<br><br>Cust",nil,"LB",nil,nil)
		var_Node:LinkTo := "LA2"
		var_Node:[LinkToColor,"LA2"] := RGB(255,0,0)
		var_Node:[LinkToWidth,"LA2"] := 4
		var_Node:[LinkToPen,"LA2"] := exPenSolid
		var_Node:[LinkToCaption,"LA2"] := "L2A-L1B"
	var_Nodes:Add("L2_A","LA","LA2",nil,nil)
	var_Nodes:Add("L2_B1","LB","LB21",nil,nil)
	var_Nodes:Add("L2_B2","LB","LB22",nil,nil)
	var_Nodes:Add("L2_B3","LB","LB23",nil,nil)

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"LA",nil,nil):LinkTo := "LB"
	var_Node := var_Nodes:Add("L1_B<br><br>Cust",nil,"LB",nil,nil)
		var_Node:LinkTo := "LA2"
		var_Node:[LinkToColor,"LA2"] := RGB(255,0,0)
		var_Node:[LinkToWidth,"LA2"] := 2
	var_Nodes:Add("L2_A","LA","LA2",nil,nil)
	var_Nodes:Add("L2_B1","LB","LB21",nil,nil)
	var_Nodes:Add("L2_B2","LB","LB22",nil,nil)
	var_Nodes:Add("L2_B3","LB","LB23",nil,nil)

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"LA",nil,nil):LinkTo := "LB"
	var_Node := var_Nodes:Add("L1_B<br><br>Cust",nil,"LB",nil,nil)
		var_Node:LinkTo := "LA2"
		var_Node:[LinkToColor,"LA2"] := RGB(255,0,0)
		var_Node:[LinkToWidth,"LA2"] := 2
	var_Nodes:Add("L2_A","LA","LA2",nil,nil)
	var_Nodes:Add("L2_B1","LB","LB21",nil,nil)
	var_Nodes:Add("L2_B2","LB","LB22",nil,nil)
	var_Nodes:Add("L2_B3","LB","LB23",nil,nil)

local var_Node as INode
local var_Nodes as INodes

var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Node := var_Nodes:Add("Child 1",nil,"1",nil,nil)
		var_Node:Picture := "c:\exontrol\images\zipdisk.gif"
		var_Node:PictureWidth := 64
		var_Node:PictureHeight := 64
	var_Nodes:Add("Child 2",nil,"2",nil,nil):Picture := "c:\exontrol\images\auction.gif"

local var_Nodes as INodes

oDCOCX_Exontrol1:PictureHeightNode := 24
oDCOCX_Exontrol1:PictureWidthNode := 24
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child 1",nil,"1",nil,nil):Picture := "c:\exontrol\images\zipdisk.gif"
	var_Nodes:Add("Child 2",nil,"2",nil,nil):Picture := "c:\exontrol\images\auction.gif"

local var_Node as INode
local var_Nodes as INodes

var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Node := var_Nodes:Add("Child 1",nil,"1",nil,nil)
		var_Node:BorderWidth := 3
		var_Node:DrawRoundNode := false
	var_Nodes:Add("Child 2",nil,"2",nil,nil)

local var_Nodes as INodes

oDCOCX_Exontrol1:VisualAppearance:Add(1,"c:\exontrol\images\normal.ebn")
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child 1",nil,"1",nil,nil):BackColor := 0x1000000
	var_Nodes:Add("Child 2",nil,"2",nil,nil)

local var_Nodes as INodes

var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child 1",nil,"1",nil,nil):BorderColor := RGB(255,0,0)
	var_Nodes:Add("Child 2",nil,"2",nil,nil)

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:[HTMLPicture,"pic1"] := "c:\exontrol\images\colorize.gif"
oDCOCX_Exontrol1:AntiAliasing := true
oDCOCX_Exontrol1:IndentSiblingY := 30
oDCOCX_Exontrol1:IndentSiblingX := 60
oDCOCX_Exontrol1:ShowLinksDir := true
oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"LA",nil,nil)
	var_Node := var_Nodes:Add("L1_B",nil,"LB",nil,nil)
		var_Node:LinkTo := "LA2"
		var_Node:[LinkToCaption,"LA2"] := "<img>pic1</img> text"
	var_Nodes:Add("L2_A","LA","LA2",nil,nil)
	var_Nodes:Add("L2_B","LB","LB2",nil,nil)

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:AntiAliasing := true
oDCOCX_Exontrol1:IndentSiblingY := 30
oDCOCX_Exontrol1:ShowLinksDir := true
oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"LA",nil,nil)
	var_Node := var_Nodes:Add("L1_B",nil,"LB",nil,nil)
		var_Node:LinkTo := "LA2"
		var_Node:[LinkToCaption,"LA2"] := "text"
	var_Nodes:Add("L2_A","LA","LA2",nil,nil)
	var_Nodes:Add("L2_B","LB","LB2",nil,nil)

local var_Nodes as INodes

oDCOCX_Exontrol1:AntiAliasing := true
oDCOCX_Exontrol1:IndentSiblingY := 30
oDCOCX_Exontrol1:ShowLinksDir := true
oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"LA",nil,nil)
	var_Nodes:Add("L1_B",nil,"LB",nil,nil):LinkTo := "LA2"
	var_Nodes:Add("L2_A","LA","LA2",nil,nil):LinkTo := "LB"
	var_Nodes:Add("L2_B","LB","LB2",nil,nil)

local var_Nodes as INodes

oDCOCX_Exontrol1:IndentSiblingY := 30
oDCOCX_Exontrol1:ShowLinksDir := true
oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
oDCOCX_Exontrol1:AntiAliasing := true
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"LA",nil,nil)
	var_Nodes:Add("L1_B",nil,"LB",nil,nil):LinkTo := "LA2"
	var_Nodes:Add("L2_A","LA","LA2",nil,nil):LinkTo := "LB"
	var_Nodes:Add("L2_B","LB","LB2",nil,nil)

local var_Nodes as INodes

oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"LA",nil,nil)
	var_Nodes:Add("L1_B",nil,"LB",nil,nil):LinkTo := "LA2"
	var_Nodes:Add("L2_A","LA","LA2",nil,nil):LinkTo := "LB"
	var_Nodes:Add("L2_B","LB","LB2",nil,nil)

local var_Nodes as INodes

oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"LA",nil,nil)
	var_Nodes:Add("L1_B",nil,"LB",nil,nil):LinkTo := "LA2"
	var_Nodes:Add("L2_A","LA","LA2",nil,nil)
	var_Nodes:Add("L2_B","LB","LB2",nil,nil)

local var_Nodes as INodes

oDCOCX_Exontrol1:PenWidthLink := 2
oDCOCX_Exontrol1:LinkColor := RGB(0,0,0)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("L1_A",nil,"L1",nil,nil):AddGroup("L1_B",nil,nil)
	var_Nodes:Add("L_A","L1",nil,nil,nil)
	var_Nodes:Add("L_B","L1",nil,nil,nil)
	var_Nodes:Add("L_C","L1",nil,nil,nil)

local var_Node,var_Node1,var_Node2 as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:HasButtons := exWPlus
oDCOCX_Exontrol1:ButtonsAlign := UpperCenter
oDCOCX_Exontrol1:PenWidthLink := 3
oDCOCX_Exontrol1:IndentChild := 32
var_Node := oDCOCX_Exontrol1:Root
	var_Node:HasButton := false
	var_Node:Caption := "<r><dotline><b>Root 1</b><br>Some information <a info>here</a>.<br><upline><dotline>Line 1:<r><fgcolor=0000FF><b>1</b></fgcolor><br><upline><dotline>Line 2:<r>2<br><upline><dotline>Line 3:<r>3"
	var_Node:Image := 0
	var_Node:AddGroup("<r><dotline><b>Root 2</b><br>Some information <a info>here</a>.<br><upline><dotline>Line 1:<r><fgcolor=0000FF><b>1</b></fgcolor><br><upline><dotline>Line 2:<r>2<br><upline><dotline>Line 3:<r>3",nil,nil)
	var_Node:AddGroup("<r><dotline><b>Root 3</b><br>Some information <a info>here</a>.<br><upline><dotline>Line 1:<r><fgcolor=0000FF><b>1</b></fgcolor><br><upline><dotline>Line 2:<r>2<br><upline><dotline>Line 3:<r>3",nil,nil)
	var_Node:AddAssistant("<b>Assistant</b> <a1>node 1</a>",nil,nil):Key := "A"
	var_Node1 := var_Node:AddAssistant("<b>Assistant</b> <a2>node 2</a>",nil,nil)
		var_Node1:Left := true
		var_Node1:ShowLinks := false
		var_Node1:LinkTo := "A"
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Node2 := var_Nodes:Add("Parent <b>1</b>",nil,"Key1",nil,nil)
		var_Node2:HasButton := false
		var_Node2:ArrangeSiblingNodesAs := exTree
		var_Node2:ShowRoundLink := true
		var_Node2:AddGroup("Parent <b>2</b>",nil,nil)
		var_Node2:AddGroup("Parent <b>3</b>",nil,nil)
	var_Nodes:Add("SubItem 1","Key1","S1",nil,nil):HasButton := false
	var_Nodes:Add("SubItem 1.1","S1","S111",nil,nil)
	var_Nodes:Add("SubItem 1.2","S1","S112",nil,nil)
	var_Nodes:Add("SubItem 2","Key1",nil,nil,nil)
	var_Nodes:Add("Item 2",nil,"Key2",nil,nil):Expanded := false
	var_Nodes:Add("SubItem 1","Key2",nil,nil,nil)
	var_Nodes:Add("SubItem 2","Key2",nil,nil,nil)
oDCOCX_Exontrol1:EndUpdate()

oDCOCX_Exontrol1:[ScrollPartCaption,exHScroll,exLowerBackPart] := "left"
oDCOCX_Exontrol1:[ScrollPartCaptionAlignment,exHScroll,exLowerBackPart] := LeftAlignment
oDCOCX_Exontrol1:[ScrollPartCaption,exHScroll,exUpperBackPart] := "right"
oDCOCX_Exontrol1:[ScrollPartCaptionAlignment,exHScroll,exUpperBackPart] := RightAlignment
oDCOCX_Exontrol1:FixedWidthNode := 320

local var_Nodes as INodes

oDCOCX_Exontrol1:ShowRoundLink := true
oDCOCX_Exontrol1:Root:Image := 0
oDCOCX_Exontrol1:IndentSiblingX := 32
oDCOCX_Exontrol1:IndentSiblingY := 64
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil):ArrangeSiblingNodesAs := exHorizontally
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Nodes:Add("Sub 2","1234",nil,nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2</b>",nil,nil,nil,nil)

local var_Nodes as INodes

var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child 1",nil,"C1",nil,nil)
	var_Nodes:Add("Sub Child 1","C1","SC1",nil,nil)
	var_Nodes:Add("Sub Sub Shild 1","SC1",nil,nil,nil)
oDCOCX_Exontrol1:Nodes:[Item,"SC1"]:BackColor := RGB(255,0,0)

local var_Nodes as INodes

oDCOCX_Exontrol1:HasButtons := exPlus
oDCOCX_Exontrol1:Root:ArrangeSiblingNodesAs := exTree
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child 1",nil,"C1",nil,nil)
	var_Nodes:Add("Sub Child 1","C1","SC1",nil,nil)
	var_Nodes:Add("Sub Sub Shild 1","SC1",nil,nil,nil)
	var_Nodes:Remove(3)

oDCOCX_Exontrol1:Nodes:Clear()

oDCOCX_Exontrol1:Nodes:Clear()

local var_Nodes as INodes

oDCOCX_Exontrol1:HasButtons := exPlus
oDCOCX_Exontrol1:Root:ArrangeSiblingNodesAs := exTree
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child 1",nil,"C1",nil,nil)
	var_Nodes:Add("Sub Child 1","C1","SC1",nil,nil)
	var_Nodes:Add("Sub Sub Shild 1","SC1",nil,nil,nil)
	var_Nodes:Add(AsString(var_Nodes:Count),nil,nil,nil,nil)

local var_Nodes as INodes

oDCOCX_Exontrol1:HasButtons := exPlus
oDCOCX_Exontrol1:Root:ArrangeSiblingNodesAs := exTree
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child 1",nil,"C1",nil,nil)
	var_Nodes:Add("Sub Child 1","C1","SC1",nil,nil)
	var_Nodes:Add("Sub Sub Shild 1","SC1",nil,nil,nil)

local var_Nodes as INodes

oDCOCX_Exontrol1:HasButtons := exPlus
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child 1",nil,"C1",nil,nil)
	var_Nodes:Add("Child 2",nil,"C2",nil,nil)
	var_Nodes:Add("Sub Child 1","C1","SC1",nil,nil)
	var_Nodes:Add("Sub Sub Shild 1","SC1",nil,nil,nil)

local var_Node,var_Node1 as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:HasButtons := exPlus
oDCOCX_Exontrol1:PenLink := exPenSolid
oDCOCX_Exontrol1:PenWidthLink := 3
var_Node := oDCOCX_Exontrol1:Root
	var_Node:Image := 0
	var_Node:AddAssistant("Assistant 1",nil,nil)
	var_Node:AddAssistant("Assistant 2",nil,nil)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Node1 := var_Nodes:Add("Sub 2","1234",nil,nil,nil)
		var_Node1:LinkTo := "AA"
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2</b>",nil,"AA",nil,nil)

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:HasButtons := exPlus
var_Node := oDCOCX_Exontrol1:Root
	var_Node:Image := 0
	var_Node:AddAssistant("Assistant 1",nil,nil)
	var_Node:AddAssistant("Assistant 2",nil,nil)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil):ShowLinks := false
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Nodes:Add("Sub 2","1234",nil,nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2</b>",nil,nil,nil,nil)

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:HasButtons := exPlus
var_Node := oDCOCX_Exontrol1:Root
	var_Node:Image := 0
	var_Node:AddAssistant("Assistant 1",nil,nil)
	var_Node:AddAssistant("Assistant 2",nil,nil)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil):HasButton := false
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Nodes:Add("Sub 2","1234",nil,nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2</b>",nil,nil,nil,nil)

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:HasButtons := exPlus
var_Node := oDCOCX_Exontrol1:Root
	var_Node:Image := 0
	var_Node:AddAssistant("Assistant 1",nil,nil)
	var_Node:AddAssistant("Assistant 2",nil,nil)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil):Expanded := false
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Nodes:Add("Sub 2","1234",nil,nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2</b>",nil,nil,nil,nil)

oDCOCX_Exontrol1:Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
oDCOCX_Exontrol1:Root:Image := 1

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
var_Node := oDCOCX_Exontrol1:Root
	var_Node:Image := 0
	var_Node:AddAssistant("Assistant 1",nil,nil)
	var_Node:AddAssistant("Assistant 2",nil,nil)
	var_Node:[Assistant,0]:Image := 1
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Nodes:Add("Sub 2","1234",nil,nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2</b>",nil,nil,nil,nil)
oDCOCX_Exontrol1:EndUpdate()

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
var_Node := oDCOCX_Exontrol1:Root
	var_Node:Image := 0
	var_Node:AddAssistant("Assistant 1",nil,nil)
	var_Node:AddAssistant("Assistant 2",nil,nil)
	var_Node:AddAssistant(AsString(var_Node:CountAssistants),nil,nil)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Nodes:Add("Sub 2","1234",nil,nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2</b>",nil,nil,nil,nil)
oDCOCX_Exontrol1:EndUpdate()

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
var_Node := oDCOCX_Exontrol1:Root
	var_Node:Image := 0
	var_Node:AddAssistant("Assistant 1",nil,nil):Left := false
	var_Node:AddAssistant("Assistant 2",nil,nil):Left := false
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Nodes:Add("Sub 2","1234",nil,nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2</b>",nil,nil,nil,nil)
oDCOCX_Exontrol1:EndUpdate()

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
var_Node := oDCOCX_Exontrol1:Root
	var_Node:Image := 0
	var_Node:AddAssistant("Assistant 1",nil,nil):Left := true
	var_Node:AddAssistant("Assistant 2",nil,nil):Left := true
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Nodes:Add("Sub 2","1234",nil,nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2</b>",nil,nil,nil,nil)
oDCOCX_Exontrol1:EndUpdate()

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:BeginUpdate()
var_Node := oDCOCX_Exontrol1:Root
	var_Node:Image := 0
	var_Node:AddAssistant("Assistant 1",nil,nil)
	var_Node:AddAssistant("Assistant 2",nil,nil)
	var_Node:ClearAssistants()
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Nodes:Add("Sub 2","1234",nil,nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2</b>",nil,nil,nil,nil)
oDCOCX_Exontrol1:EndUpdate()

local var_Node as INode
local var_Nodes as INodes

var_Node := oDCOCX_Exontrol1:Root
	var_Node:Image := 0
	var_Node:AddAssistant("Assistant 1",nil,nil)
	var_Node:AddAssistant("Assistant 2",nil,nil)
	var_Node:RemoveAssistant(0)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Nodes:Add("Sub 2","1234",nil,nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2</b>",nil,nil,nil,nil)

local var_Node as INode
local var_Nodes as INodes

var_Node := oDCOCX_Exontrol1:Root
	var_Node:Image := 0
	var_Node:AddAssistant("Assistant 1",nil,nil)
	var_Node:AddAssistant("Assistant 2",nil,nil)
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child <b>1</b>",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Nodes:Add("Sub 2","1234",nil,nil,nil)
	var_Nodes:Add("Sub 3","1234",nil,nil,nil)
	var_Nodes:Add("Child <b>2</b>",nil,nil,nil,nil)

local var_Node as INode
local var_Nodes as INodes

oDCOCX_Exontrol1:VisualAppearance:Add(1,"c:\exontrol\images\hot.ebn")
var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Node := var_Nodes:Add("Sub 2","1234",nil,nil,nil)
		var_Node:Caption := "This is a bit of long text that should break the line."
		var_Node:BackColor := 0x1000000

local var_Node as INode
local var_Nodes as INodes

var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Node := var_Nodes:Add("Sub 2","1234",nil,nil,nil)
		var_Node:Caption := "This is a bit of long text that should break the line."
		var_Node:ShadowNode := false

local var_Node as INode
local var_Nodes as INodes

var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Node := var_Nodes:Add("Sub 2","1234",nil,nil,nil)
		var_Node:Caption := "This is a bit of long text that should break the line."
		var_Node:PenBorderNode := exPenDashDotDot

local var_Node as INode
local var_Nodes as INodes

var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Node := var_Nodes:Add("Sub 2","1234",nil,nil,nil)
		var_Node:Caption := "This is a bit of long text that should break the line."
		var_Node:DrawRoundNode := false

local var_Node as INode
local var_Nodes as INodes

var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Node := var_Nodes:Add("Sub 2","1234",nil,nil,nil)
		var_Node:Caption := "This is a bit of long text that should break the line."
		var_Node:Enabled := false

local var_Node as INode
local var_Nodes as INodes

var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Node := var_Nodes:Add("Sub 2","1234",nil,nil,nil)
		var_Node:Caption := "This is a bit of long text that should break the line."
		var_Node:FixedHeight := 128

local var_Node as INode
local var_Nodes as INodes

var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Node := var_Nodes:Add("Sub 2","1234",nil,nil,nil)
		var_Node:Caption := "This is a bit of long text that should break the line."
		var_Node:FixedWidth := 128

local var_Node as INode
local var_Nodes as INodes

var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Node := var_Nodes:Add("Sub 2","1234",nil,nil,nil)
		var_Node:Caption := "This is a bit of long text that should break the line."
		var_Node:Width := 128

local var_Nodes as INodes

var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Nodes:Add("Sub 2","1234",nil,nil,nil):Position := 0

local var_Nodes as INodes

var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Nodes:Add("Sub 2","1234",nil,nil,nil)
	var_Nodes:Add(var_Nodes:[Item,"1234"]:NodeCount,nil,nil,nil,nil)

local var_Nodes as INodes

var_Nodes := oDCOCX_Exontrol1:Nodes
	var_Nodes:Add("Child",nil,"1234",nil,nil)
	var_Nodes:Add("Sub 1","1234",nil,nil,nil)
	var_Nodes:Add("Sub 2","1234",nil,nil,nil)
	var_Nodes:Add(var_Nodes:[Item,"1234"]:FirstNode:Caption,nil,nil,nil,nil)
	var_Nodes:Add(var_Nodes:[Item,"1234"]:FirstNode:NextNode:Caption,nil,nil,nil,nil)

local var_Node as INode

oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:Nodes:Add("Child 1",nil,"1234",nil,nil)
oDCOCX_Exontrol1:Nodes:Add("Sub 1","1234",nil,nil,nil)
oDCOCX_Exontrol1:Nodes:Add("Sub 2","1234",nil,nil,nil)
oDCOCX_Exontrol1:Nodes:Add("Child 2",nil,"1235",nil,nil)
oDCOCX_Exontrol1:Nodes:Add("Sub 1","1235",nil,nil,nil)
oDCOCX_Exontrol1:Nodes:Add("To Move","1235","Move",nil,nil)
var_Node := oDCOCX_Exontrol1:Nodes:[Item,"Move"]
	var_Node:Parent := INode{oDCOCX_Exontrol1:Root}
	var_Node:Caption := "Moved 2 Root from Child 2"
oDCOCX_Exontrol1:EndUpdate()

oDCOCX_Exontrol1:Nodes:Add("Child",nil,"1234",nil,nil)
oDCOCX_Exontrol1:Nodes:Add("Sub 1","1234",nil,nil,nil)
oDCOCX_Exontrol1:Nodes:Add("Sub 2","1234",nil,nil,nil)

oDCOCX_Exontrol1:Nodes:Add("Child",nil,nil,nil,nil):Key := "1234"
oDCOCX_Exontrol1:Nodes:Add("Sub 1","1234",nil,nil,nil)
oDCOCX_Exontrol1:Nodes:Add("Sub 2","1234",nil,nil,nil)

local var_Node as INode

var_Node := oDCOCX_Exontrol1:Nodes:Add("Child",nil,nil,nil,nil)
	var_Node:BackColor := RGB(255,0,0)
	var_Node:ClearBackColor()

oDCOCX_Exontrol1:Nodes:Add("Child",nil,nil,nil,nil):BackColor := RGB(255,0,0)

local var_Node as INode

var_Node := oDCOCX_Exontrol1:Nodes:Add("Child",nil,nil,nil,nil)
	var_Node:ForeColor := RGB(255,0,0)
	var_Node:ClearForeColor()

oDCOCX_Exontrol1:Nodes:Add("Child",nil,nil,nil,nil):ForeColor := RGB(255,0,0)

local var_Node as INode

var_Node := oDCOCX_Exontrol1:Nodes:Add("ToolTip",nil,nil,nil,nil)
	var_Node:ToolTip := "This is a bit of text that's shown when the cursor hovers this <b>node</b>."
	var_Node:ToolTipTitle := "TITLE"

oDCOCX_Exontrol1:Nodes:Add("ToolTip",nil,nil,nil,nil):ToolTip := "<font Tahoma;12>This is a bit of text that's shown when the cursor hovers this <b>node</b>.</font>"

oDCOCX_Exontrol1:Nodes:Add("ToolTip",nil,nil,nil,nil):ToolTip := "This is a bit of text that's shown when the cursor hovers this <b>node</b>."

oDCOCX_Exontrol1:Nodes:Add("Child",nil,nil,nil,nil):UserData := "your data"

local var_Node as INode

oDCOCX_Exontrol1:Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
var_Node := oDCOCX_Exontrol1:Nodes:Add("Child",nil,nil,nil,nil)
	var_Node:Image := 1
	// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
	var_Node:Picture := oDCOCX_Exontrol1:ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
	var_Node:PictureAlignment := exImageBottom

local var_Node as INode

var_Node := oDCOCX_Exontrol1:Nodes:Add("Child",nil,nil,nil,nil)
	// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
	var_Node:Picture := oDCOCX_Exontrol1:ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
	var_Node:PictureAlignment := exImageBottom

local var_Node as INode

var_Node := oDCOCX_Exontrol1:Nodes:Add("Child",nil,nil,nil,nil)
	// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
	var_Node:Picture := oDCOCX_Exontrol1:ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
	var_Node:PictureAlignment := exImageTop

local var_Node as INode

var_Node := oDCOCX_Exontrol1:Nodes:Add("Child",nil,nil,nil,nil)
	// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
	var_Node:Picture := oDCOCX_Exontrol1:ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
	var_Node:PictureAlignment := exImageRight

// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
oDCOCX_Exontrol1:Nodes:Add("Child",nil,nil,nil,nil):Picture := oDCOCX_Exontrol1:ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")

local var_Node as INode

oDCOCX_Exontrol1:Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
var_Node := oDCOCX_Exontrol1:Nodes:Add("Just a node with an icon",nil,nil,nil,nil)
	var_Node:Image := 1
	var_Node:ImageAlignment := exImageRight

local var_Node as INode

oDCOCX_Exontrol1:Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
var_Node := oDCOCX_Exontrol1:Nodes:Add("Just a node with an icon",nil,nil,nil,nil)
	var_Node:Image := 1
	var_Node:ImageAlignment := exImageBottom

local var_Node as INode

oDCOCX_Exontrol1:Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
var_Node := oDCOCX_Exontrol1:Nodes:Add("Just a node with an icon",nil,nil,nil,nil)
	var_Node:Image := 1
	var_Node:ImageAlignment := exImageTop

oDCOCX_Exontrol1:Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
oDCOCX_Exontrol1:Nodes:Add("Child",nil,nil,nil,nil):Image := 1

oDCOCX_Exontrol1:Nodes:Add("Child",nil,nil,nil,nil):Caption := "<font Tahoma;12>new</font> caption"

oDCOCX_Exontrol1:Nodes:Add("",nil,nil,nil,nil):Caption := "Line 1<br>Line 2<br>Line3"

oDCOCX_Exontrol1:Nodes:Add("Line 1<br>Line 2<br>Line3",nil,nil,nil,nil)