if abc !=undefined then DestroyDialog abc

rollout abc "DotNet控件 UI" height:800 width:830
(
	button a "showProperties()显示属性" width:230 height:30 pos:[0,0]
	button b "showMethods()显示方法(调用函数)" width:230 height:30 pos:[0,40]
	button c "showevents()显示事件" width:230 height:30 pos:[0,80]
	button d "getProperty()获取属性值" width:230 height:30 pos:[0,120]
	button e "setProperty()设置属性值" width:230 height:30 pos:[0,160]
	button f "getpropnames()控件每个属性(数组)" width:230 height:30 pos:[0,200]
----------------------------------------------------------------------------------------------------------------------------------
	dotNetControl dotnetbtn "button" height:50 width:230 pos:[0,240]
	dotNetControl dotnetcalender "monthcalendar" height:180 width:280 pos:[0,300]
	dotNetControl dotnettext "label" width:230  pos:[0,500]
	dotNetControl dotnetlist "listbox" width:230  height:80  pos:[0,530]
	dotNetControl dotnetdatagrid "datagrid" width:230  height:160 pos:[0,620]
	
	
	dotNetControl dotnetpicturebox "picturebox" width:230  height:150 pos:[300,0]
	dotNetControl dotnetprogressbar "progressbar" width:230  height:20 pos:[300,180]
	dotNetControl dotnetcombobox "combobox" width:230  height:100 pos:[300,220]
	dotNetControl dotnetcheckedlistbox "checkedlistbox" width:230  height:100 pos:[300,340]
	dotNetControl dotnettrackbar "trackbar" width:230  height:50 pos:[300,460]
	dotNetControl dotnetcheckbox "checkbox" width:230  height:30 pos:[300,510]
	dotNetControl dotnettextbox "textbox" width:230  height:20 pos:[300,550]
	dotNetControl dotnetrichtextbox "richtextbox" width:230  height:210 pos:[300,580]
	
	
	dotNetControl dotnetNumericUpDown "NumericUpDown" width:230  height:20 pos:[600,0]
	dotNetControl dotnetgroupbox "groupbox" width:230  height:100 pos:[600,40]
	dotNetControl dotnetradiobutton "radiobutton" width:230  height:20 pos:[600,160] 
	dotNetControl dotnetvscrollbar "vscrollbar" width:20  height:200 pos:[600,200] 
	dotNetControl dotnethscrollbar "hscrollbar" width:230  height:20 pos:[600,410]
	dotNetControl dotnettreeview "treeview" width:230  height:340 pos:[600,450]
----------------------------------------------------------------------------------------------------------------------------------
	on a pressed do 
	(
		showProperties dotnethscrollbar  --显示属性
		)
	on b pressed do 
	(
		showMethods dotnetbtn  --显示方法(即可调用的函数)
		)
	on c pressed do 
	(
		showevents dotnetbtn  -- 显示控件可调用的事件
		)
	on d pressed do 
	(
		format "获取到的属性值:%\n" (getProperty dotnetbtn "text" asdotnetobject:false)  --获取名为text属性的值
		)	
	on e pressed do 
	(
		format "设置成的属性值:%\n" (setProperty dotnetbtn "text" "dotnet形式的按钮")  --设置名为text属性的值为"dotnet按钮"
		)	
	on f pressed do 
	(
		print (getpropnames dotnetbtn)  --控件的所有属性,输出为一个数组
		)
--------------------------------------------------------------------------------------------------------------------------------


	on dotnetbtn click do print "点击了一次dotnet按钮"
	on dotnetbtn mousedown do print "鼠标进入dotnet按钮范围"
	
	on abc open do 
	(
		dotnetbtn.text="dotnet按钮"
		dotnettext.text="dotnet标签"
		dotnetprogressbar.value=50
		dotnetcheckbox.text="check按钮"
		dotnettextbox.text="textbox(单行)"
		dotnetrichtextbox.text="richtextbox(多行)"
		dotnetvscrollbar.value=20
		dotnethscrollbar.value=80
	)
	
)
CreateDialog abc