ptbcurnt.res

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

! 25-Oct-93     E-03-12 mjb     $$1   Created.
! 18-Mar-94     E-03-17 mjb     $$2   limit input strings to 80 characters
! 29-jul-94     E-06-05 dmh     $$3   Added label
! 05-Jun-01     J-03-01 UK      $$4   Ported to the UI toolkit
! 22-Apr-07     L-01-31 Ishai   $$5   Removed menu items from "Help" menu

(Dialog ptbcurnt
    (Components
        (MenuBar                        menu_bar
                                        file
                                        edit
                                        view
                                        format
                                        help)
        (Table                          current_table)
        (InputPanel                     cell_input)
        (Label                          help_text)
    )

    (Resources
        (current_table.SelectionPolicy  4)
        (current_table.Columns          80)
        (current_table.VisibleRows      27)
        (current_table.PopupMenu        "popup")
        (current_table.TruncateLabel    False)
        (cell_input.MaxLen              80)
        (cell_input.SelectionVisible    True)
        (cell_input.TopOffset           2)
        (cell_input.BottomOffset        2)
        (help_text.Label                "Ready")
        (help_text.AttachLeft           True)
        (help_text.AttachRight          True)
        (help_text.Alignment            0)
        (help_text.TopOffset            2)
        (help_text.BottomOffset         2)
        (help_text.LeftOffset           2)
        (help_text.RightOffset          2)
        (.MaximizeButton                True)
        (.MinimizeButton                True)
        (.Layout
            (Grid (Rows 0 1 0) (Cols 1)
                cell_input
                current_table
                help_text
            )
        )
    )
)

(MenuPane file
    (Components
        (PushButton                     FileNew)
        (PushButton                     FileOpen)
        (PushButton                     FileRead)
        (Separator                      Separator1)
        (PushButton                     FileSave)
        (PushButton                     FileSaveAs)
        (Separator                      Separator2)
        (PushButton                     FileExit)
        (PushButton                     FileQuit)
    )

    (Resources
        (FileNew.Label                  "&New...")
        (FileNew.HelpText               "Create a New Protable File.")
        (FileNew.ActivateCommand        "FileNew")
        (FileOpen.Label                 "&Open...")
        (FileOpen.HelpText              "Open an existing Protable File.")
        (FileOpen.ActivateCommand       "FileOpen")
        (FileOpen.AcceleratorCode       35258368)
        (FileRead.Label                 "&Read...")
        (FileRead.HelpText              "Overwrite current table with existing Protable file.")
        (FileRead.ActivateCommand       "FileRead")
        (Separator1.TopOffset           0)
        (Separator1.BottomOffset        0)
        (Separator1.LeftOffset          0)
        (Separator1.RightOffset         0)
        (FileSave.Label                 "&Save")
        (FileSave.HelpText              "Save Current Protable File.")
        (FileSave.ActivateCommand       "FileSave")
        (FileSave.AcceleratorCode       18481152)
        (FileSaveAs.Label               "Save &As...")
        (FileSaveAs.HelpText            "Save, by name, Current Protable File.")
        (FileSaveAs.ActivateCommand     "FileSaveas")
        (FileSaveAs.AcceleratorCode     1703936)
        (Separator2.TopOffset           0)
        (Separator2.BottomOffset        0)
        (Separator2.LeftOffset          0)
        (Separator2.RightOffset         0)
        (FileExit.Label                 "E&xit")
        (FileExit.HelpText              "Exit, Saving Current Protable File.")
        (FileExit.ActivateCommand       "FileExit")
        (FileQuit.Label                 "&Quit")
        (FileQuit.HelpText              "Quit, Without Saving Current ProTable File.")
        (FileQuit.ActivateCommand       "FileQuit")
        (.Label                         "&File")
    )
)

