B4X:
Sub App_Start
Form1.Show
fbl.New1("Form1",B4PObject(1))
' fbl.FullScreen(False)
End Sub
Is this intended? Is there a work-around?
Attachments
-
744 bytes Views: 126
Sub App_Start
Form1.Show
fbl.New1("Form1",B4PObject(1))
' fbl.FullScreen(False)
End Sub
I've tried and tested this and it worked for me...but how do I get Form2 in full screen ?
Sub App_Start
AddObject("flb","Formlib")
flb.New1("Form1",B4PObject(1))
flb.FullScreen(cPPC)
flb.New1("Form2",B4PObject(1))
flb.FullScreen(cPPC)
Form1.show
End Sub