unotepad.dfm

类似于写字板,但此功能强大,可以扩展到许多地方

      object MenuFileAttribute: TMenuItem
        Caption = #25991#20214#23646#24615
        ImageIndex = 71
        OnClick = MenuFileAttributeClick
      end
      object MenuFileExit: TMenuItem
        Caption = #36864#20986
        OnClick = MenuFileExitClick
      end
    end
    object MenuEdit: TMenuItem
      AutoHotkeys = maManual
      Caption = #32534#36753'(&E)'
      object MenuEditUndo: TMenuItem
        Caption = #25764#28040'(&U)'
        Enabled = False
        ImageIndex = 9
        ShortCut = 16469
        OnClick = MenuEditUndoClick
      end
      object MenuEditBack: TMenuItem
        Caption = #24674#22797'(&B)'
        Enabled = False
        ImageIndex = 10
        ShortCut = 16466
        OnClick = MenuEditBackClick
      end
      object MenuEditLine1: TMenuItem
        Caption = '-'
      end
      object MenuEditCut: TMenuItem
        Caption = #21098#20999'(&T)'
        Enabled = False
        ImageIndex = 5
        ShortCut = 16472
        OnClick = MenuEditCutClick
      end
      object MenuEditCopy: TMenuItem
        Caption = #22797#21046'(&C)'
        Enabled = False
        ImageIndex = 6
        ShortCut = 16451
        OnClick = MenuEditCopyClick
      end
      object MenuEditPaste: TMenuItem
        Caption = #31896#36148'(&P)'
        Enabled = False
        ImageIndex = 7
        ShortCut = 16470
        OnClick = MenuEditPasteClick
      end
      object MenuEditDelete: TMenuItem
        Caption = #21024#38500'(&D)'
        Enabled = False
        ImageIndex = 8
        ShortCut = 46
        OnClick = MenuEditDeleteClick
      end
      object MenuEditLine2: TMenuItem
        Caption = '-'
      end
      object MenuEditSelectAll: TMenuItem
        Caption = #20840#36873'(&A)'
        ShortCut = 16449
        OnClick = MenuEditSelectAllClick
      end
      object MenuEditSelectLine: TMenuItem
        Caption = #36873#25321#24403#21069#34892'(&L)'
        ShortCut = 32857
        OnClick = MenuEditSelectLineClick
      end
      object MenuEditDeleteLine: TMenuItem
        Caption = #21024#38500#24403#21069#34892'(&Y)'
        ShortCut = 16473
        OnClick = MenuEditDeleteLineClick
      end
      object MenuEditLine3: TMenuItem
        Caption = '-'
      end
      object MenuEditToCapital: TMenuItem
        Caption = #36716#20026#23567#20889'(&S)'
        ShortCut = 16460
        OnClick = MenuEditToCapitalClick
      end
      object MenuEditToLittle: TMenuItem
        Caption = #36716#20026#22823#20889'(&B)'
        ShortCut = 16452
        OnClick = MenuEditToLittleClick
      end
      object MenuEditLine4: TMenuItem
        Caption = '-'
      end
      object MenuEditWrap: TMenuItem
        Caption = #33258#21160#25442#34892'(&W)'
        Checked = True
        ImageIndex = 30
        ShortCut = 16471
        OnClick = MenuEditWrapClick
      end
    end
    object MenuSearch: TMenuItem
      AutoHotkeys = maManual
      Caption = #25628#32034'(&S)'
      object MenuSearchFind: TMenuItem
        Caption = #26597#25214'(&F)'
        ImageIndex = 11
        ShortCut = 16454
        OnClick = MenuSearchFindClick
      end
      object MenuSearchLine1: TMenuItem
        Caption = '-'
      end
      object MenuSearchPrior: TMenuItem
        Caption = #26597#25214#19978#19968#20010'(&P)'
        ImageIndex = 31
        OnClick = MenuSearchPriorClick
      end
      object MenuSearchNext: TMenuItem
        Caption = #26597#25214#19979#19968#20010'(&N)'
        ImageIndex = 32
        ShortCut = 114
        OnClick = MenuSearchNextClick
      end
      object MenuSearchLine2: TMenuItem
        Caption = '-'
      end
      object MenuSearchReplace: TMenuItem
        Caption = #26597#25214#24182#26367#25442'(&R)'
        OnClick = MenuSearchReplaceClick
      end
      object MenuSearchLine3: TMenuItem
        Caption = '-'
      end
      object MenuSearchGoToLine: TMenuItem
        Caption = #36339#33267#31532#20960#34892
        OnClick = MenuSearchGoToLineClick
      end
    end
    object MenuInsert: TMenuItem
      AutoHotkeys = maManual
      Caption = #25554#20837'(I&)'
      object MenuInsertDate: TMenuItem
        Caption = #26085#26399
        ShortCut = 116
        OnClick = MenuInsertDateClick
      end
      object MenuInsertTime: TMenuItem
        Caption = #26102#38388
        ShortCut = 117
        OnClick = MenuInsertTimeClick
      end
      object MenuInsertDay: TMenuItem
        Caption = #26143#26399
        OnClick = MenuInsertDayClick
      end
      object MenuInsertLine1: TMenuItem
        Caption = '-'
      end
      object MenuInsertChar: TMenuItem
        Caption = #29305#27530#23383#31526
        OnClick = MenuInsertCharClick
      end
      object MenuInsertFile: TMenuItem
        Caption = #25991#20214
        OnClick = MenuInsertFileClick
      end
      object MenuInsertPicture: TMenuItem
        Caption = #22270#29255
        OnClick = MenuInsertPictureClick
      end
    end
    object MenuFont: TMenuItem
      AutoHotkeys = maManual
      Caption = #23383#20307'(&T)'
      object MenuFontBigger: TMenuItem
        Caption = #25918#22823
        OnClick = MenuFontBiggerClick
      end
      object MenuFontSmaller: TMenuItem
        Caption = #32553#23567
        OnClick = MenuFontSmallerClick
      end
      object MenuFontLine1: TMenuItem
        Caption = '-'
      end
      object MenuFontDefault: TMenuItem
        Caption = #40664#35748#23383#20307
        OnClick = MenuFontDefaultClick
      end
      object MenuFontSet: TMenuItem
        Caption = #35774#32622
        ImageIndex = 22
        OnClick = MenuFontSetClick
      end
    end
    object MenuColor: TMenuItem
      AutoHotkeys = maManual
      AutoLineReduction = maManual
      Caption = #39068#33394'(&C)'
      object MenuColorFore: TMenuItem
        Caption = #21069#26223#33394
        OnClick = MenuColorForeClick
      end
      object MenuColorBack: TMenuItem
        AutoHotkeys = maManual
        AutoLineReduction = maManual
        Caption = #32972#26223#33394
        OnClick = MenuColorBackClick
      end
      object MenuColorLine1: TMenuItem
        Caption = '-'
      end
      object MenuColorDefaultFore: TMenuItem
        Caption = #40664#35748#21069#26223#33394
        OnClick = MenuColorDefaultForeClick
      end
      object MenuColorDefaultBack: TMenuItem
        Caption = #40664#35748#32972#26223#33394
        OnClick = MenuColorDefaultBackClick
      end
    end
    object MenuFuntion: TMenuItem
      AutoHotkeys = maManual
      Caption = #21151#33021'(&M)'
      object MenuFuntionCovert: TMenuItem
        Caption = #20840'/'#21322#35282#36716#25442
        object MenuFuntionCovertFull: TMenuItem
          Caption = #20840#35282
        end
        object MenuFuntionCovertHalf: TMenuItem
          Caption = #21322#35282
        end
      end
      object MenuFuntionAddLineNumber: TMenuItem
        Caption = #21152#34892#21495
        OnClick = MenuFuntionAddLineNumberClick
      end
      object MenuFunctionAutoRead: TMenuItem
        Caption = #33258#21160#38405#35835
        Enabled = False
        ImageIndex = 29
        ShortCut = 120
        OnClick = MenuFunctionAutoReadClick
      end
      object MenuFuntionDiary: TMenuItem
        Caption = #20010#20154#26085#35760
        OnClick = MenuFuntionDiaryClick
      end
      object MenuFuntionPasteRecord: TMenuItem
        Caption = #26597#30475#21098#31896#26495
        ImageIndex = 7
      end
      object MenuFunctionPlaysound: TMenuItem
        Caption = #25773#25918#32972#26223#38899#20048
        ImageIndex = 33
        OnClick = MenuFunctionPlaysoundClick
      end
      object MenuFuntionRun: TMenuItem
        Caption = #25191#34892#20854#20182#31243#24207
        OnClick = MenuFuntionRunClick
      end
      object MenuFuntionSkin: TMenuItem
        Caption = #31383#20307#25442#32932
        OnClick = MenuFuntionSkinClick
      end
    end
    object MenuOption: TMenuItem
      AutoHotkeys = maManual
      Caption = #36873#39033'(&O)'
      object MenuOptionKeyBorad: TMenuItem
        Caption = #38190#30424#35774#32622
        ImageIndex = 21
        OnClick = MenuOptionKeyBoradClick
      end
      object MenuOptionSetSreen: TMenuItem
        Caption = #23631#24149#20445#25252
        OnClick = MenuOptionSetSreenClick
      end
      object MenuOptionSet: TMenuItem
        Caption = #29615#22659#37197#32622
        ImageIndex = 34
        OnClick = MenuOptionSetClick
      end
    end
    object MenuWindow: TMenuItem
      AutoHotkeys = maManual
      Caption = #31383#21475'(&W)'
      object MenuWindowShowToolBar: TMenuItem
        Caption = #26174#31034#24037#20855#26639
        Checked = True
        OnClick = MenuWindowShowToolBarClick
      end
      object MenuWindowShowStatusBar: TMenuItem
        Caption = #26174#31034#29366#24577#26639
        Checked = True
        OnClick = MenuWindowShowStatusBarClick
      end
      object MenuWindowLine: TMenuItem
        Caption = '-'