#Region Project Attributes
#ApplicationLabel: B4A Example
#VersionCode: 1
#VersionName:
'SupportedOrientations possible values: unspecified, landscape or portrait.
#SupportedOrientations: unspecified
#CanInstallToExternalStorage: False
#End Region
#Region Activity Attributes
#FullScreen: False
#IncludeTitle: True
#End Region
Sub Process_Globals
End Sub
Sub Globals
Dim Label1 As Label
Dim Label2 As Label
Dim Label3 As Label
Dim Label4 As Label
End Sub
Sub Activity_Create(FirstTime As Boolean)
Label1.SetLayout(0,0,50%x,50%y)
Label2.SetLayout(0,50%y,50%x,50%y)
Label3.SetLayout(50%x,50%y,50%x,50%y)
Label4.SetLayout(50%x,50%y,50%x,50%y)
End Sub
Sub Activity_Resume
End Sub
Sub Activity_Pause (UserClosed As Boolean)
End Sub