Files
aufmass-web/_legacy/_tools/ZwischenablageTest.au3

46 lines
1.8 KiB
AutoIt

;ZwischenablageTest.au3
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$hGui = GUICreate("Erweiterte GUI", 701, 501, 192, 125)
$hTab = GUICtrlCreateTab(10, 10, 680, 480)
GUICtrlCreateTabItem("Doku")
$hGroup = GUICtrlCreateGroup("Dokumentation", 16, 67, 420, 176)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateLabel("MP- Einarbeitung von Gelände/Gebäude:", 26, 87, 200, 20)
$tab_doku_txt_lang = GUICtrlCreateInput("", 236, 87, 44, 22)
$tab_doku_txt_breit = GUICtrlCreateInput("", 290, 87, 44, 22)
GUICtrlCreateLabel("Dokumentation von Cu/Gf HK-Trassen:", 26, 119, 200, 20)
$tab_doku_txt_m_hktr = GUICtrlCreateInput("", 236, 119, 44, 22)
GUICtrlCreateLabel("Dokumentation von Cu/Gf VzK-Trassen:", 26, 151, 200, 20)
$tab_doku_txt_m_vzktr = GUICtrlCreateInput("", 236, 151, 44, 22)
$tab_doku_chb_dokGeh = GUICtrlCreateCheckbox("Dokumentation von Gehäusen", 26, 215, 200, 20)
GUICtrlCreateLabel("Dokumentation Gf-Hausanschluss:", 26, 183, 200, 20)
$tab_doku_txt_anzGFHaus = GUICtrlCreateInput("", 236, 183, 44, 22)
$Label1 = GUICtrlCreateLabel("Länge x Breite", 344, 88, 74, 18)
$Label2 = GUICtrlCreateLabel("Meter", 288, 120, 31, 18)
$Label3 = GUICtrlCreateLabel("Meter", 289, 151, 31, 18)
$Label4 = GUICtrlCreateLabel("Stück", 290, 183, 31, 18)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$tab_doku_bt_add = GUICtrlCreateButton("Hinzufügen", 14, 279, 100, 30)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$tab_doku_bt_zuruck = GUICtrlCreateButton("Zurücksetzen", 120, 279, 100, 30)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd