diff --git a/src/game/g_gui.pas b/src/game/g_gui.pas
index 1acdf1b537781e92be4b3edf5eaf214c82b9d810..26a9ee57fcd261ec6095b420847a22e8da7a8edb 100644 (file)
--- a/src/game/g_gui.pas
+++ b/src/game/g_gui.pas
uses
{$IFDEF USE_MEMPOOL}mempool,{$ENDIF}
- r_graphics, e_input, e_log, g_playermodel, g_basic, g_touch, MAPDEF, utils;
+ g_base, r_graphics, e_input, e_log, g_playermodel, g_basic, MAPDEF, utils;
const
MAINMENU_HEADER_COLOR: TRGB = (R:255; G:255; B:255);
WM_CHAR = 102;
WM_USER = 110;
+ MESSAGE_DIKEY = WM_USER + 1;
+
type
TMessage = record
Msg: DWORD;
implementation
uses
- g_textures, g_sound, SysUtils, e_res,
+ {$IFDEF ENABLE_TOUCH}
+ g_system,
+ {$ENDIF}
+ g_sound, SysUtils, e_res, r_textures,
g_game, Math, StrUtils, g_player, g_options, r_playermodel,
g_map, g_weapons, xdynrec, wadreader;
end;
g_GUIGrabInput := (@FOnEnterEvent = nil) and (FWindow.FActiveControl = Self);
- g_Touch_ShowKeyboard(g_GUIGrabInput)
+
+ {$IFDEF ENABLE_TOUCH}
+ sys_ShowKeyboard(g_GUIGrabInput)
+ {$ENDIF}
end;
procedure TGUIEdit.SetText(Text: string);