pgl_print_dlg.res

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

!* pgl_print_dlg.res resource file for Print dialog
!* 08-Jun-98 I-01-12 hsu   $$1 Created 
!* 07-jan-99 I-01-29 jhk   $$2 Corrected a typo plg and deleted Add button

(Dialog pgl_print_dlg
    (Components
        (PushButton                     OK)
        (PushButton                     Cancel)
        (SubLayout                      Printer)
        (Tab                            Sheets
                                        WithSheets
                                        NoSheets)
        (SubLayout                      Quantity)
        (SubLayout                      Object)
    )

    (Resources
        (OK.Label                       "OK")
        (OK.TopOffset                   4)
        (OK.BottomOffset                4)
        (OK.LeftOffset                  4)
        (OK.RightOffset                 4)
        (Cancel.Label                   "Cancel")
        (Cancel.TopOffset               4)
        (Cancel.BottomOffset            4)
        (Cancel.LeftOffset              0)
        (Cancel.RightOffset             2)
        (Sheets.Names                   "WithSheets"
                                        "NoSheets")
        (Sheets.Labels                  "WithSheets"
                                        "NoSheets")
        (Sheets.Collapsable             True)
        (Sheets.LeftOffset              4)
        (Sheets.RightOffset             4)
        (.Label                         "Print")
        (.StartLocation                 5)
        (.DefaultButton                 "OK")
        (.RememberSize                  False)
        (.Layout
            (Grid (Rows 1 1 1 1 1) (Cols 1)
                Printer
                Sheets
                Quantity
                Object
                (Grid (Rows 1) (Cols 1 1)
                    OK
                    Cancel
                )
            )
        )
    )
)

(Layout Printer
    (Components
        (PushButton                     BPrnConfig)
        (CheckButton                    CToFile)
        (OptionMenu                     OPrinters)
    )

    (Resources
        (BPrnConfig.Label               "Configure...")
        (BPrnConfig.HelpText            "Configure current printer")
        (BPrnConfig.AttachLeft          True)
        (BPrnConfig.AttachRight         True)
        (BPrnConfig.AttachTop           True)
        (BPrnConfig.AttachBottom        True)
        (BPrnConfig.TopOffset           20)
        (BPrnConfig.BottomOffset        20)
        (BPrnConfig.LeftOffset          10)
        (BPrnConfig.RightOffset         10)
        (CToFile.Label                  "To file")
        (CToFile.HelpText               "Write to file")
        (CToFile.AttachLeft             True)
        (CToFile.TopOffset              0)
        (CToFile.BottomOffset           0)
        (CToFile.LeftOffset             0)
        (CToFile.RightOffset            0)
        (OPrinters.HelpText             "Printer name")
        (OPrinters.LeftOffset           10)
        (OPrinters.RightOffset          10)
        (.Label                         "Printer")
        (.Decorated                     True)
        (.AttachLeft                    True)
        (.AttachRight                   True)
        (.AttachTop                     True)
        (.AttachBottom                  True)
        (.TopOffset                     4)
        (.BottomOffset                  4)
        (.LeftOffset                    4)
        (.RightOffset                   4)
        (.Layout
            (Grid (Rows 1 1 1) (Cols 1)
                OPrinters
                BPrnConfig
                (Grid (Rows 1) (Cols 1 1)
                    CToFile
                )
            )
        )
    )
)

(Layout WithSheets
    (Components
        (InputPanel                     IRangeInputPanel)
        (RadioGroup                     RSheetsRadio)
    )

    (Resources
        (IRangeInputPanel.Columns       5)
        (IRangeInputPanel.HelpText      "Enter range separated by a dash.  For example, 2-5")
        (IRangeInputPanel.AttachBottom  True)
        (IRangeInputPanel.TopOffset     0)
        (IRangeInputPanel.BottomOffset  0)
        (IRangeInputPanel.LeftOffset    4)
        (IRangeInputPanel.RightOffset   0)
        (RSheetsRadio.Orientation       True)
        (RSheetsRadio.ItemHelpText      "Print all sheets"
                                        "Print current sheet"
                                        "Enter to and from sheet #s seperated by `-'")
        (RSheetsRadio.Names             "All"
                                        "Current"
                                        "Range")
        (RSheetsRadio.Labels            "All"
                                        "Current"
                                        "Range")
        (RSheetsRadio.TopOffset         0)
        (RSheetsRadio.BottomOffset      0)
        (RSheetsRadio.LeftOffset        0)
        (RSheetsRadio.RightOffset       0)
        (.Label                         "Sheets")
        (.Decorated                     True)
        (.AttachLeft                    True)
        (.AttachRight                   True)
        (.AttachTop                     True)
        (.AttachBottom                  True)
        (.Layout
            (Grid (Rows 1) (Cols 1 1)
                RSheetsRadio
                IRangeInputPanel
            )
        )
    )
)

(Layout NoSheets
    (Components
        (Label                          Label4)
    )

    (Resources
        (Label4.Bitmap                  "empty")
        (.Layout
            (Grid (Rows 1) (Cols 1)
                Label4
            )
        )
    )
)

(Layout Quantity
    (Components
        (SpinBox                        SCopies)
    )

    (Resources
        (SCopies.HelpText               "Specify number of copies (1-99)")
        (SCopies.AttachLeft             True)
        (SCopies.AttachRight            True)
        (SCopies.MinInteger             1)
        (SCopies.MaxInteger             99)
        (SCopies.TopOffset              0)
        (SCopies.BottomOffset           0)
        (SCopies.LeftOffset             0)
        (SCopies.RightOffset            0)
        (.Label                         "# of Copies")
        (.HelpText                      "Specify number of copies")
        (.Decorated                     True)
        (.AttachLeft                    True)
        (.AttachRight                   True)
        (.AttachTop                     True)
        (.AttachBottom                  True)
        (.TopOffset                     4)
        (.BottomOffset                  4)
        (.LeftOffset                    4)
        (.RightOffset                   4)
        (.Layout
            (Grid (Rows 1) (Cols 1)
                SCopies
            )
        )
    )
)

(Layout Object
    (Components
        (PushButton                     BObjConfig)
    )

    (Resources
        (BObjConfig.Label               "Object Configuration")
        (.Label                         "Object")
        (.Decorated                     True)
        (.AttachLeft                    True)
        (.AttachRight                   True)
        (.AttachTop                     True)
        (.AttachBottom                  True)
        (.TopOffset                     4)
        (.BottomOffset                  4)
        (.LeftOffset                    4)
        (.RightOffset                   4)
        (.Layout
            (Grid (Rows 1) (Cols 1)
                BObjConfig
            )
        )
    )
)