paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-16 02:39:15 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fix crash from "IDE: Show icons in the tree of key mapping options. Issue #35923. Patch from FTurtle"

Browse Source 
git-svn-id: trunk@64362 -
This commit is contained in:
martin 2021-01-09 13:48:44 +00:00
parent 746dea29a9
commit 8c10092997
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/frames/editor_keymapping_options.pas
View File

@ -437,7 +437,7 @@ var
IDECommand: TIDECommand; IDECommand: TIDECommand;
begin begin
IDECommand:=IDECommandList.FindIDECommand(AKeyRelation.Command); IDECommand:=IDECommandList.FindIDECommand(AKeyRelation.Command);
if IDECommand.UserCount=0 then if (IDECommand=nil) or (IDECommand.UserCount=0) then
Exit(imgKeyItem); Exit(imgKeyItem);
Result:=IDECommand.Users[0].ImageIndex; Result:=IDECommand.Users[0].ImageIndex;
if Result=-1 then if Result=-1 then