#include <GUIConstants.au3>
#Include <Misc.au3>
;===========================================================
;
;AutoIt Colors
;Made by hauke96
;AutoIt Version: 3.3.6.1
;Sprache: Deutsch
;Um das Programm sichtar zu machen, drücken sie: NUM
;
;Programm Version: 1.1
;
;===========================================================

$var = 0

while 1
	$msg = GUIGetMsg()
	Select
		case $msg = $GUI_EVENT_CLOSE
		$var = 0
		guidelete()
	case _IsPressed(90)
		if $var = 0 Then
		GUICreate("AutoIt Colors", 230, 305)
GUICtrlCreateLabel("Wichtige Farben:", 10, 10)
$weiss = GUICtrlCreateGraphic(10, 40, 15, 15)
GUICtrlSetBkColor(-1,0xFFFFFF)
GUICtrlSetColor(-1,0x000000)
GUICtrlCreateInput("0xFFFFFF", 40, 38, 100, 20)
GUICtrlCreateLabel("Weiß", 150, 40)
$Gelb = GUICtrlCreateGraphic(10, 70, 15, 15)
GUICtrlSetBkColor(-1,0xFFFF00)
GUICtrlSetColor(-1,0x000000)
GUICtrlCreateInput("0xFFFF00", 40, 68, 100, 20)
GUICtrlCreateLabel("Gelb", 150, 70)
$Orange = GUICtrlCreateGraphic(10, 100, 15, 15)
GUICtrlSetBkColor(-1,0xFF8600)
GUICtrlSetColor(-1,0x000000)
GUICtrlCreateInput("0xFF8600", 40, 98, 100, 20)
GUICtrlCreateLabel("Orange", 150, 100)
$Rot = GUICtrlCreateGraphic(10, 130, 15, 15)
GUICtrlSetBkColor(-1,0xFF0000)
GUICtrlSetColor(-1,0x000000)
GUICtrlCreateInput("0xFF0000", 40, 128, 100, 20)
GUICtrlCreateLabel("Rot", 150, 130)
$Lila = GUICtrlCreateGraphic(10, 160, 15, 15)
GUICtrlSetBkColor(-1,0xDC00C8)
GUICtrlSetColor(-1,0x000000)
GUICtrlCreateInput("0xDC00C8", 40, 158, 100, 20)
GUICtrlCreateLabel("Lila", 150, 160)
$Blau = GUICtrlCreateGraphic(10, 190, 15, 15)
GUICtrlSetBkColor(-1,0x0000FF)
GUICtrlSetColor(-1,0x000000)
GUICtrlCreateInput("0x0000FF", 40, 188, 100, 20)
GUICtrlCreateLabel("Blau", 150, 190)
$Gruen = GUICtrlCreateGraphic(10, 220, 15, 15)
GUICtrlSetBkColor(-1,0x00FF00)
GUICtrlSetColor(-1,0x000000)
GUICtrlCreateInput("0x00FF00", 40, 218, 100, 20)
GUICtrlCreateLabel("Grün", 150, 220)
$Schwarz = GUICtrlCreateGraphic(10, 250, 15, 15)
GUICtrlSetBkColor(-1,0x000000)
GUICtrlSetColor(-1,0x000000)
GUICtrlCreateInput("0x000000", 40, 248, 100, 20)
GUICtrlCreateLabel("Schwarz", 150, 250)
guisetstate()
$var = 1
EndIf
case _IsPressed("1B")
	ExitLoop
	Exit
	EndSelect
WEnd