labframe.html
来自「perl教程」· HTML 代码 · 共 165 行
HTML
165 行
<?xml version="1.0" ?>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
<!-- saved from url=(0017)http://localhost/ -->
<script language="JavaScript" src="../../displayToc.js"></script>
<script language="JavaScript" src="../../tocParas.js"></script>
<script language="JavaScript" src="../../tocTab.js"></script>
<link rel="stylesheet" type="text/css" href="../../scineplex.css">
<title>Tk::LabFrame - labeled frame.</title>
<link rel="stylesheet" href="../../Active.css" type="text/css" />
<meta http-equiv="content-type" content="text/html; charset=utf-8" />
<link rev="made" href="mailto:" />
</head>
<body>
<script>writelinks('__top__',2);</script>
<h1><a>Tk::LabFrame - labeled frame.</a></h1>
<p><a name="__index__"></a></p>
<!-- INDEX BEGIN -->
<ul>
<li><a href="#name">NAME</a></li>
<li><a href="#synopsis">SYNOPSIS</a></li>
<li><a href="#description">DESCRIPTION</a></li>
<li><a href="#widgetoptions">WIDGET-OPTIONS</a></li>
<li><a href="#advertised_subwidgets">ADVERTISED SUBWIDGETS</a></li>
<li><a href="#example">EXAMPLE</a></li>
<li><a href="#bugs">BUGS</a></li>
<li><a href="#author">AUTHOR</a></li>
</ul>
<!-- INDEX END -->
<hr />
<p>
</p>
<h1><a name="name">NAME</a></h1>
<p>Tk::LabFrame - labeled frame.</p>
<p>
</p>
<hr />
<h1><a name="synopsis">SYNOPSIS</a></h1>
<p> <strong>use Tk::LabFrame;</strong></p>
<p> <em>$f</em> = <em>$parent</em>-><strong>LabFrame</strong>(?<strong>-label</strong>=><em>text</em>,
<strong>-labelside</strong>=><em>where</em>, ...?);</p>
<p>
</p>
<hr />
<h1><a name="description">DESCRIPTION</a></h1>
<p><strong>LabFrame</strong> is exactly like <strong>Frame</strong> and additionaly allows to
add a label to the frame.</p>
<p>
</p>
<hr />
<h1><a name="widgetoptions">WIDGET-OPTIONS</a></h1>
<p><strong>LabFrame</strong> supports the same options as the
<a href="../../lib/Tk/Frame.html#standard_options">Frame</a> widget.</p>
<p>Additional options of <strong>LabFrame</strong> are:</p>
<dl>
<dt><strong><a name="item__2dfont__3d_3e_font"><strong>-font</strong> => <em>font</em></a></strong>
<dd>
<p>Specifies the label's font</p>
</dd>
</li>
<dt><strong><a name="item__2dforeground__3d_3e_color"><strong>-foreground</strong> => <em>color</em></a></strong>
<dd>
<p>Specifies the label's foreground color</p>
</dd>
</li>
<dt><strong><a name="item__2dlabel__3d_3e_text"><strong>-label</strong> => <em>text</em></a></strong>
<dd>
<p>The text of the label to be placed with the Frame.</p>
</dd>
</li>
<dt><strong><a name="item__2dlabelside__3d_3e_where"><strong>-labelside</strong> => <em>where</em></a></strong>
<dd>
<p><em>Where</em> can be one of <strong>left</strong>, <strong>right</strong>, <strong>top</strong>, <strong>bottom</strong> or <strong>acrosstop</strong>.
The first four work as might be expected and place the label to the
left, right, above or below the frame respectively. The <strong>acrosstop</strong>
creates a grooved frame around the central frame and puts the label
near the northwest corner such that it appears to "overwrite" the
groove.</p>
</dd>
</li>
<dt><strong><a name="item__2dlabelvariable__3d_3e_scalar_ref"><strong>-labelvariable</strong> => <em>scalar_ref</em></a></strong>
<dd>
<p>Specifies a reference to a variable and used as an
alternative to -label. If the value of the variable changes,
then the widget will be updated automatically to reflect the
change. Used like -textvariable.</p>
</dd>
</li>
</dl>
<p>
</p>
<hr />
<h1><a name="advertised_subwidgets">ADVERTISED SUBWIDGETS</a></h1>
<p>See <a href="../../lib/Tk/mega.html#subwidget">Subwidget in the Tk::mega manpage</a> how to use advertised widgets.</p>
<dl>
<dt><strong><a name="item_border"><em>border</em></a></strong>
<dd>
<pre>
Frame used to display the border</pre>
</dd>
<dt><strong><a name="item_frame"><em>frame</em></a></strong>
<dd>
<pre>
Frame used to create new LabFrame children.</pre>
</dd>
<dt><strong><a name="item_label"><em>label</em></a></strong>
<dd>
<pre>
Label used for displaying text</pre>
</dd>
</dl>
<p>
</p>
<hr />
<h1><a name="example">EXAMPLE</a></h1>
<p>Run the following test program to see this in action:</p>
<pre>
<span class="keyword">use</span> <span class="variable">strict</span><span class="operator">;</span>
<span class="keyword">use</span> <span class="variable">Tk</span><span class="operator">;</span>
<span class="keyword">require</span> <span class="variable">Tk::LabFrame</span><span class="operator">;</span>
<span class="keyword">require</span> <span class="variable">Tk::LabEntry</span><span class="operator">;</span>
</pre>
<pre>
<span class="keyword">my</span> <span class="variable">$test</span> <span class="operator">=</span> <span class="string">'Test this'</span><span class="operator">;</span>
<span class="keyword">my</span> <span class="variable">$mw</span> <span class="operator">=</span> <span class="variable">Tk::MainWindow</span><span class="operator">-></span><span class="variable">new</span><span class="operator">;</span>
<span class="keyword">my</span> <span class="variable">$f</span> <span class="operator">=</span> <span class="variable">$mw</span><span class="operator">-></span><span class="variable">LabFrame</span><span class="operator">(</span><span class="string">-label</span> <span class="operator">=></span> <span class="string">"This is a label"</span><span class="operator">,</span>
<span class="string">-labelside</span> <span class="operator">=></span> <span class="string">"acrosstop"</span><span class="operator">);</span>
<span class="variable">$f</span><span class="operator">-></span><span class="variable">LabEntry</span><span class="operator">(</span><span class="string">-label</span> <span class="operator">=></span> <span class="string">"Testing"</span><span class="operator">,</span> <span class="string">-textvariable</span> <span class="operator">=></span> <span class="operator">\</span><span class="variable">$test</span><span class="operator">)-></span><span class="keyword">pack</span><span class="operator">;</span>
<span class="variable">$f</span><span class="operator">-></span><span class="keyword">pack</span><span class="operator">;</span>
<span class="variable">Tk::MainLoop</span><span class="operator">;</span>
</pre>
<p>
</p>
<hr />
<h1><a name="bugs">BUGS</a></h1>
<p>Perhaps <strong>LabFrame</strong> should be subsumed within the generic pTk
labeled widget mechanism.</p>
<p>
</p>
<hr />
<h1><a name="author">AUTHOR</a></h1>
<p><strong>Rajappa Iyer</strong> <a href="mailto:rsi@earthling.net">rsi@earthling.net</a></p>
<p>This code is derived from LabFrame.tcl and LabWidg.tcl in the Tix4.0
distribution by Ioi Lam. The code may be redistributed under the same
terms as Perl.</p>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?