2
0
Эх сурвалжийг харах

ADD: Feature "Select internal command" to program main menu (fixes #157)

Alexander Koblov 4 жил өмнө
parent
commit
9fa997ca98
3 өөрчлөгдсөн 8 нэмэгдсэн , 2 устгасан
  1. 5 1
      src/fmain.lfm
  2. 2 1
      src/fmain.lrj
  3. 1 0
      src/fmain.pas

+ 5 - 1
src/fmain.lfm

@@ -1195,6 +1195,9 @@ object frmMain: TfrmMain
       object miRunTerm: TMenuItem
         Action = actRunTerm
       end
+      object mnuDoAnyCmCommand: TMenuItem
+        Action = actDoAnyCmCommand
+      end
       object miLine9: TMenuItem
         Caption = '-'
       end
@@ -2478,7 +2481,8 @@ object frmMain: TfrmMain
     object actDoAnyCmCommand: TAction
       Tag = 18
       Category = 'Tools'
-      Caption = 'Select any command and execute it'
+      Caption = 'Execute &internal command...'
+      Hint = 'Select any command and execute it'
       OnExecute = actExecute
     end
     object actSetFileProperties: TAction

+ 2 - 1
src/fmain.lrj

@@ -197,7 +197,8 @@
 {"hash":47984407,"name":"tfrmmain.actminimize.caption","sourcebytes":[77,105,110,105,109,105,122,101,32,119,105,110,100,111,119],"value":"Minimize window"},
 {"hash":4710148,"name":"tfrmmain.actexit.caption","sourcebytes":[69,38,120,105,116],"value":"E&xit"},
 {"hash":142873059,"name":"tfrmmain.actdebugshowcommandparameters.caption","sourcebytes":[83,104,111,119,32,67,111,109,109,97,110,100,32,80,97,114,97,109,101,116,101,114,115],"value":"Show Command Parameters"},
-{"hash":170156852,"name":"tfrmmain.actdoanycmcommand.caption","sourcebytes":[83,101,108,101,99,116,32,97,110,121,32,99,111,109,109,97,110,100,32,97,110,100,32,101,120,101,99,117,116,101,32,105,116],"value":"Select any command and execute it"},
+{"hash":35037726,"name":"tfrmmain.actdoanycmcommand.caption","sourcebytes":[69,120,101,99,117,116,101,32,38,105,110,116,101,114,110,97,108,32,99,111,109,109,97,110,100,46,46,46],"value":"Execute &internal command..."},
+{"hash":170156852,"name":"tfrmmain.actdoanycmcommand.hint","sourcebytes":[83,101,108,101,99,116,32,97,110,121,32,99,111,109,109,97,110,100,32,97,110,100,32,101,120,101,99,117,116,101,32,105,116],"value":"Select any command and execute it"},
 {"hash":207287774,"name":"tfrmmain.actsetfileproperties.caption","sourcebytes":[67,104,97,110,103,101,32,38,65,116,116,114,105,98,117,116,101,115,46,46,46],"value":"Change &Attributes..."},
 {"hash":101439822,"name":"tfrmmain.acteditcomment.caption","sourcebytes":[69,100,105,116,32,67,111,38,109,109,101,110,116,46,46,46],"value":"Edit Co&mment..."},
 {"hash":163354629,"name":"tfrmmain.actcontextmenu.caption","sourcebytes":[83,104,111,119,32,99,111,110,116,101,120,116,32,109,101,110,117],"value":"Show context menu"},

+ 1 - 0
src/fmain.pas

@@ -231,6 +231,7 @@ type
     lblRightDriveInfo: TLabel;
     lblLeftDriveInfo: TLabel;
     lblCommandPath: TLabel;
+    mnuDoAnyCmCommand: TMenuItem;
     miConfigArchivers: TMenuItem;
     mnuConfigSavePos: TMenuItem;
     mnuConfigSaveSettings: TMenuItem;