hallo ich will einen wecker im sithdesign machen das design is noch lange nich fertig doch
ich hab en problem
#include <GUIConstants.au3>
$sithpic = @MyDocumentsDir & "\DarthVaderROTSV1.jpg"
opt("guioneventmode", 1)
GUICreate("Sithwecker by sithlord95", 258, 312, 190, 125)
GUISetBkColor(0x000000)
$Input1 = GUICtrlCreateInput(@HOUR & ":" & @MIN & ":" & @SEC, 0, 24, 209, 21)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label1 = GUICtrlCreateLabel("Trage die Weckzeit ein", 0, 0, 212, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
$Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 120, 80, 17, 17)
$Label4 = GUICtrlCreateLabel("Mit Messagebox?", 0, 56, 212, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label2 = GUICtrlCreateLabel("Mit Beeptönen?", 0, 104, 212, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
$Checkbox2 = GUICtrlCreateCheckbox("Checkbox2", 120, 128, 17, 17)
$Button1 = GUICtrlCreateButton("Starten", 48, 152, 161, 33, 0)
$Pic1 = GUICtrlCreatePic($sithpic, 0, 192, 257, 116)
GUISetState(@SW_SHOW)
$input1 = 0
$Checkbox1 = 0
$Checkbox2 = 0
GUISetOnEvent($Button1, "_start")
guisetonevent($Checkbox1, "_check1")
guisetonevent($Checkbox2, "_check2")
While 1
if $input1 = 1 and guictrlread($input1) = @HOUR & ":" & @MIN & ":" & @SEC Then
if $Checkbox1 = 1 then
msgbox(0, "Weckzeit", "Die Weckzeit ist erreicht ")
elseif $Checkbox2 = 0 then
sleep(1)
endif
if $Checkbox2 = 1 Then
beep(1500,500)
beep(2000,500)
beep(1000,1000)
ElseIf $Checkbox2 = 0 then
sleep(1)
endif
endif
wend
func _start()
$input1 = 1
endfunc
func _check1()
$Checkbox1 = 1
endfunc
func _check2()
$Checkbox2 = 1
endfunc
oder meine 2 möglichkeit die ich versucht habe
[autoit]
#include <GUIConstants.au3>
$sithpic = @MyDocumentsDir & "\DarthVaderROTSV1.jpg"
opt("guioneventmode", 1)
GUICreate("Sithwecker by sithlord95", 258, 312, 190, 125)
GUISetBkColor(0x000000)
$Input1 = GUICtrlCreateInput(@HOUR & ":" & @MIN & ":" & @SEC, 0, 24, 209, 21)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label1 = GUICtrlCreateLabel("Trage die Weckzeit ein", 0, 0, 212, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
$Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 120, 80, 17, 17)
$Label4 = GUICtrlCreateLabel("Mit Messagebox?", 0, 56, 212, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
$Label2 = GUICtrlCreateLabel("Mit Beeptönen?", 0, 104, 212, 17)
GUICtrlSetBkColor(-1, 0xFF0000)
$Checkbox2 = GUICtrlCreateCheckbox("Checkbox2", 120, 128, 17, 17)
$Button1 = GUICtrlCreateButton("Starten", 48, 152, 161, 33, 0)
$Pic1 = GUICtrlCreatePic($sithpic, 0, 192, 257, 116)
GUISetState(@SW_SHOW)
$input1 = 0
$Checkbox1 = 0
$Checkbox2 = 0
GUISetOnEvent($Button1, "_start")
guisetonevent($Checkbox1, "_check1")
guisetonevent($Checkbox2, "_check2")
While 1
if $input1 = 1 and guictrlread($input1) = @HOUR & ":" & @MIN & ":" & @SEC Then
if guictrlread($Checkbox1) = 1 then
msgbox(0, "Weckzeit", "Die Weckzeit ist erreicht ")
endif
if guictrlread($Checkbox2) = 1 Then
beep(1500,500)
beep(2000,500)
beep(1000,1000)
endif
endif
wend
func _start()
$input1 = 1
endfunc
func _check1()
$Checkbox1 = 1
endfunc
func _check2()
$Checkbox2 = 1
endfunc
das script lässt sich starten doch sofort dannach gibt windows einen fehler ka warum
ich hoffei hr könnt mir helfen
MFG SITHLORD95
achja hier das bild damit ich das ding auch starten könnt
in die eigenen dokumente packen bitte