☰

Размеры окон в Windows

tag-icon • tag-icon windows window dimensions
Размеры окон в Windows

Как мне получить ширину и высоту окна? Допустим, я, конечный пользователь, открываю Chrome в окне, а затем изменяю его размер. Как мне, конечному пользователю, узнать, насколько велико сейчас окно? Chrome — это всего лишь пример; я ищу, как сделать это с любым приложением в окне.

решение1

Вы можете использовать такой простой инструмент, какWinSpyили инструмент Window Spy, включенный вAutoHotKeyупаковка.

решение2

Вы можете сделать свой собственный

Скопируйте следующие два файла в папку.

Использовать:

GetWindowRect <Title Of Window>

НАПРИМЕР

GetWindowRect Untitled - Notepad

Измените /target:exeна /target:winexe, чтобы сделать программу неконсольной.

REM GetWindowRect.bat
REM This file compiles GetWindowRect.vb to GetWindowRect.exe
REM GetWindowRect.exe reports on Windows position
REM To use 
REM GetWindowRect 
"C:\Windows\Microsoft.NET\Framework\v4.0.30319\vbc.exe" /target:exe /out:"%~dp0\GetWindowRect.exe" "%~dp0\GetWindowRect.vb"
pause

;GetWindowRect.vb
imports System.Runtime.InteropServices 
Public Module GetWindowRect  

     <StructLayout(LayoutKind.Sequential)> _
    Private Structure RECTL     
        Public Left As UInt32
        Public Top As UInt32
        Public Right As UInt32
        Public Bottom As UInt32
    End Structure

    Private Declare Function GetWindowRect Lib "User32" (ByVal hWnd as IntPtr, ByRef Rect as RectL) as Integer
    Public Declare UNICODE Function FindWindowW Lib "user32" (ByVal lpClassName As String, ByVal lpWindowName As String) As IntPtr

    Sub Main
        On Error Resume Next
        Dim hWindows as IntPtr
        Dim Ret as Integer
        hwindows = FindWindowW(vbNullString, Command())
        If hwindows = 0 then
            Msgbox(Command() & " cannot be found.")
        Else
            Dim x as RectL
            Ret = GetWindowRect(hWindows, x)
            If Ret = 0 Then 
                MsgBox("GetWindowRect Error " & Err.LastDllError)
            Else
            'Delete the MsgBox line if using as console program
            Msgbox(x.left & " " & x.top & " " & x.right & " " & x.bottom)
            Console.Writeline(x.left & " " & x.top & " " & x.right & " " & x.bottom)
            End If
        End If
    End Sub

End Module

Также доступно здесь -https://winsourcecode.blogspot.com/2020/01/getwindowrectexe-reports-on-windows.html

решение3

Используйте инструмент «Ножницы», чтобы сделать снимок экрана окна, а затем просмотрите свойства снимка экрана, чтобы узнать размеры окна.

решение4

Мой самый быстрый способ:

  • Alt+Print Screen
  • Откройте Paint и уменьшите Canvas
  • Ctrl+V

Размер окна в строке состояния

Связанный контент