AutoIt Info Tool zeigt andere Größe an, als WinGetPos()

**Bitnugger**

Kann mir bitte mal jemand erklären, wieso das AutoIt Info Tool eine andere Größe anzeigt, als die Funktion WinGetPos()?

AutoIt

;-- TIME_STAMP   2018-07-17 17:23:54   v 0.1

#include <GUIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Array.au3>

_Example()

Func _Example()
    #Region - GUI Create
    Local $hWnd = GUICreate('WinPos')
    Local $idLabel_WP = GUICtrlCreateLabel('', 10, 100, 300, 30)
    GUICtrlSetFont(-1, 14, 800)
    GUISetState()
    #EndRegion

    Local $aWinPos = WinGetPos($hWnd)
    GUICtrlSetData($idLabel_WP, '$aWinPos = ' & _ArrayToString($aWinPos, ', '))

    #Region - GUI SwitchLoop
    While True
        Switch GUIGetMsg()
            Case $GUI_EVENT_CLOSE
                Exit
        EndSwitch
    WEnd
    #EndRegion
EndFunc  ;==>_Example

Alles anzeigen

pasted-from-clipboard.png

**alpines**

Könnte an deinem Skin liegen, ich benutze den Win7 Standardskin und bei mir stimmen die Werte überein.

Unbenannt.png

**Bitnugger**

Zitat von alpines

Könnte an deinem Skin liegen

Hm, stimmt... liegt am Skin... auf meinem Mini-Server (Windows 7) wird es richtig angezeigt... ist ja wirklich sehr interessant... dadurch ergeben sich zwei Fragen:

Wie kommt das AutoIt Info Tool an die korrekte Größe?
Wieso zeigt WinGetPos() nicht die korrekte Größe an?

**autoiter**

Ich habe mal Funktionen geschrieben, mit denen ich bestimmte Controls in fremden Anwendungsfenstern markieren wollte. Da ist mir auch aufgefallen, dass die Werte nicht stimmten. Die Markierungen waren alle verschoben.

Geholfen hat mir die Addition des Rahmens und der Höhe zu den Werten, die mir WinGetPos geliefert hat (_WinAPI_GetSystemMetrics($SM_CYCAPTION) und _WinAPI_GetSystemMetrics($SM_CXDLGFRAME)).

**Bitnugger**

Danke autoiter, aber _WinAPI_GetSystemMetrics() hilft mir da auch nicht weiter, weil ich für jedes Fenster/Programm einen anderen Skin verwenden kann und mir _WinAPI_GetSystemMetrics() nur die Werte liefert, die der aktuelle Default-Skin hat. Ich versuche es gerade mit der Funktion _WinAPI_GetWindowInfo()...

**Bitnugger**

Jepp... mit _WinAPI_GetWindowInfo() bekomme ich die korrekte Größe angezeigt...

AutoIt

;-- TIME_STAMP   2018-07-17 19:27:24   v 0.1

#Region    ;************ Includes ************
#Include <WinAPISysWin.au3>
;~ #Include <WindowsConstants.au3>;~~~
#Include <WinAPIGdi.au3>
#include <GUIConstantsEx.au3>
#include <Array.au3>
#EndRegion ;************ Includes ************

_Example()

Func _Example()
    #Region - GUI Create
    Local $hWnd = GUICreate('WinPos')
    Local $idLabel_WP = _CreateLabel('', 10,  0, 380, 30)
    Local $idLabel_WI = _CreateLabel('', 10, 50, 380, 30)
    GUISetState()
    #EndRegion

    Local $aWinPos     = WinGetPos($hWnd)

    Local $tWindowInfo = _WinAPI_GetWindowInfo($hWnd)
;~     Press Ctrl+Shift+O --> https://msdn.microsoft.com/de-de/library/windows/desktop/ms632610(v=vs.85).aspx
;~     ConsoleWrite('$tagWindowInfo = ' & $tagWindowInfo & @CRLF)
    Local $tWindow     = DllStructCreate($tagRECT, DllStructGetPtr($tWindowInfo, 'rWindow')) ; rcWindow = rWindow
    Local $aWindow     = _WinAPI_GetPosFromRect($tWindow)

    GUICtrlSetData($idLabel_WP, '$aWinPos     = ' & _ArrayToString($aWinPos, ', '))
    GUICtrlSetData($idLabel_WI, '$aWindow     = ' & _ArrayToString($aWindow, ', '))

    #Region - GUI SwitchLoop
    While True
        Switch GUIGetMsg()
            Case $GUI_EVENT_CLOSE
                Exit
        EndSwitch
    WEnd
    #EndRegion
EndFunc  ;==>_Example

Func _CreateLabel($sText, $x, $y, $w, $h, $iSize = 14, $iWeight = 800, $iAttribute = 0, $sFontName = 'Courier New', $iQuality = 2)
    Local $idLabel = GUICtrlCreateLabel($sText, $x, $y, $w, $h)
    GUICtrlSetFont(-1, $iSize, $iWeight, $iAttribute, $sFontName, $iQuality)
    Return $idLabel
EndFunc

Alles anzeigen

pasted-from-clipboard.png

**autoiter**

Gut zu wissen!