mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-11-08 15:19:30 +01:00
LCL-GTK2: Fix compilation with GTK2 on Windows. Issue #34127, patch from errno.
git-svn-id: trunk@58712 -
This commit is contained in:
parent
824d21014a
commit
84d4fd6a4d
@ -3336,11 +3336,11 @@ var
|
|||||||
KeySymCount: Integer;
|
KeySymCount: Integer;
|
||||||
KeySymChars: array[0..16] of Char;
|
KeySymChars: array[0..16] of Char;
|
||||||
KeySymCharLen: Integer;
|
KeySymCharLen: Integer;
|
||||||
|
NewKeyMap: PGdkKeymap;
|
||||||
|
|
||||||
{$ifdef HasX}
|
{$ifdef HasX}
|
||||||
XDisplay: PDisplay;
|
XDisplay: PDisplay;
|
||||||
ModMap: TModMap;
|
ModMap: TModMap;
|
||||||
NewKeyMap: PGdkKeymap;
|
|
||||||
{$endif}
|
{$endif}
|
||||||
{$ifdef UseOwnShiftState}
|
{$ifdef UseOwnShiftState}
|
||||||
KeyStateMapIndex: Integer;
|
KeyStateMapIndex: Integer;
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user