::SetCloseButtonText
This command sets the text in the button that is used to close the wizard dialog.
Syntax
::model::mdlWizardDlg::SetCloseButtonText text
Application
MotionView Tcl GUI
Description
This command sets the text in the button that is used to close the wizard dialog.
Inputs
- text
- The text that is to be displayed in the button that closes the wizard dialog.
Example
namespace eval ::my_wizard {
variable p_dlg ""
}
proc ::my_wizard::Run {} {
set mangle [::model::GetMangle my_wizard_Run]
variable p_dlg
set p_dlg [::model::mdlWizardDlg wiz$mangle -width 600 -height 400 \
-title "My Wizard" -showExport false -callback "::my_wizard::OnClose"]
::model::mdlWizardDlg::SetCloseButtonText "Done"
::model::mdlWizardDlg::ShowDialog
}
proc ::my_wizard::OnClose { args } {
variable p_dlg
hwt::UnpostWindow $p_dlg
return 1
}
::my_wizard::Run
Errors
None.