forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

move projects group action to their own menu section

This commit is contained in:
Basile Burg 2016-08-15 02:19:25 +02:00
parent d65c1cb7bd
commit b7a74c2e0c
2 changed files with 47 additions and 25 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

67
src/ce_main.lfm
View File

@ -3632,9 +3632,9 @@ object CEMainForm: TCEMainForm
0000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000
} }
end end
object MenuItem81: TMenuItem end
Caption = '-' object MenuItem100: TMenuItem
end Caption = 'Projects group'
object MenuItem87: TMenuItem object MenuItem87: TMenuItem
Action = actProjSelUngrouped Action = actProjSelUngrouped
Bitmap.Data = { Bitmap.Data = {
@ -3674,6 +3674,9 @@ object CEMainForm: TCEMainForm
D0FF3C94D1FF3E97D3EE000000000000000000000000FFFFFF00 D0FF3C94D1FF3E97D3EE000000000000000000000000FFFFFF00
} }
end end
object MenuItem101: TMenuItem
Caption = '-'
end
object MenuItem82: TMenuItem object MenuItem82: TMenuItem
Action = actProjNewGroup Action = actProjNewGroup
Bitmap.Data = { Bitmap.Data = {
@ -3752,6 +3755,12 @@ object CEMainForm: TCEMainForm
D0FF3C94D1FF3E97D3EE000000000000000000000000FFFFFF00 D0FF3C94D1FF3E97D3EE000000000000000000000000FFFFFF00
} }
end end
object MenuItem103: TMenuItem
Action = actProjGroupClose
end
object MenuItem81: TMenuItem
Caption = '-'
end
object MenuItem84: TMenuItem object MenuItem84: TMenuItem
Action = actProjSaveGroup Action = actProjSaveGroup
Bitmap.Data = { Bitmap.Data = {
@ -3830,8 +3839,11 @@ object CEMainForm: TCEMainForm
CEFFD8D1D2FFB37A06FFB78116FFB9851CC5BB871F00BB871F00 CEFFD8D1D2FFB37A06FFB78116FFB9851CC5BB871F00BB871F00
} }
end end
object MenuItem98: TMenuItem object MenuItem102: TMenuItem
Action = actProjGroupCompileSync Caption = '-'
end
object MenuItem88: TMenuItem
Action = actProjGroupCompile
Bitmap.Data = { Bitmap.Data = {
36040000424D3604000000000000360000002800000010000000100000000100 36040000424D3604000000000000360000002800000010000000100000000100
2000000000000004000064000000640000000000000000000000000000000000 2000000000000004000064000000640000000000000000000000000000000000
@ -3869,8 +3881,8 @@ object CEMainForm: TCEMainForm
0000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000
} }
end end
object MenuItem88: TMenuItem object MenuItem98: TMenuItem
Action = actProjGroupCompile Action = actProjGroupCompileSync
Bitmap.Data = { Bitmap.Data = {
36040000424D3604000000000000360000002800000010000000100000000100 36040000424D3604000000000000360000002800000010000000100000000100
2000000000000004000064000000640000000000000000000000000000000000 2000000000000004000064000000640000000000000000000000000000000000
@ -4635,7 +4647,6 @@ object CEMainForm: TCEMainForm
Images = imgList Images = imgList
OnUpdate = ActionsUpdate OnUpdate = ActionsUpdate
left = 32 left = 32
top = 1
object actEdCopy: TAction object actEdCopy: TAction
Category = 'Edit' Category = 'Edit'
Caption = 'Copy' Caption = 'Copy'
@ -4981,59 +4992,59 @@ object CEMainForm: TCEMainForm
OnUpdate = updateDocumentBasedAction OnUpdate = updateDocumentBasedAction
end end
object actProjOpenGroup: TAction object actProjOpenGroup: TAction
Category = 'Project' Category = 'ProjectsGroup'
Caption = 'Open project group...' Caption = 'Open projects group...'
ImageIndex = 9 ImageIndex = 9
OnExecute = actProjOpenGroupExecute OnExecute = actProjOpenGroupExecute
end end
object actProjSaveGroup: TAction object actProjSaveGroup: TAction
Category = 'Project' Category = 'ProjectsGroup'
Caption = 'Save project group' Caption = 'Save projects group'
ImageIndex = 3 ImageIndex = 3
OnExecute = actProjSaveGroupExecute OnExecute = actProjSaveGroupExecute
end end
object actProjSaveGroupAs: TAction object actProjSaveGroupAs: TAction
Category = 'Project' Category = 'ProjectsGroup'
Caption = 'Save project group as...' Caption = 'Save projects group as...'
ImageIndex = 2 ImageIndex = 2
OnExecute = actProjSaveGroupAsExecute OnExecute = actProjSaveGroupAsExecute
end end
object actProjNewGroup: TAction object actProjNewGroup: TAction
Category = 'Project' Category = 'ProjectsGroup'
Caption = 'New project group' Caption = 'New projects group'
ImageIndex = 8 ImageIndex = 8
OnExecute = actProjNewGroupExecute OnExecute = actProjNewGroupExecute
end end
object actProjAddToGroup: TAction object actProjAddToGroup: TAction
Category = 'Project' Category = 'ProjectsGroup'
Caption = 'Add current project to group' Caption = 'Add current project to group'
ImageIndex = 7 ImageIndex = 7
OnExecute = actProjAddToGroupExecute OnExecute = actProjAddToGroupExecute
OnUpdate = updateProjectBasedAction OnUpdate = updateProjectBasedAction
end end
object actProjSelUngrouped: TAction object actProjSelUngrouped: TAction
Category = 'Project' Category = 'ProjectsGroup'
Caption = 'Select ungrouped project' Caption = 'Activate free the standing project'
ImageIndex = 9 ImageIndex = 9
OnExecute = actProjSelUngroupedExecute OnExecute = actProjSelUngroupedExecute
OnUpdate = updateProjectBasedAction OnUpdate = updateProjectBasedAction
end end
object actProjGroupCompile: TAction object actProjGroupCompile: TAction
Category = 'Project' Category = 'ProjectsGroup'
Caption = 'Compile project group (parallel)' Caption = 'Compile projects group (parallel)'
ImageIndex = 21 ImageIndex = 21
OnExecute = actProjGroupCompileExecute OnExecute = actProjGroupCompileExecute
end end
object actFileRunDub: TAction object actFileRunDub: TAction
Category = 'File' Category = 'File'
Caption = 'DUB single file package' Caption = 'Run DUB single file package'
ImageIndex = 36 ImageIndex = 36
OnExecute = actFileRunDubExecute OnExecute = actFileRunDubExecute
OnUpdate = updateDocumentBasedAction OnUpdate = updateDocumentBasedAction
end end
object actFileRunDubOut: TAction object actFileRunDubOut: TAction
Category = 'File' Category = 'File'
Caption = 'DUB single file package outside' Caption = 'Run DUB single file package outside'
ImageIndex = 36 ImageIndex = 36
OnExecute = actFileRunDubOutExecute OnExecute = actFileRunDubOutExecute
OnUpdate = updateDocumentBasedAction OnUpdate = updateDocumentBasedAction
@ -5045,11 +5056,17 @@ object CEMainForm: TCEMainForm
OnExecute = actFileNewDubScriptExecute OnExecute = actFileNewDubScriptExecute
end end
object actProjGroupCompileSync: TAction object actProjGroupCompileSync: TAction
Category = 'Project' Category = 'ProjectsGroup'
Caption = 'Compile project group (sequential)' Caption = 'Compile projects group (sequential)'
ImageIndex = 21 ImageIndex = 21
OnExecute = actProjGroupCompileSyncExecute OnExecute = actProjGroupCompileSyncExecute
end end
object actProjGroupClose: TAction
Category = 'ProjectsGroup'
Caption = 'Close projects group'
ImageIndex = 27
OnExecute = actProjNewGroupExecute
end
end end
object imgList: TImageList object imgList: TImageList
left = 64 left = 64

5
src/ce_main.pas
View File

@ -51,6 +51,7 @@ type
actFileRunDub: TAction; actFileRunDub: TAction;
actFileRunDubOut: TAction; actFileRunDubOut: TAction;
actFileNewDubScript: TAction; actFileNewDubScript: TAction;
actProjGroupClose: TAction;
actProjGroupCompileSync: TAction; actProjGroupCompileSync: TAction;
actProjGroupCompile: TAction; actProjGroupCompile: TAction;
actProjSelUngrouped: TAction; actProjSelUngrouped: TAction;
@ -91,6 +92,10 @@ type
mainMenu: TMainMenu; mainMenu: TMainMenu;
MenuItem1: TMenuItem; MenuItem1: TMenuItem;
MenuItem10: TMenuItem; MenuItem10: TMenuItem;
MenuItem100: TMenuItem;
MenuItem101: TMenuItem;
MenuItem102: TMenuItem;
MenuItem103: TMenuItem;
MenuItem11: TMenuItem; MenuItem11: TMenuItem;
MenuItem12: TMenuItem; MenuItem12: TMenuItem;
MenuItem13: TMenuItem; MenuItem13: TMenuItem;