'获取CAD屏幕像素的比值 Function ViewScreen() As Double Dim ScreenSize As Variant ScreenSize = ThisDrawing.GetVariable("screensize") '当前视口的屏幕宽度和高度 Dim H As Variant H = ThisDrawing.GetVariable("viewsize") '当前视图图形的实际高度 ViewScreen = Abs(H / ScreenS
原文 JS获取当前对象大小以及屏幕分辨率等 <script type="text/javascript">function getInfo(){ var s = ""; s += " 网页可见区域宽:"+ document.body.clientWidth+"\n"; s += " 网页可见区域高:"+ document.body.clien
js获取屏幕(设备)宽高 <script language="javascript"> var h = ""; h += " 网页可见区域宽:"+ document.body.clientWidth+"\n"; h += " 网页可见区域高:"+ document.body.clientHeight+"\n"; h += " 网页可见区域宽:"+ docu