paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-11-01 18:03:51 +01:00
Code Issues Packages Projects Releases Wiki Activity

idespotter: fixed two-key shortcuts

Browse Source 
git-svn-id: trunk@59152 -
This commit is contained in:
mattias 2018-09-23 16:43:07 +00:00
parent 0cb91fea6f
commit 9483469e58
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/idespotter/frmspotter.pas
View File

@ -471,7 +471,7 @@ begin
begin
ks:=' ('+KeyAndShiftStateToKeyString(Cmd.ShortcutA.Key1,Cmd.ShortcutA.Shift1);
if Cmd.ShortcutA.Key2<>VK_UNKNOWN then
ks:=Ks+', '+KeyAndShiftStateToKeyString(Cmd.ShortcutA.Key1,Cmd.ShortcutA.Shift1);
ks:=Ks+', '+KeyAndShiftStateToKeyString(Cmd.ShortcutA.Key2,Cmd.ShortcutA.Shift2);
ks:=ks+')';
end;
Itm:=TSearchItem.Create(Cmd);