VxAlignedForm(1vtcl)
VxAlignedForm --
create vertically aligned widget(s) in a form, return widget name
Synopsis
VxAlignedForm widgetName dataList
Description
Creates one or more vertically aligned widgets within a form, with
right-justified labels.
Options
widgetName-
Widget hierarchy of the form.
dataList-
A list of lists, each containing a label and
another list containing the desired widget call
and any desired arguments.
Notices
Each Label and Widget are in their own form.
Their widget names may be retrieved as follows:
Form-
VxGetVar $name "form$n"
Widget-
VxGetVar $name "widget$n"
Label-
VxGetVar $name "label$n"
Where $name is the name returned by the VxAlignedForm
call, and $n is the position of the widget.
The first widget is number 1.
For example:
set app [VtOpen "VxAlignedForm"]
set dlog [VtFormDialog $app.Dialog -title "My Aligned form"]
set form [VxAlignedForm $dlog.Align\
{ {"Name:" {VtText -columns 15 -value "John Doe"}}
{"Address:" {VtText -value "123 Hickory Street"}}
{"Phone Number:" {VtText -value "800-555-1212"}}}]
VtShow $dlog
VtMainLoop
Produces a form like this:
+-------------------------------------+
| Name: [John Doe ] |
| Address: [123 Hickory Street ] |
|Phone Number: [800-555-1212 ] |
+-------------------------------------+
25 April 2004
© 2004 The SCO Group, Inc. All rights reserved.
UnixWare 7 Release 7.1.4 - 25 April 2004