index a1e3473e9b613c0b4b624957ae78da2b47840e59..6202cb43dc1c95636fd242e62da2ea71c6feb0bb 100644 (file)
function sys_HandleInput (): Boolean;
procedure sys_RequestQuit;
+{$IFDEF ENABLE_TOUCH}
+ function sys_IsTextInputActive (): Boolean;
+ procedure sys_ShowKeyboard (yes: Boolean);
+{$ENDIF}
+
(* --- Init --- *)
procedure sys_Init;
procedure sys_Final;
(* --------- Input --------- *)
+{$IFDEF ENABLE_TOUCH}
+ function sys_IsTextInputActive (): Boolean;
+ begin
+ Result := false
+ end;
+
+ procedure sys_ShowKeyboard (yes: Boolean);
+ begin
+ end;
+{$ENDIF}
+
function sys_HandleInput (): Boolean;
begin
result := false