| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]我有两个显示器，如何分别当前使用的显示器的宽度？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=179013) |
| -- 作者：moseser -- 发布时间：2022/8/3 8:34:00 -- [求助]我有两个显示器，如何分别当前使用的显示器的宽度？ 我用 SysInfo.ScreenWidth 只能获得主屏幕的宽度，当我把软件拖动到另一块屏幕的时候，我想能自动或的该屏幕的宽度 |
| -- 作者：有点蓝 -- 发布时间：2022/8/3 9:02:00 -- http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=144783&skin=0 |
| -- 作者：moseser -- 发布时间：2022/8/3 9:27:00 -- 回复：（有点蓝）http://www.foxtable.com/bbs/dispbb... 那如何判断目前的工作页面是在哪块屏幕上呢？ |
| -- 作者：有点蓝 -- 发布时间：2022/8/3 9:28:00 -- 看2楼链接里的9楼 |
| -- 作者：moseser -- 发布时间：2022/8/3 11:24:00 -- 回复：（有点蓝）看2楼链接里的9楼 看看窗口的位置， msgbox(forms("窗口1").left) msgbox(forms("窗口1").top) 这个没看懂， 我换了窗口 ，弹出来的结果 都是 0
|
| -- 作者：有点蓝 -- 发布时间：2022/8/3 12:09:00 -- 比如屏幕1宽度1000.如果forms("窗口1").left < 1000，说明在屏幕1里，如果forms("窗口1").left大于1000就是在屏幕2里 |
| -- 作者：linyunu1 -- 发布时间：2022/8/3 13:52:00 -- 试试 Dim CurrentScreen As System.Windows.Forms.Screen = System.Windows.Forms.Screen.FromPoint(New System.Drawing.Point(System.Windows.Forms.Cursor.Position.X, System.Windows.Forms.Cursor.Position.Y)) Output.Show( CurrentScreen.WorkingArea.Height) Output.Show( CurrentScreen.WorkingArea.Width) [此贴子已经被作者于2022/8/3 13:52:38编辑过]
|
| -- 作者：moseser -- 发布时间：2022/8/4 14:23:00 -- 回复：（有点蓝）比如屏幕1宽度1000.如果forms("窗口1... 例如，这样的话可能就只是适应我自己的电脑了，我交给别人用，可能就不适用了 我的目的是，我在任何电脑上都可以适用 最经常的操作是，打开软件后，我会把软件放在大屏幕上使用，拖到大屏幕的时候，能够自动识别出来这个动作
|
| -- 作者：有点蓝 -- 发布时间：2022/8/4 14:33:00 -- 无法自动。可以启用窗口的计时器，定时判断窗口位置 |
| -- 作者：moseser -- 发布时间：2022/8/4 15:10:00 -- 回复：（有点蓝）无法自动。可以启用窗口的计时器，定... 如何启用？ |