src/ibex/widget/tab.t

   1 <!-- Copyleft 2004 - see COPYING for details [LGPL] -->
   2
   3 <ibex xmlns="org.ibex.theme.win2k">
   4     <meta:doc>
   5         <name>Tab</name>
   6         <desc>A tab for use in a tabpane</desc>
   7         <usage>
   8             Tabpane automatically manages tabs, so for most circumstances
   9             you will not be wanting to use this widget manually
  10         </usage>
  11     </meta:doc>
  12
  13     <redirect />
  14     <margin redirect="$content" selected="false">
  15         <tab id="widget">
  16             .clickable(thisbox);
  17             .focusable(thisbox);
  18             .selectable(thisbox);
  19             <pad id="pad">
  20                 <ui:box id="content" />
  21             </pad>
  22         </tab>
  23
  24         // glue code
  25
  26         redirectTo($content, "text", "textcolor");
  27         redirectTo($pad, "fill", "padding", "padding-left", "padding-right", "padding-top", "padding-bottom");
  28         redirectTo($widget, "group", "selected");
  29
  30         if ($widget.margin) thisbox.margin = $widget.margin;
  31         if ($widget.padding) $pad.padding = $widget.padding;
  32
  33     </margin>
  34 </ibex>