body.res

proe5.0野火版下载(中文版免费下载)

! 17-Apr-00  J-01-06  SJB  $$1 Created.
! 17-May-00  J-01-08  SJB  $$2 Modified.
(Dialog body
    (Components
        (SubLayout                      name_layo)
        (SubLayout                      bottom_btns_layo)
        (SubLayout                      number_of_parts_layo)
        (SubLayout                      add_parts_layo)
    )

    (Resources
        (.Label                         "Body Definition")
        (.StartLocation                 301)
        (.DefaultButton                 "ok_btn")
        (.AcceleratorCode               67108864)
        (.Layout
            (Grid (Rows 0 1 1 1) (Cols 1)
                name_layo
                add_parts_layo
                number_of_parts_layo
                bottom_btns_layo
            )
        )
    )
)

(Layout name_layo
    (Components
        (InputPanel                     name_inpt)
    )

    (Resources
        (name_inpt.ModalOveride         2)
        (name_inpt.AutoHighlight        True)
        (.Label                         "Name")
        (.Decorated                     True)
        (.AttachLeft                    True)
        (.AttachRight                   True)
        (.Layout
            (Grid (Rows 1) (Cols 1)
                name_inpt
            )
        )
    )
)

(Layout bottom_btns_layo
    (Components
        (PushButton                     ok_btn)
        (PushButton                     cancel_btn)
    )

    (Resources
        (ok_btn.Label                   "OK")
        (ok_btn.HelpText                "Accept the current body construction")
        (ok_btn.ModalOveride            2)
        (ok_btn.AttachBottom            True)
        (cancel_btn.Label               "Cancel")
        (cancel_btn.ModalOveride        2)
        (cancel_btn.AttachBottom        True)
        (.AttachLeft                    True)
        (.AttachRight                   True)
        (.Layout
            (Grid (Rows 1) (Cols 1 1)
                ok_btn
                cancel_btn
            )
        )
    )
)

(Layout number_of_parts_layo
    (Components
        (Label                          number_txt)
        (InputPanel                     num_parts)
    )

    (Resources
        (number_txt.Label               "Number of Parts")
        (number_txt.AttachLeft          True)
        (number_txt.AttachRight         True)
        (number_txt.Alignment           0)
        (num_parts.Columns              5)
        (num_parts.Editable             False)
        (num_parts.MinInteger           0)
        (.Decorated                     True)
        (.AttachLeft                    True)
        (.AttachRight                   True)
        (.Layout
            (Grid (Rows 1) (Cols 0 1)
                number_txt
                num_parts
            )
        )
    )
)

(Layout add_parts_layo
    (Components
        (Label                          select_txt)
        (PushButton                     sel_part)
    )

    (Resources
        (select_txt.Label               "Select parts to add to the body ")
        (select_txt.AttachLeft          True)
        (select_txt.LeftOffset          3)
        (sel_part.Bitmap                "sel_pick.bif")
        (sel_part.HelpText              "Select a part to add to the body")
        (sel_part.AttachLeft            True)
        (.Label                         "Add Parts")
        (.Decorated                     True)
        (.AttachLeft                    True)
        (.AttachRight                   True)
        (.Layout
            (Grid (Rows 1) (Cols 1 1)
                sel_part
                select_txt
            )
        )
    )
)