src/ibex/widget/scrollpane.t

   1 <!-- Copyleft 2004 - see COPYING for details [LGPL] -->
   2
   3 <ibex xmlns:theme="org.ibex.theme.win2k">
   4     <meta:doc>
   5         <name>Scrollbar</name>
   6         <desc>A scrollbar widget, commonly found in scrollpanes</desc>
   7         <usage>
   8             Put to the text property of a button for a basic label,
   9             or simply wrap the button around more complex content
  10         </usage>
  11     </meta:doc>
  12
  13     <theme:redirect />
  14     <theme:margin redirect="$content">
  15         <theme:scrollpane id="widget">
  16             <theme:pad id="pad">
  17                 <ui:box id="content" />
  18             </theme:pad>
  19         </theme:scrollpane>
  20
  21         // glue code
  22
  23         addredirect = { fill: $content };
  24         addredirect = { padding: $pad };
  25
  26         if ($widget.margin) thisbox.margin = $widget.margin;
  27         if ($widget.padding) $pad.padding = $widget.padding;
  28
  29     </theme:margin>
  30 </ibex>