unit1.dfm

用delphi编成的文件编辑器

                Action = EditDelete1
                ImageIndex = 7
                ShortCut = 46
              end>
            Caption = #32534#36753'(&Y)'
          end
          item
            Items = <
              item
                Action = RichEditBold1
                ImageIndex = 8
                ShortCut = 16450
              end
              item
                Action = RichEditItalic1
                ImageIndex = 9
                ShortCut = 16457
              end
              item
                Action = RichEditUnderline1
                ImageIndex = 10
                ShortCut = 16469
              end
              item
                Action = RichEditStrikeOut1
                ImageIndex = 11
              end
              item
                Action = RichEditBullets1
                ImageIndex = 12
              end
              item
                Action = RichEditAlignLeft1
                ImageIndex = 13
              end
              item
                Action = RichEditAlignRight1
                ImageIndex = 14
              end
              item
                Action = RichEditAlignCenter1
                ImageIndex = 15
              end>
            Caption = #26684#24335'(&X)'
          end
          item
            Items = <
              item
                Action = SearchFind1
                ImageIndex = 20
                ShortCut = 16454
              end
              item
                Action = SearchFindNext1
                ImageIndex = 21
                ShortCut = 114
              end
              item
                Action = SearchReplace1
                ImageIndex = 22
              end
              item
                Action = SearchFindFirst1
              end>
            Caption = #25628#32034'(&W)'
          end
          item
            Items = <
              item
                Action = HelpIndex
              end
              item
                Action = HelpAbout
              end
              item
                Action = HelpContents1
                ImageIndex = 16
              end>
            Caption = #24110#21161'(&V)'
          end>
        ActionBar = ActionMainMenuBar1
        AutoSize = False
      end
      item
        Items.CaptionOptions = coNone
        Items = <
          item
            Action = FileNew
            Caption = '&New'
            ImageIndex = 0
            ShortCut = 16462
          end
          item
            Action = FileOpen1
            ImageIndex = 17
            ShortCut = 16463
          end
          item
            Action = FileSave
            Caption = '&Save'
            ImageIndex = 1
            ShortCut = 16467
          end
          item
            Action = EditCut1
            ImageIndex = 3
            ShortCut = 16472
          end
          item
            Action = EditCopy1
            ImageIndex = 4
            ShortCut = 16451
          end
          item
            Action = EditPaste1
            ImageIndex = 5
            ShortCut = 16470
          end>
        ActionBar = ActionToolBar1
        AutoSize = False
      end
      item
        AutoSize = False
      end>
    LinkedActionLists = <>
    Images = ImageList1
    Left = 376
    Top = 160
    object FileNew: TAction
      Category = #25991#20214
      Caption = 'New'
      Hint = #26032#24314#19968#20010#25991#20214
      ImageIndex = 0
      ShortCut = 16462
      OnExecute = FileNewExecute
    end
    object FileSave: TAction
      Category = #25991#20214
      Caption = 'Save'
      ImageIndex = 1
      ShortCut = 16467
      OnExecute = FileSaveExecute
    end
    object HelpIndex: TAction
      Category = #24110#21161
      Caption = 'Guide'
      OnExecute = HelpIndexExecute
    end
    object HelpAbout: TAction
      Category = #24110#21161
      Caption = 'About'
      OnExecute = HelpAboutExecute
    end
    object EditCut1: TEditCut
      Category = #32534#36753
      Caption = 'Cu&t'
      Hint = 'Cut|Cuts the selection and puts it on the Clipboard'
      ImageIndex = 3
      ShortCut = 16472
    end
    object EditCopy1: TEditCopy
      Category = #32534#36753
      Caption = '&Copy'
      Hint = 'Copy|Copies the selection and puts it on the Clipboard'
      ImageIndex = 4
      ShortCut = 16451
    end
    object EditPaste1: TEditPaste
      Category = #32534#36753
      Caption = '&Paste'
      Hint = 'Paste|Inserts Clipboard contents'
      ImageIndex = 5
      ShortCut = 16470
    end
    object EditSelectAll1: TEditSelectAll
      Category = #32534#36753
      Caption = 'Select &All'
      Hint = 'Select All|Selects the entire document'
      ShortCut = 16449
    end
    object EditUndo1: TEditUndo
      Category = #32534#36753
      Caption = '&Undo'
      Hint = 'Undo|Reverts the last action'
      ImageIndex = 6
      ShortCut = 16474
    end
    object EditDelete1: TEditDelete
      Category = #32534#36753
      Caption = '&Delete'
      Hint = 'Delete|Erases the selection'
      ImageIndex = 7
      ShortCut = 46
    end
    object RichEditBold1: TRichEditBold
      Category = #26684#24335
      AutoCheck = True
      Caption = '&Bold'
      Hint = 'Bold'
      ImageIndex = 8
      ShortCut = 16450
    end
    object RichEditItalic1: TRichEditItalic
      Category = #26684#24335
      AutoCheck = True
      Caption = '&Italic'
      Hint = 'Italic'
      ImageIndex = 9
      ShortCut = 16457
    end
    object RichEditUnderline1: TRichEditUnderline
      Category = #26684#24335
      AutoCheck = True
      Caption = '&Underline'
      Hint = 'Underline'
      ImageIndex = 10
      ShortCut = 16469
    end
    object RichEditStrikeOut1: TRichEditStrikeOut
      Category = #26684#24335
      AutoCheck = True
      Caption = '&Strikeout'
      Hint = 'Strikeout'
      ImageIndex = 11
    end
    object RichEditBullets1: TRichEditBullets
      Category = #26684#24335
      AutoCheck = True
      Caption = '&Bullets'
      Hint = 'Bullets|Inserts a bullet on the current line'
      ImageIndex = 12
    end
    object RichEditAlignLeft1: TRichEditAlignLeft
      Category = #26684#24335
      AutoCheck = True
      Caption = 'Align &Left'
      Hint = 'Align Left|Aligns text at the left indent'
      ImageIndex = 13
    end
    object RichEditAlignRight1: TRichEditAlignRight
      Category = #26684#24335
      AutoCheck = True
      Caption = 'Align &Right'
      Hint = 'Align Right|Aligns text at the right indent'
      ImageIndex = 14
    end
    object RichEditAlignCenter1: TRichEditAlignCenter
      Category = #26684#24335
      AutoCheck = True
      Caption = '&Center'
      Hint = 'Center|Centers text between margins'
      ImageIndex = 15
    end
    object HelpContents1: THelpContents
      Category = #24110#21161