|
本帖最后由 826773297 于 2024-2-3 15:14 编辑
TEAM ENVI^ EnviMode=1| ENVI^ ForceLocal=1
SCRN -desk W,H,,,,dpiX,dpiY,scaleX,scaleY
CALL $--ret:&DPIA user32.dll,SetProcessDPIAware
call @Page1
_sub Page1,L100T0W360H500,,,,,,-scale:%scaleX% -scalef:%scaleX%
ENVI @this.bkcolor=0x000000
LABE -left -trans WLAN,W100H30,WLAN,,ffffff,12:宋体**####3
swin swin1:Win1:-SwinMain1,L1T20W335H400,,
SBAR -color:0x000000::*SwinMain1 SBARV,L336T20W1H400,0:(800*%scaleX%/96):100:400,,
_end
_sub Win1,W335H800,,,,,,-scale:%scaleX% -scalef:%scaleX%
ENVI @this.bkcolor=0x000000
LABE -wx Label1,L150T0W10H800,0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijiklnopqrstuvwxyz0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ,,0XFFFFFF
_END
滚动条缩放有点问题 |
|