set landfmenu_items {
GuidoButtonGroup g1 {
GuidoMenuItem item1 {
-label "Microsoft Office 2003"
-command client "CHANGE LOOK AND FEEL" "OFFICE2003"
}
GuidoMenuItem item2 {
-label "Plain"
-command client "CHANGE LOOK AND FEEL" "VSNET"
}
GuidoMenuItem item3 {
-label "Compact"
-command client "CHANGE LOOK AND FEEL" "XERTO"
}
}
}
GuidoMenu landfmenu {
-label "Window appearance"
-delayed_script $landfmenu_items
}
