HTA,如何以编程方式调整 window 中所有元素的大小,同时将其放置在需要的桌面上
HTA, how to programmatically resize all elements in window while placing it on desktop where needed
我已阅读此 highly useful post,不幸的是它没有解决我的问题:我如何使用 HTA 中的代码来缩减(缩小)window、文本和框的全部内容两者都在 HTA 文件中?我正在使用 IE11(或者,它使用我),每次打开它时我都需要 Ctrl-Scroll 来缩小 window 内容。
现在,我按照评论中的建议添加了 meta http-equiv="x-ua-compatible" content="ie=edge" ,但现在这会破坏文件在位置 1920,0 的位置。有没有一种解决方案可以调整大小并允许我将 window 放在我需要的地方?
<html><title>A Form </title>
<meta http-equiv="x-ua-compatible" content="ie=edge" />.
<body style="filter:progid:DXImageTransform.Microsoft.Gradient(endColorstr='#C0CFE2', startColorstr='#365ebf', gradientType='0');">
<head>
<script language="JavaScript">window.resizeTo(320,1080);</script>
<style type="text/css">
body {
transform: scale(0.9);
height: 90%;
background-color: #EFEFDC;
font-family: Arial Narrow;
font-size: 12px;
color: #343421;
margin: 2px;
filter: none !important;
}
b {
font-size: 16px;
padding: 1en;
}
</style>
<SCRIPT Language="VBScript">
Sub Window_Onload
window.moveTo 1920, 0
End Sub
</SCRIPT>
我重新阅读了您的问题和评论,我想我更了解您的要求。要以编程方式增加所有控件的缩放级别,请使用类似于:
<script>
document.body.style.zoom = "200%"
</script>
随意在任何地方添加这段代码,我在脚本主体的末尾尝试了它,它对我有用:
<html>
<head>
<title>A Form</title>
<meta http-equiv="x-ua-compatible" content="IE=edge" />
<style>
html {
height: 100%;
}
body {
-ms-zoom: 0.50;
background-image: linear-gradient(135deg, #C0CFE2, #365ebf);
}
</style>
</head>
<body>
What is your name?<p>
<input id="name" value="Luke"></input><p>
<input type="button" value="CLICK ME" onclick="alert('Obi-Wan says: Use the Force, ' + document.getElementById('name').value + '.')"><p>
</body>
<script>
window.moveTo(100, 300);
window.resizeTo(500, 300);
</script>
<script>
document.body.style.zoom = "200%"
</script>
</html>
我已阅读此 highly useful post,不幸的是它没有解决我的问题:我如何使用 HTA 中的代码来缩减(缩小)window、文本和框的全部内容两者都在 HTA 文件中?我正在使用 IE11(或者,它使用我),每次打开它时我都需要 Ctrl-Scroll 来缩小 window 内容。
现在,我按照评论中的建议添加了 meta http-equiv="x-ua-compatible" content="ie=edge" ,但现在这会破坏文件在位置 1920,0 的位置。有没有一种解决方案可以调整大小并允许我将 window 放在我需要的地方?
<html><title>A Form </title>
<meta http-equiv="x-ua-compatible" content="ie=edge" />.
<body style="filter:progid:DXImageTransform.Microsoft.Gradient(endColorstr='#C0CFE2', startColorstr='#365ebf', gradientType='0');">
<head>
<script language="JavaScript">window.resizeTo(320,1080);</script>
<style type="text/css">
body {
transform: scale(0.9);
height: 90%;
background-color: #EFEFDC;
font-family: Arial Narrow;
font-size: 12px;
color: #343421;
margin: 2px;
filter: none !important;
}
b {
font-size: 16px;
padding: 1en;
}
</style>
<SCRIPT Language="VBScript">
Sub Window_Onload
window.moveTo 1920, 0
End Sub
</SCRIPT>
我重新阅读了您的问题和评论,我想我更了解您的要求。要以编程方式增加所有控件的缩放级别,请使用类似于:
<script>
document.body.style.zoom = "200%"
</script>
随意在任何地方添加这段代码,我在脚本主体的末尾尝试了它,它对我有用:
<html>
<head>
<title>A Form</title>
<meta http-equiv="x-ua-compatible" content="IE=edge" />
<style>
html {
height: 100%;
}
body {
-ms-zoom: 0.50;
background-image: linear-gradient(135deg, #C0CFE2, #365ebf);
}
</style>
</head>
<body>
What is your name?<p>
<input id="name" value="Luke"></input><p>
<input type="button" value="CLICK ME" onclick="alert('Obi-Wan says: Use the Force, ' + document.getElementById('name').value + '.')"><p>
</body>
<script>
window.moveTo(100, 300);
window.resizeTo(500, 300);
</script>
<script>
document.body.style.zoom = "200%"
</script>
</html>