#Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Icon=VanGico100x100.ico #AutoIt3Wrapper_Res_Comment=Gemaakt voor de sortering aan Stuurboord 9, Drachten. #AutoIt3Wrapper_Res_Description=Inrichting Sortering en zeefinstallatie "Kameleonstad", Stuurboord 9 Drachten. #AutoIt3Wrapper_Res_Fileversion=0.1 Beta #AutoIt3Wrapper_Res_LegalCopyright=Theo Van Der Wal, Jan De Schiffart. #AutoIt3Wrapper_Res_Language=1043 #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** #cs ---------------------------------------------------------------------------- AutoIt Version: 3.3.14.2 Author: Theo Van Der Wal Script Function: Sortering "Kameleonstad" Inrichting Leesband #ce ---------------------------------------------------------------------------- ; Script Start - Add your code below here #include #include #include #include #include #Region ### START Koda GUI section ### Form=c:\users\siepie\documents\theolonghair\auto it\van gansewinkel form.kxf $Form1_1 = GUICreate("Van Gansewinkel", 500, 475, 273, 127) GUISetIcon("C:\Users\Siepie\Documents\Theolonghair\auto it\VanGico100x100.ico", -1) $Pic1 = GUICtrlCreatePic("C:\Users\Siepie\Documents\Theolonghair\auto it\vangansewinkellogo.jpg", 399, 0, 100, 72) GUICtrlSetTip(-1, "Kameleonstad") $Tab1 = GUICtrlCreateTab(0, 0, 240, 368) $TabSheet1 = GUICtrlCreateTabItem("Dopjes") $Pic2 = GUICtrlCreatePic("C:\Users\Siepie\Documents\Theolonghair\auto it\dopjes.jpg", 8, 32, 225, 152) $Edit1 = GUICtrlCreateEdit("", 8, 192, 225, 169, BitOR($GUI_SS_DEFAULT_EDIT,$ES_READONLY)) GUICtrlSetData(-1, StringFormat("01 Kurk.\r\n02 Dopjes; Ijzer.\r\n03 Dopjes; Aluminium.\r\n04 Dopjes; Kunststof.\r\n05 Glas; gezeefd.\r\n06 Petfles.\r\n07 Restafval.\r\n08 Non ferro.")) GUICtrlSetTip(-1, "Cycloon afval.") $TabSheet2 = GUICtrlCreateTabItem("Waterbakpuin / Kappa") $Pic3 = GUICtrlCreatePic("C:\Users\Siepie\Documents\Theolonghair\auto it\waterbakpuin.jpg", 8, 32, 225, 152) $Edit2 = GUICtrlCreateEdit("", 8, 192, 225, 169, BitOR($GUI_SS_DEFAULT_EDIT,$ES_READONLY)) GUICtrlSetData(-1, StringFormat("01 Lood.\r\n02 Puin.\r\n03 Ijzer.\r\n04 Pvc.\r\n05 Hout.\r\n06 Zeefzand. \r\n07 Restafval.\r\n08 Non- ferro.\r\n09 Batterij, - en accu"&Chr(39)&"s.\r\n10 Kitkokers.\r\n11 Asbest.")) GUICtrlSetTip(-1, "Gezeefd bouw en sloop.") $TabSheet3 = GUICtrlCreateTabItem("Locatie") GUICtrlSetState(-1,$GUI_SHOW) $Edit3 = GUICtrlCreateEdit("", 8, 24, 225, 337, BitOR($GUI_SS_DEFAULT_EDIT,$ES_CENTER,$ES_READONLY)) GUICtrlSetData(-1, StringFormat("Van Gansewinkel Groep\r\nSortering "&Chr(34)&"Kameleonstad"&Chr(34)&"\r\nStuurboord 9 \r\n\r\nDrachten\r\n")) GUICtrlCreateTabItem("") GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Form1_1 EndSwitch WEnd