Hi, I have 4 Code Modules: Main, SplashScreen, LogInScreen and MenuScreen. There is only one Page called Page1, which is initialized in SplashScreen.
When the user starts the app for the first time, the LogInScreen shows. When he/she has already registered and starts the app, the MenuScreen is shown. The problem I have is that when he/she LogsOut from his account on MenuScreen, LogInScreen shows but the textsize is huge. Ive got AutoScaleAll in all designer scripts.
My Main code is:
My SplashScreen code is:
My LogInScreen code is:
My MenuScreen code is:
The problem is that when LogInScreen.LoadLogin in the MenuBtn_Click sub is executed, the LogInLayout loads but with textsize huge. Here are two screenshots:
When the layout is loaded properly:
When the layout is loaded when Logging out:
Any ideas how to solve this issue? Thanks
When the user starts the app for the first time, the LogInScreen shows. When he/she has already registered and starts the app, the MenuScreen is shown. The problem I have is that when he/she LogsOut from his account on MenuScreen, LogInScreen shows but the textsize is huge. Ive got AutoScaleAll in all designer scripts.
My Main code is:
Main:
Private Sub Application_Start (Nav As NavigationController)
NavControl = Nav
NavControl.NavigationBarVisible=False
Nav.ToolBarVisible=False
SplashScreen.Initialize
Wait For (SplashScreen.Show) Complete (Result As Boolean)
Page1=SplashScreen.GetPage
If File.Exists(File.DirDocuments,"LoggedIn.rlm") Then
MenuScreen.Show
Else
LogInScreen.LoadLogin
End If
End Sub
My SplashScreen code is:
SplashScreen:
Sub Process_Globals
Private Page1 As Page
Private Status As String
End Sub
Sub Initialize
Status="loading"
Page1.Initialize("Page1")
Page1.RootPanel.LoadLayout("SplashLayout")
Page1.RootPanel.Color=Colors.White
Main.Page1=Page1
End Sub
Sub Show As ResumableSub
Main.NavControl.ShowPage2(Page1,False)
Animate
Do While Status="loading"
Sleep(0)
Loop
Return True
End Sub
Sub GetPage As Page
Return Page1
End Sub
Sub Page1_Resize(Width As Int, Height As Int)
Main.ScreenX=Width
Main.ScreenY=Height
End Sub
Private Sub Animate
'Shows the splash animation and sets Status="done"
End Sub
My LogInScreen code is:
LogInScreen:
Sub LoadLogin
Main.Page1.RootPanel.RemoveAllViews
Main.Page1.RootPanel.LoadLayout("LogInLayout")
RegisterScrollView.Panel.LoadLayout("RegisterScrollLayout")
End Sub
My MenuScreen code is:
MenuScreen:
Sub Show
Main.Page1.RootPanel.RemoveAllViews
Main.Page1.RootPanel.LoadLayout("MenuLayout")
CreditCardsLayoutPanel.LoadLayout("Page1")
DocumentsLayoutPanel.LoadLayout("DocumentsLayout")
NotesLayoutPanel.LoadLayout("NotesLayout")
PasswordsLayoutPanel.LoadLayout("PasswordsLayout")
End Sub
Sub MenuBtn_Click
Dim sheet As ActionSheet
sheet.Initialize("sheet", "", "CANCEL", "LOG OUT", Array("SETTINGS","GO PREMIUM"))
sheet.Show(Main.Page1.RootPanel)
Wait For sheet_Click (Item As String)
If Item="LOG OUT" Then
LogInScreen.LoadLogin
End If
End Sub
The problem is that when LogInScreen.LoadLogin in the MenuBtn_Click sub is executed, the LogInLayout loads but with textsize huge. Here are two screenshots:
When the layout is loaded properly:
When the layout is loaded when Logging out:
Any ideas how to solve this issue? Thanks