#include <FileConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Local $hGUI = GUICreate("Инфа о компе", 500, 400)
Local $iddata =    GUICtrlCreateLabel("Имя компьтера пока не считано", 0,0,500,50)
GUICtrlSetFont($iddata,20)
Local $iddata_2 =    GUICtrlCreateLabel("Ширина экрана пока не считана", 0,100,500,50)
GUICtrlSetFont($iddata_2,20)
Local $iddata_3 =    GUICtrlCreateLabel("Высота экрана пока не считана", 0,200,500,50)
GUICtrlSetFont($iddata_3,20)
Local $idbutton1 = GUICtrlCreateButton("Получить данные", 0, 350, 185, 25)

GUISetState(@SW_SHOW, $hGUI)

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
Case $idbutton1
GUICtrlSetData( $iddata,@ComputerName)
GUICtrlSetData( $iddata_2,@DesktopWidth)
GUICtrlSetData( $iddata_3,@DesktopHeight)

EndSwitch
WEnd