mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-22 16:39:26 +02:00
use different shortcuts to prevent clashes
git-svn-id: trunk@8572 -
This commit is contained in:
parent
3b12183325
commit
61e4e8ec4e
@ -37,7 +37,7 @@ Var
|
||||
Cat : TIDECommandCategory;
|
||||
|
||||
begin
|
||||
Key:=IDEShortCut(VK_F,[SSctrl,ssShift],VK_UNKNOWN,[]);
|
||||
Key:=IDEShortCut(VK_P,[SSctrl,ssShift],VK_UNKNOWN,[]);
|
||||
{$ifndef USECustomCategory}
|
||||
Cat:=IDECommandList.CreateCategory(Nil,
|
||||
SCatFormatting,
|
||||
@ -50,7 +50,7 @@ begin
|
||||
SDescrPFSelection,
|
||||
SCmdPFSelection,
|
||||
Key);
|
||||
Key:=IDEShortCut(VK_F,[SSctrl,ssAlt],VK_UNKNOWN,[]);
|
||||
Key:=IDEShortCut(VK_P,[SSctrl,ssAlt],VK_UNKNOWN,[]);
|
||||
CmdFormatFile:=RegisterIDECommand(Cat,
|
||||
SDescrPFFile,
|
||||
SCmdPFFile,
|
||||
|
Loading…
Reference in New Issue
Block a user