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       ] | 
+-------------------------------------+ 

30 January 1998
© 1998 The Santa Cruz Operation, Inc. All rights reserved.