hm_setpanelheight

Sets the height, in pixels, of the パネル領域 for use with custom Tk panels.

Syntax

hm_setpanelheight height

Type

HyperMesh Tcl GUI Command

Description

This command sets the height, in pixels, of the パネル領域. This is useful for creating custom Tk パネルs that require more space than the default パネル領域. The minimum size is 140 pixels.

Inputs

height: The height, in pixels, to set the パネル領域 to. Must be >= 140.

Example

To set the パネル領域 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