Resize Event

Previous  Next

---

The resize event occurs when the screen size changes.

It can change due to an orientation change or using the FullScreen method.

Example:

Sub App_Start

      Form1.show

      flb.New1("Form1",B4PObject(1))

      flb.FullScreen(cPPC) 'On the device it will remove the title bar too

End Sub

Sub flb_Resize 'Fires when the user changes the screen orientation

      if Form1.Width > Form1.Height then

            msgbox("Landscape")

      else

            msgbox("Portrait")

      end if

End Sub