(MenuPane edit
    (Components
        (PushButton                     EditUndo)
        (Separator                      Separator3)
        (PushButton                     EditCut)
        (PushButton                     EditCopy)
        (PushButton                     EditPaste)
        (PushButton                     EditErase)
        (Separator                      Separator4)
        (PushButton                     EditSort)
        (Separator                      Separator6)
        (PushButton                     EditSetSwap)
        (PushButton                     EditSwap)
        (Separator                      Separator7)
        (PushButton                     EditDelete)
        (PushButton                     EditInsert)
        (Separator                      Separator5)
        (PushButton                     Edit123)
        (PushButton                     EditChoose)
    )

    (Resources
        (EditUndo.Label                 "&Undo")
        (EditUndo.HelpText              "Undo Last change.")
        (EditUndo.ActivateCommand       "EditUndo")
        (Separator3.TopOffset           0)
        (Separator3.BottomOffset        0)
        (Separator3.LeftOffset          0)
        (Separator3.RightOffset         0)
        (EditCut.Label                  "Cu&t")
        (EditCut.HelpText               "Remove Selected Region to paste Buffer.")
        (EditCut.ActivateCommand        "EditCut")
        (EditCut.AcceleratorCode        39321600)
        (EditCopy.Label                 "&Copy")
        (EditCopy.HelpText              "Copy selected Region to paste Buffer.")
        (EditCopy.ActivateCommand       "EditCopy")
        (EditCopy.AcceleratorCode       37945344)
        (EditPaste.Label                "&Paste")
        (EditPaste.HelpText             "Copy paste buffer to table.")
        (EditPaste.ActivateCommand      "EditPaste")
        (EditPaste.AcceleratorCode      39190528)
        (EditErase.Label                "&Erase")
        (EditErase.HelpText             "Erase Selected Region.")
        (EditErase.ActivateCommand      "EditErase")
        (EditErase.AcceleratorCode      196608)
        (Separator4.TopOffset           0)
        (Separator4.BottomOffset        0)
        (Separator4.LeftOffset          0)
        (Separator4.RightOffset         0)
        (EditSort.Label                 "&Sort")
        (EditSort.HelpText              "Sort Selected Region.")
        (EditSort.ActivateCommand       "EditSort")
        (Separator6.TopOffset           0)
        (Separator6.BottomOffset        0)
        (Separator6.LeftOffset          0)
        (Separator6.RightOffset         0)
        (EditSetSwap.Label              "Set Sw&ap Source")
        (EditSetSwap.HelpText           "Set Swap Source as Selected Region.")
        (EditSetSwap.ActivateCommand    "EditSetSwap")
        (EditSwap.Label                 "S&wap...")
        (EditSwap.HelpText              "Swap Selected Region with Swap Source.")
        (EditSwap.ActivateCommand       "EditSwap")
        (Separator7.TopOffset           0)
        (Separator7.BottomOffset        0)
        (Separator7.LeftOffset          0)
        (Separator7.RightOffset         0)
        (EditDelete.Label               "&Delete...")
        (EditDelete.HelpText            "Delete Selected Region.")
        (EditDelete.ActivateCommand     "EditDelete")
        (EditInsert.Label               "&Insert...")
        (EditInsert.HelpText            "Insert rows or columns")
        (EditInsert.ActivateCommand     "EditInsert")
        (Separator5.TopOffset           0)
        (Separator5.BottomOffset        0)
        (Separator5.LeftOffset          0)
        (Separator5.RightOffset         0)
        (Edit123.Label                  "123")
        (Edit123.Visible                False)
        (Edit123.HelpText               "Lotus 123 Mode")
        (Edit123.ActivateCommand        "EditLotus123")
        (EditChoose.Label               "Ch&oose Keywords...")
        (EditChoose.HelpText            "Bring up keyword browser.")
        (EditChoose.ActivateCommand     "EditChoose")
        (EditChoose.AcceleratorCode     1179648)
        (.Label                         "&Edit")
    )
)

(MenuPane view
    (Components
        (PushButton                     GotoHome)
        (PushButton                     GotoCell)
    )

    (Resources
        (GotoHome.Label                 "&Home")
        (GotoHome.HelpText              "Goto Home Cell")
        (GotoHome.ActivateCommand       "GotoHome")
        (GotoHome.AcceleratorCode       983040)
        (GotoCell.Label                 "&Goto...")
        (GotoCell.HelpText              "Goto a specified cell")
        (GotoCell.ActivateCommand       "GotoCell")
        (GotoCell.AcceleratorCode       1114112)
        (.Label                         "&View")
    )
)

(MenuPane format
    (Components
        (PushButton                     ColumnGlobalWidth)
        (PushButton                     ColumnWidth)
        (PushButton                     ColumnResetWidth)
    )

    (Resources
        (ColumnGlobalWidth.Label        "&Global Width...")
        (ColumnGlobalWidth.HelpText     "Set column Width on selected Columns.")
        (ColumnGlobalWidth.ActivateCommand "ColumnGlobalWidth")
        (ColumnGlobalWidth.AcceleratorCode 56033280)
        (ColumnWidth.Label              "Column &Width...")
        (ColumnWidth.HelpText           "Set default Column Width.")
        (ColumnWidth.ActivateCommand    "ColumnWidth")
        (ColumnWidth.AcceleratorCode    39256064)
        (ColumnResetWidth.Label         "&Reset Width")
        (ColumnResetWidth.HelpText      "Reset default Column Width.")
        (ColumnResetWidth.ActivateCommand "ColumnResetWidth")
        (ColumnResetWidth.AcceleratorCode 89587712)
        (.Label                         "Forma&t")
    )
)

(MenuPane help
    (Components
        (PushButton                     HelpApp)
        (Separator                      Separator8)
        (PushButton                     HelpAbout)
    )

    (Resources
        (HelpApp.Label                  "How To Use Help")
        (Separator8.TopOffset           0)
        (Separator8.BottomOffset        0)
        (Separator8.LeftOffset          0)
        (Separator8.RightOffset         0)
        (HelpAbout.Label                "&About PROTABLE...")
        (HelpAbout.HelpText             "Copyright Information about ProTable")
        (HelpAbout.ActivateCommand      "HelpAbout")
        (.Label                         "&Help")
    )
)

(TableLayout current_table
    (Components
        (InputPanel                     popup_input)
        (PushButton                     EditorNav)
        (PushButton                     EditorCancel)
    )

    (Resources
        (popup_input.Visible            False)
        (popup_input.MaxLen             80)
        (popup_input.SelectionVisible   True)
        (EditorNav.ActivateCommand      "EditorNav")
        (EditorNav.AcceleratorCode      1048576)
        (EditorCancel.ActivateCommand   "EditorCancel")
        (EditorCancel.AcceleratorCode   65536)
    )
)

(MenuPane popup
    (Components
        (PushButton                     dummy)
    )

    (Resources
        (dummy.Visible                  False)
    )
)