unit1.dfm

Java实例入门

              item
                Action = RichEditUnderline1
                ImageIndex = 49
                ShortCut = 16469
              end
              item
                Action = RichEditBullets1
                ImageIndex = 51
              end
              item
                Action = RichEditAlignLeft1
                ImageIndex = 52
              end
              item
                Action = RichEditAlignRight1
                ImageIndex = 53
              end
              item
                Action = RichEditAlignCenter1
                ImageIndex = 54
              end>
            Caption = #26684#24335'(&O)'
          end
          item
            Items = <
              item
                Action = HelpContents1
                ImageIndex = 40
              end
              item
                Action = HelpIndex
              end
              item
                Action = HelpAbout
              end>
            Caption = #24110#21161'(&H)'
          end>
        ActionBar = ActionMainMenuBar1
        AutoSize = False
      end
      item
        Items.CaptionOptions = coNone
        Items = <
          item
            Action = FileNew
            ImageIndex = 6
            ShortCut = 16462
          end
          item
            Action = FileOpen1
            ImageIndex = 7
            ShortCut = 16463
          end
          item
            Action = FileSave
            ImageIndex = 8
            ShortCut = 16467
          end
          item
            Action = EditCut1
            ImageIndex = 0
            ShortCut = 16472
          end
          item
            Action = EditCopy1
            ImageIndex = 1
            ShortCut = 16451
          end
          item
            Action = EditPaste1
            ImageIndex = 2
            ShortCut = 16470
          end
          item
            Action = EditUndo1
            ImageIndex = 45
            ShortCut = 16474
          end
          item
            Action = HelpContents1
            Caption = #24110#21161#20869#23481'(&Y)'
            ImageIndex = 40
          end>
        ActionBar = ActionToolBar1
        AutoSize = False
      end
      item
        Items.CaptionOptions = coNone
        Items = <
          item
            Action = RichEditItalic1
            ImageIndex = 48
            ShortCut = 16457
          end
          item
            Action = RichEditUnderline1
            ImageIndex = 49
            ShortCut = 16469
          end
          item
            Action = RichEditBold1
            ImageIndex = 47
            ShortCut = 16450
          end>
        AutoSize = False
      end>
    LinkedActionLists = <>
    Images = ImageList1
    Left = 256
    Top = 176
    object FileNew: TAction
      Category = #25991#20214
      Caption = #26032#24314'(&N)'
      Hint = #21019#24314#19968#20010#26032#25991#20214
      ImageIndex = 6
      ShortCut = 16462
      OnExecute = FileNewExecute
    end
    object FileOpen1: TFileOpen
      Category = #25991#20214
      Caption = #25171#24320'(&O)'
      Dialog.DefaultExt = 'txt'
      Dialog.Filter = #25991#26412#25991#20214'|*.txt|'#25152#26377#25991#20214'|*.*'
      Dialog.Title = #25171#24320#19968#20010#25991#20214
      Hint = #25171#24320#19968#20010#25991#20214
      ImageIndex = 7
      ShortCut = 16463
      OnAccept = FileOpen1Accept
    end
    object FileSave: TAction
      Category = #25991#20214
      Caption = #20445#23384'(&S)'
      Hint = #20445#23384#25991#20214
      ImageIndex = 8
      ShortCut = 16467
      OnExecute = FileSaveExecute
    end
    object HelpIndex: TAction
      Category = #24110#21161
      Caption = #32034#24341'(&I)'
      Hint = #26174#31034#24110#21161
      OnExecute = HelpIndexExecute
    end
    object HelpAbout: TAction
      Category = #24110#21161
      Caption = #20851#20110'(&A)'
      Hint = #20851#20110#26412#36719#20214
      OnExecute = HelpAboutExecute
    end
    object EditCut1: TEditCut
      Category = #32534#36753
      Caption = #21098#20999'(&t)'
      Hint = #21098#20999#25991#26412
      ImageIndex = 0
      ShortCut = 16472
    end
    object EditCopy1: TEditCopy
      Category = #32534#36753
      Caption = #22797#21046'(&C)'
      Hint = #22797#21046#25991#26412
      ImageIndex = 1
      ShortCut = 16451
    end
    object EditPaste1: TEditPaste
      Category = #32534#36753
      Caption = #31896#36148'(&P)'
      Hint = #31896#36148#25991#26412
      ImageIndex = 2
      ShortCut = 16470
    end
    object HelpContents1: THelpContents
      Category = #24110#21161
      Caption = #24110#21161#20869#23481'(&C)'
      Enabled = False
      Hint = #26174#31034#24110#21161
      ImageIndex = 40
      OnExecute = HelpContents1Execute
    end
    object FileSaveAs1: TFileSaveAs
      Category = #25991#20214
      Caption = #21478#23384#20026'...'
      Hint = #21478#23384#20026#19968#20010#25991#20214
      ImageIndex = 30
    end
    object FileExit1: TFileExit
      Category = #25991#20214
      Caption = #36864#20986'(&X)'
      Hint = #36864#20986#31243#24207
      ImageIndex = 43
    end
    object FilePrintSetup1: TFilePrintSetup
      Category = #25991#20214
      Caption = #25171#21360#35774#32622'...'
      Hint = 'Print Setup'
    end
    object EditSelectAll1: TEditSelectAll
      Category = #32534#36753
      Caption = #20840#36873'(&A)'
      Hint = 'Select All|Selects the entire document'
      ShortCut = 16449
    end
    object EditUndo1: TEditUndo
      Category = #32534#36753
      Caption = #21462#28040'(&Z)'
      Hint = 'Undo|Reverts the last action'
      ImageIndex = 45
      ShortCut = 16474
    end
    object EditDelete1: TEditDelete
      Category = #32534#36753
      Caption = #21024#38500'(&D)'
      Hint = 'Delete|Erases the selection'
      ImageIndex = 46
      ShortCut = 46
    end
    object RichEditBold1: TRichEditBold
      Category = #26684#24335
      AutoCheck = True
      Caption = #21152#31895'(&B)'
      Hint = 'Bold'
      ImageIndex = 47
      ShortCut = 16450
    end
    object RichEditItalic1: TRichEditItalic
      Category = #26684#24335
      AutoCheck = True
      Caption = #26012#20307'(&I)'
      Hint = 'Italic'
      ImageIndex = 48
      ShortCut = 16457
    end
    object RichEditUnderline1: TRichEditUnderline
      Category = #26684#24335
      AutoCheck = True
      Caption = #21152#19979#21010#32447'(&U)'
      Hint = 'Underline'
      ImageIndex = 49
      ShortCut = 16469
    end
    object RichEditBullets1: TRichEditBullets
      Category = #26684#24335
      AutoCheck = True
      Caption = #39033#30446#31526#21495'(&B)'
      Hint = 'Bullets|Inserts a bullet on the current line'
      ImageIndex = 51
    end
    object RichEditAlignLeft1: TRichEditAlignLeft
      Category = #26684#24335
      AutoCheck = True
      Caption = #24038#23545#40784'(&L)'
      Hint = 'Align Left|Aligns text at the left indent'
      ImageIndex = 52
    end
    object RichEditAlignRight1: TRichEditAlignRight
      Category = #26684#24335
      AutoCheck = True
      Caption = #21491#23545#40784'(&R)'
      Hint = 'Align Right|Aligns text at the right indent'
      ImageIndex = 53
    end
    object RichEditAlignCenter1: TRichEditAlignCenter
      Category = #26684#24335
      AutoCheck = True
      Caption = #23621#20013'(&C)'
      Hint = 'Center|Centers text between margins'
      ImageIndex = 54
    end
    object SearchFind1: TSearchFind
      Category = #26597#25214
      Caption = #26597#25214'(&F)...'
      Hint = 'Find|Finds the specified text'
      ImageIndex = 55
      ShortCut = 16454
    end
    object SearchFindNext1: TSearchFindNext
      Category = #26597#25214
      Caption = #26597#25214#19979#19968#20010'(&N)'
      Enabled = False
      Hint = 'Find Next|Repeats the last find'
      ImageIndex = 56
      ShortCut = 114
    end
    object SearchReplace1: TSearchReplace
      Category = #26597#25214
      Caption = #26367#25442'(&R)'
      Hint = 'Replace|Replaces specific text with different text'
      ImageIndex = 57
    end
    object FontEdit1: TFontEdit
      Category = #26684#24335
      Caption = #23383#20307'(&F)...'
      Dialog.Font.Charset = DEFAULT_CHARSET
      Dialog.Font.Color = clWindowText
      Dialog.Font.Height = -11
      Dialog.Font.Name = 'MS Sans Serif'
      Dialog.Font.Style = []
      Dialog.MinFontSize = 0
      Dialog.MaxFontSize = 0
      Hint = 'Font Select'