我需要自动检测设备分辨率,现在我有一个全局变量&硬解决方案:
Public gDeviceRes As String = "640"
'Public gDeviceRes As String = "320"
然后为每个设备重新编译,是否有人为此快速获取代码?
答案 0 :(得分:4)
根据您的具体需求,您可以使用Screen.PrimaryScreen检查当前的屏幕尺寸,或者您可以使用SM_CXSCREEN P / Invoke GetSystemMetrics或使用HORZRES调用GetDeviceCaps。垂直尺寸同样可用。
答案 1 :(得分:3)
这完全符合我的需要:
Dim screensize As System.Drawing.Rectangle = Screen.PrimaryScreen.Bounds
Public gDeviceRes As String = screensize.Height