example6_2.res

protoolkit 程序设计电子书籍

!UI对话框示例程序资源文件:Example6_2.res
(Dialog Example6_2
     (Components  !对话框元件声明
         (SubLayout                      Layout1)
         (SubLayout                      Layout2)
         (PushButton                     Cancel)
         (Separator                      Separator1)
        
     )
    (Resources    !对话框资源(属性定义)

         !Cancel按钮属性定义
         (Cancel.Label                   "返回(&E)")
		 (Cancel.Bitmap                  "cl_cancel")
         (Cancel.TopOffset               4)
         (Cancel.BottomOffset            4)
         (Cancel.LeftOffset              4)
         (Cancel.RightOffset             4)
         (Separator1.TopOffset           4)

         (.Label                         "Example6_2") !对话框标题
		 (.StartLocation                  3) !右侧的中部
         (.Layout  	!对话框元件的布局
             (Grid (Rows 1 1 1 1) (Cols 1) 
               Layout1  
			   Layout2  
		       Separator1                	
               Cancel        
             )
         )
     )
 )

(Layout Layout1
    (Components
         (List                     List1)
		 (InputPanel               PromptInputPanel)

    )
    (Resources
         (List1.AttachLeft      True)
         (List1.TopOffset       0)
         (List1.BottomOffset    4)
         (List1.LeftOffset      4)
         (List1.RightOffset     4)
         (PromptInputPanel.TopOffset 4)
         (PromptInputPanel.Editable  False)

        (.Label                         "选择零件")
		(.Bitmap                        "name_view_list.bif")
        (.Decorated                     True)
        (.AttachLeft                    True)
        (.AttachRight                   True)
        (.TopOffset                     4)
        (.BottomOffset                  4)
        (.LeftOffset                    4)
        (.RightOffset                   4)
        (.Layout
            (Grid (Rows 1 1) (Cols 1)
                 List1
				 PromptInputPanel
            )
        )
    )
)

(Layout Layout2
    (Components
		 (InputPanel                     InputText)
         (Label                          InputTextLable)
		 (PushButton                     Load)
		 (PushButton                     select_file)

    )
    (Resources
         !Load按钮属性定义
         (Load.Label                       "装入模型(&L)")
		 (Load.Bitmap		               "open.bif")
         (Load.TopOffset                   0)
         (Load.BottomOffset                4)
         (Load.LeftOffset                  4)
         (Load.RightOffset                 4)
		 !输入框标签“InputText”属性定义
         (InputTextLable.Label            "名称:")
         (InputTextLable.AttachLeft       True)
         (InputTextLable.LeftOffset       4)
         (InputTextLable.RightOffset      0)
         !输入框“InputText”属性定义
         (InputText.AttachLeft       True)
         (InputText.AttachRight      True)
         (InputText.TopOffset        0)
         (InputText.BottomOffset     4)
         (InputText.LeftOffset       0)
         (InputText.RightOffset      4)
		 (InputText.Columns          6)
         (InputText.Value            "prt0001")
		 (select_file.Bitmap		 "sel_name.bif")
		 (select_file.HelpText       "选择文件")
         (select_file.AttachLeft       True)
         (select_file.LeftOffset       0)
         (select_file.RightOffset      4)
		 

         (.Label                         "装入当前进程")
		 (.Bitmap                        "part16x16.bif")
         (.Decorated                     True)
         (.AttachLeft                    True)
         (.AttachRight                   True)
         (.TopOffset                     0)
         (.BottomOffset                  4)
         (.LeftOffset                    4)
         (.RightOffset                   4)
         (.Layout
             (Grid (Rows 1) (Cols 1 1 1 1) 
				 InputTextLable
				 InputText
				 select_file
				 Load             
             )                   	
         )
    )
)