
<?xl version="0.1" encoding="EUC-JP"?>

<WritingStyle stylename="DefaultStyle">
<Font fontname="-*-r-normal--*-iso8859-1" method="nearly"/>
<Font fontname="-*-r-normal--*-iso8859-2" method="nearly"/>
<Font fontname="-*-r-normal--*-iso8859-3" method="nearly"/>
<Font fontname="-*-r-normal--*-iso8859-4" method="nearly"/>
<Font fontname="-*-r-normal--*-iso8859-5" method="nearly"/>
<Font fontname="-*-r-normal--*-iso8859-6" method="nearly"/>
<Font fontname="-*-r-normal--*-iso8859-7" method="nearly"/>
<Font fontname="-*-r-normal--*-iso8859-8" method="nearly"/>
<Font fontname="-*-r-normal--*-iso8859-9" method="nearly"/>
<Font fontname="-*-r-normal--*-jisx0208.1978-0" method="nearly"/>
<Font fontname="-*-r-normal--*-jisx0208.1983-0" method="nearly"/>
<Font fontname="-*-r-normal--*-jisx0208.1990-0" method="nearly"/>
<Font fontname="-*-r-normal--*-jisx0212.1990-0" method="nearly"/>

<Font fontname="times bold" method="nearly"/>
<Font fontname="Lucida Grande" method="nearly"/>
<Font fontname="Geneva" method="nearly"/>
<Font fontname="¥Ò¥é¥®¥Î³Ñ¥´ Pro W6" method="nearly"/>
<Font fontname="Osaka" method="nearly"/>
</WritingStyle>


<vobj type="raw">

<Define> ^win-close-event ()
<Arguments> ^id </Arguments>
	(Quit)
</Define>

<Define> ^tree-select-event ()
<Arguments> ^id </Arguments>
	(Quit)
</Define>

<Define> ^test-win
<VWindow descriptor="XL test" visible="0" spacing="0" close_event_handler="win-close-event" resizable="1">
	<VVAlignView alignv="FILL" alignh="FILL" padding="0">
		<VTreeView name="treeview"
					alignv="FILL" alignh="FILL"
					min_size="400,100"
					scrollbar_v="1" scrollbar_h="1" size_box_area="1"
					selection="multi"
					padding="0"
					select_event_handler="tree-select-event">
			<Column width="30" type="BOOL" title="check" editable="1"/>
			<Column width="200" type="TEXT" title="¥Æ¥­¥¹¥È"/>
			<Column width="110" type="PERC" title="³ä¹ç"/>

			(AddRow	1 <quote>(1 "TEST" 30)</quote> () () 1)
			(AddRow	2 <quote>(1 "TEST2" 40)</quote> () ())
			(AddRow	3 <quote>(1 "TEST3" 50)</quote> 2 () 1)
			(AddRow	4 <quote>(1 "TEST4" 60)</quote> 2 () 1)
			
			(RemoveRow 	3)
			(SetRow	2	<quote>(0 "TEST2" 60)</quote>)
			(GetRow	4)
		</VTreeView>
		
		<VHAlignView alignv="bottom">
			<VEditText name="textdata" alignh="FILL" />
			<VEditText name="percdata" attr="1" alignh="FILL" />
		</VHAlignView>
		
		<VHAlignView alignv="bottom" padding="18,4">
			<VPushButton alignh="right" descriptor="Add"/>
			<VPushButton alignh="right" descriptor="Edit"/>
			<VPushButton alignh="right" descriptor="Remove"/>
		</VHAlignView>
	</VVAlignView>
</VWindow>
</Define>

<SetStatus position="100,50">
	1001
</SetStatus>

<SetStatus visible="1">
	1001
</SetStatus>

</vobj>
