|
- #code=950T936
- ENVI^ EnviMode=1
- ENVI^ ForceLocal=1
-
- call GetDpiPercent
- call @Page1
-
- _sub Page1,W347H205,,,,:0x0020C0,, %ScaleCMD%
- ENVI @this.bkcolor=0x0020C0* //窗口透明
- swin swin1:Win1:-SwinMain1,l0 t0 w347 h205,,0x100
- _end
-
- _sub Win1,W347H205,,,,,, %ScaleCMD%
- ENVI @this.bkcolor=0x0020C0* //SWIN透明
- ITEM ITEM1,L5T5W100H20,ITEM1 //控件不透明
- _end
-
- _sub GetDpiPercent *
- call $user32.dll,SetProcessDPIAware
- call $--ret:hdc user32.dll,GetDC,#0
- call $--ret:LogPixels Gdi32.dll,GetDeviceCaps,#%hdc%,#90
- //ENVI LogPixels=120
- set ScaleCMD=-scalef:%LogPixels% -scale:%LogPixels%
- _end
复制代码
|
|