initial checkin
[org.ibex.widgets.git] / src / ibex / widget / spin.t
1 <!-- Copyleft 2004 - see COPYING for details [LGPL] -->
2
3 <ibex xmlns="org.ibex.theme.win2k">
4     <meta:doc>
5         <name>Spin Widget</name>
6         <desc>Creates a spin value selector</desc>
7         <usage>
8         </usage>
9     </meta:doc>
10
11     <redirect />
12     <margin redirect="null" shrink="true">
13         <spin id="widget">
14             .clickable(thisbox);
15             .focusable(thisbox);
16             th_output = $content;
17             <pad id="pad">
18                 <ui:box id="content" />
19             </pad>
20         </spin>
21
22         // glue code
23
24         redirectTo($content, "textcolor");
25         redirectTo($pad, "fill", "padding", "padding-left", "padding-right", "padding-top", "padding-bottom");
26         redirectTo($widget, "enabled", "interval", "maxvalue", "minvalue", "value");
27
28         if ($widget.margin) thisbox.margin = $widget.margin;
29         if ($widget.padding) $pad.padding = $widget.padding;
30  
31     </margin>
32 </ibex>