hedgewars/uMobile.pas
changeset 6601 5965e2927b3d
parent 6580 6155187bf599
child 6624 e049b5bb0ad1
--- a/hedgewars/uMobile.pas	Thu Jan 26 16:04:08 2012 +0400
+++ b/hedgewars/uMobile.pas	Thu Jan 26 22:19:52 2012 +0100
@@ -41,7 +41,7 @@
 procedure SaveLoadingEnded; inline;
 
 implementation
-uses uVariables;
+uses uVariables, uConsole;
 
 // this function is just to determine whether we are running on a limited screen device
 function isPhone: Boolean; inline;
@@ -49,7 +49,16 @@
 {$IFDEF IPHONEOS}
     exit(isApplePhone());
 {$ENDIF}
+{$IFDEF ANDROID}
+    //nasty nasty hack. TODO: implement callback to java to have a unified way of determining if it is a tablet
+    if (cScreenWidth < 1000) and (cScreenHeight < 500) then
+    begin
+        exit(true);
+    end
+    else exit(false);
+{$ELSE}
     exit(false);
+{$ENDIF}
 end;
 
 // this function should make the device vibrate in some way