How to change the screen orientation?

[vecino]

Hello, I want to let you change the screen orientation only when it is a tablet, how I can do this?

#Region Project Attributes
  #SupportedOrientations: portrait   
#End Region

Sub Process_Globals
  Dim bIsTablet As Boolean = False
End Sub

Sub Activity_Create(FirstTime As Boolean)
  If GetDevicePhysicalSize > 6 Then    ' 7" o 10" tablet
    bIsTablet = True     
    '
    #SupportedOrientations = unspecified    ' <-- how I can do this?   
    '    
  End If   
End Sub
  
Sub GetDevicePhysicalSize As Float
  Dim lv As LayoutValues
  lv = GetDeviceLayoutValues
  Return Sqrt(Power(lv.Height / lv.Scale / 160, 2) + Power(lv.Width / lv.Scale / 160, 2))
End Sub

Thanks and regards.

 

[nrasool]

Hey there

Use Phone.SetScreenOrientation to go into landscape.

See Basic4android - Phone

Kind Regards

 

[vecino]

Thank you very much, it was easy!
Regards

 

[vecino]

Hello, again.
I have encountered a problem, see if you can help me.
My project consists of many 'Activity'. With the above code only lets you change the screen orientation in the main activity, but the others are always in 'portrait'.
Does this have to control in each 'activity'?

Thanks and regards.

 

[nrasool]

Hi there

I see what you are saying, but command just works on one activity, so if you load another, you will have to use the same command again. See what Erel has written on: http://www.b4x.com/forum/53655-post2.html

Kind Regards

 

[vecino]

Hi, then it seems that it is necessary in each 'activity'.
Thank you very much and regards.