example5_5.res

protoolkit 程序设计电子书籍

(Dialog Example5_5
    (Components
        (MenuBar						MenuBar1
										MenuPane1
										MenuPane2
										MenuPane3)
        (TextArea						TextArea1)
    )
    (Resources
        (TextArea1.Rows                 10)
        (TextArea1.Columns              25)
        (.Label                         "Example5_5")
        (.Layout
            (Grid (Rows 1) (Cols 1)
                TextArea1
            )
        )
    )
)

(MenuPane MenuPane1
    (Components
        (PushButton						NEW)
        (Separator                      Separator01)
        (PushButton                     EXIT)
    )
    (Resources
        (NEW.Label						"新建(&N)...")
		(NEW.Bitmap						"New.bif")
 
        (EXIT.Label						"退出(&E)")
		(.Label							"文件(&F)")
    )
)

(MenuPane MenuPane2
    (Components
        (PushButton                     PushButton3)
        (Separator                      Separator1)
        (RadioGroup                     RadioGroup1)
        (Separator                      Separator2)
        (CascadeButton                  CascadeButton1
                                        MenuPane21)
        (CheckButton                    CheckButton1)
    )
    (Resources
        (PushButton3.Label              "按钮(Pushbutton)")
        (RadioGroup1.Names              "RG1"
                                        "RG2")
        (RadioGroup1.Labels             "单选按钮1(Radio1)"
                                        "单选按钮2(Radio2)")
        (CascadeButton1.Label           "分级按钮(Cascade button)")
        (CheckButton1.Label             "复选按钮(Checkbutton)")
		(.Label                         "菜单测试(&T)")
    )
)

(MenuPane MenuPane21
    (Components
        (PushButton                     PushButton5)
        (PushButton                     PushButton6)
    )
    (Resources
        (PushButton5.Label              "按钮1(Pushbutton)")
        (PushButton6.Label              "按钮2(Pushbutton)")
    )
)

(MenuPane MenuPane3
    (Components
        (RadioGroup                     RadioGroup2)
        (Separator                      Separator3)
        (RadioGroup                     RadioGroup3)
    )
    (Resources
        (RadioGroup2.Names              "MenuBarEnable"
                                        "MenuBarUnable")
        (RadioGroup3.Names              "MenuBarShow"
                                        "MenuBarHide")
        (RadioGroup2.Labels             "菜单测试项可选"
                                        "菜单测试项不可选")
        (RadioGroup3.Labels             "菜单测试项显示"
                                        "菜单测试项隐藏")
		(.Label                         "菜单控制(&C)")
    )
)