paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-09 01:28:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE, Project Inspector: Disable "Move dependency up/down" when sorted alphabetically. Related to merge request !408.

Browse Source 
(cherry picked from commit 7b2f40cfb7)
This commit is contained in:
Juha 2024-12-29 11:36:49 +02:00
parent d6685c6a4a
commit f582b606db
1 changed files with 14 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
ide/projectinspector.pas
View File

@ -1006,19 +1006,26 @@ begin
// i18n for lfm
CanI18NforLFM:=LazProject.EnableI18N and LazProject.EnableI18NForLFM and (HasLFMCount>0);
SetItem(ProjInspMenuEnableI18NForLFM,@EnableI18NForLFMMenuItemClick,CanI18NforLFM,DisabledI18NForLFMCount>0);
SetItem(ProjInspMenuDisableI18NForLFM,@DisableI18NForLFMMenuItemClick,CanI18NforLFM,DisabledI18NForLFMCount<HasLFMCount);
SetItem(ProjInspMenuEnableI18NForLFM,@EnableI18NForLFMMenuItemClick,
CanI18NforLFM,DisabledI18NForLFMCount>0);
SetItem(ProjInspMenuDisableI18NForLFM,@DisableI18NForLFMMenuItemClick,
CanI18NforLFM,DisabledI18NForLFMCount<HasLFMCount);
// Required packages section
// undo delete
SetItem(ProjInspMenuReAddDependency,@ReAddMenuItemClick,CanReAddCount>0);
// move up/down
SetItem(ProjInspMenuMoveDependencyUp,@MoveDependencyUpClick,(SingleSelectedDep<>nil) and (SingleSelectedDep.PrevRequiresDependency<>nil));
SetItem(ProjInspMenuMoveDependencyDown,@MoveDependencyDownClick,(SingleSelectedDep<>nil) and (SingleSelectedDep.NextRequiresDependency<>nil));
SetItem(ProjInspMenuMoveDependencyUp,@MoveDependencyUpClick,
(SingleSelectedDep<>nil) and (SingleSelectedDep.PrevRequiresDependency<>nil), not SortAlphabetically);
SetItem(ProjInspMenuMoveDependencyDown,@MoveDependencyDownClick,
(SingleSelectedDep<>nil) and (SingleSelectedDep.NextRequiresDependency<>nil), not SortAlphabetically);
// default and preferred filename
SetItem(ProjInspMenuStoreFilenameAsDefaultOfDependencyDown,@SetDependencyDefaultFilenameMenuItemClick,HasValidDep>0);
SetItem(ProjInspMenuStoreFilenameAsPreferredOfDependencyDown,@SetDependencyPreferredFilenameMenuItemClick,HasValidDep>0);
SetItem(ProjInspMenuClearPreferredFilenameOfDependencyDown,@ClearDependencyFilenameMenuItemClick,CanClearDep>0);
SetItem(ProjInspMenuStoreFilenameAsDefaultOfDependencyDown,@SetDependencyDefaultFilenameMenuItemClick,
HasValidDep>0);
SetItem(ProjInspMenuStoreFilenameAsPreferredOfDependencyDown,@SetDependencyPreferredFilenameMenuItemClick,
HasValidDep>0);
SetItem(ProjInspMenuClearPreferredFilenameOfDependencyDown,@ClearDependencyFilenameMenuItemClick,
CanClearDep>0);
ProjectInspectorItemsMenuRoot.NotifySubSectionOnShow(Self);
end;