aar实现自动调整屏幕分辨率

来自群整理: 感谢黑猫,lst

aar调整屏幕分辨率

 import sys.monitor

for( devMode in sys.monitor.eachMode() ){
	devMode.pelsWidth = 800
	devMode.pelsHeight = 600;
	devMode.bitsPerPel = 32;
	devMode.fields= 0x80000/*DM_PELSWIDTH*/|0x100000/*DM_PELSHEIGHT*/|0x40000/*DM_BITSPERPEL*/; 
	
	::User32.ChangeDisplaySettings(devMode,0);
	break ;
}