hm_setpanelheight

Sets the height, in pixels, of the panel area for use with custom Tk panels.

Syntax

hm_setpanelheight height

Type

HyperMesh Tcl GUI

Description

This command sets the height, in pixels, of the panel area. This is useful for creating custom Tk panels that require more space than the default panel area. The minimum size is 140 pixels.

Inputs

height
The height, in pixels, to set the panel area to. Must be >= 140.

Example

To set the panel area to 165 pixels and create a custom Tk frame:

hm_setpanelheight 165

set my_panel [frame .my_panel]
hm_framework addpanel $my_panel "Custom Panel"
::hwt::CanvasButton $my_panel.return \
   [hwt::DluWidth 52] \
   [hwt::DluHeight 14] \
   -text "return" \
   -background red \
   -relief raised \
   -command "hm_exitpanel; hm_setpanelheight 140;"
pack $my_panel.return -side bottom -anchor se
hm_framework drawpanel $my_panel

Errors

Incorrect usage results in a Tcl error. To detect errors, you can use the catch command:
if { [ catch {command_name...} ] } {
   # Handle error
}

Version History

10.0