9.获取屏幕宽度和高度

Environment env

Integer li_ScreenWidth, li_ScreenHeight //屏幕宽度和高度

getEnvironment(env) 

li_ScreenWidth = PixelsToUnits(env.ScreenWidth, XPixelsToUnits!)

li_ScreenHeight = PixelsToUnits(env.ScreenHeight, XPixelsToUnits!)