Ja genau so heißen die. Danke.
Gut backt to Topic.
Kann mir wer helfen? Hab ich nen Fehler im meinem Tool?
Hier ein neuer Code (hab ihn oben auch geändert):
Spoiler anzeigen
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
;#AutoIt3Wrapper_Icon=shutdown.ico
#AutoIt3Wrapper_Res_Comment=Ein Programm von HDW-Computer-Forum http://www.hdw-computer-forum.de
#AutoIt3Wrapper_Res_Description=by Michi26206
#AutoIt3Wrapper_Res_Fileversion=1.0.0.0
#AutoIt3Wrapper_Res_LegalCopyright=by HDW-Computer-Forum
#AutoIt3Wrapper_Res_Language=1031
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#cs -----------------------------------------------------------------------------------------------------------------------------
USB-LED.exe (C) by Michi26206 - Programm zu, schalten einer LED über Computer
#ce -----------------------------------------------------------------------------------------------------------------------------
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Opt("GUICloseOnESC", 1) ; ESC drücken beendet Programm nicht
;Opt("TrayAutoPause", 0) ; das Script nicht pausieren, wenn auf das Tray-Icon geklickt wird
;Opt("TrayMenuMode", 1) ; kein Defaul-Tray-Menu
Opt("MustDeclareVars", 1) ; Variablen müssen deklariert werden
Global $Maindialog, $title="USB-LED", $version="1.0.0.0", $nMsg, $COMopen
Dim $LED[3][3]
$COMopen = DllCall("ftd2xx.dll", "int", "FT_OPEN", "hwnd", 0)
[/autoit] [autoit][/autoit] [autoit]$Maindialog = GUICreate($title & " " & $version, 200, 200, -1, -1)
GUISetBkColor(0xFFFFFF)
$LED[1][1] = GUICtrlCreateButton("LED ein", 70, 140, 60, 25, 0)
$LED[1][2] = GUICtrlCreateLabel("LED ein", 65, 60, 100, 25)
GUICtrlSetState($LED[1][2], $GUI_HIDE)
GUICtrlSetfont($LED[1][2], 15)
GUICtrlSetColor($LED[1][2], 0x006600)
$LED[2][1] = GUICtrlCreateButton("LED aus", 70, 140, 60, 25, 0)
GUICtrlSetState($LED[2][1], $GUI_HIDE)
$LED[2][2] = GUICtrlCreateLabel("LED aus", 65, 60, 100, 25)
GUICtrlSetFont($LED[2][2], 15)
GUICtrlSetColor($LED[2][2], 0xCC0000)
GUISetState(@SW_SHOW, $Maindialog)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $LED[1][1]
manage_view("ein")
Case $LED[2][1]
manage_view("aus")
DllCall("ftd2xx.dll", "int", "FT_ClrRts", "hwnd",0)
EndSwitch
Sleep(10)
WEnd
Func manage_view($art)
Switch $art
Case "ein"
GUICtrlSetState($LED[2][1], $GUI_SHOW)
GUICtrlSetState($LED[2][2], $GUI_HIDE)
GUICtrlSetState($LED[1][1], $GUI_HIDE)
GUICtrlSetState($LED[1][2], $GUI_SHOW)
Case "aus"
GUICtrlSetState($LED[1][1], $GUI_SHOW)
GUICtrlSetState($LED[1][2], $GUI_HIDE)
GUICtrlSetState($LED[2][1], $GUI_HIDE)
GUICtrlSetState($LED[2][2], $GUI_SHOW)
EndSwitch
EndFunc ;==>mange_view
Michi26206