Changeset 261 for trunk/LocalPlayer/Help.pas

Timestamp:

Jun 11, 2020, 12:40:26 AM (4 years ago)

Author:

chronos

Message:

• Added: Partial support for key bindings configuration.

File:

• trunk/LocalPlayer/Help.pas (modified) (2 diffs)

trunk/LocalPlayer/Help.pas

@@ -127 +127 @@
 
 uses
-  Directories, ClientTools, Term, Tribes, Inp, Messg, UPixelPointer, Global;
+  Directories, ClientTools, Term, Tribes, Inp, Messg, UPixelPointer, Global,
+  UKeyBindings;
 
 {$R *.lfm}
@@ -2010 +2011 @@
   Shift: TShiftState);
 begin
-  if Key = VK_F1 then // my key
+  if KeyToShortCut(Key, Shift) = BHelp.ShortCut then // my key
   else
-    inherited
+    inherited;
 end;