Hio zusammen
Ich habe wieder ein neues Problem xD
wie erstelle ich ein Input wo man die Uhrzeit einstellen kann?
habe schon in de rhilfe rumgesearched aba das war dann noch nix
hoffe ihr könnt mia wieder helfen =)
Hio zusammen
Ich habe wieder ein neues Problem xD
wie erstelle ich ein Input wo man die Uhrzeit einstellen kann?
habe schon in de rhilfe rumgesearched aba das war dann noch nix
hoffe ihr könnt mia wieder helfen =)
Willst du die Systemzeit verändern oder möchtest du etwas erstellen das wie ein Timer ist?
Ich würde einfach 3 Combos erstellen in der man die Stunde, die Minute und die Sekunden eingeben kann und die 3 Sachen einfach in Variablen speichern.
ne will nich die Systemzeit ändern
will nur eine Zeitabfrage erstellen
und danke so mache ich es =)
Bitte bitte, wir helfen hier doch immer gern
oder so:
Func Example2()
Local $n, $msg
GUICreate("My GUI get time")
$n = GUICtrlCreateDate("", 20, 20, 70, 20, $DTS_TIMEFORMAT)
GUISetState()
; Run the GUI until the dialog is closed
Do
$msg = GUIGetMsg()
Until $msg = $GUI_EVENT_CLOSE
MsgBox(0, "Time", GUICtrlRead($n))
GUIDelete()
EndFunc ;==>Example2
danke danke =)
so sieht mein jetziger script aus nur funst der button nich nur bei meinen anderen scripts geht das so auch imma so oO
#include <EditConstants.au3>
#include <GUIConstants.au3>
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#Include <Date.au3>
$GUI = GUICreate("Planer", 200,330 )
GUICtrlCreateLabel("Bitte Wählen Sie ein Datum aus:",25,20)
$date = GUICtrlCreateDate("",10,40,180)
GUICtrlCreateLabel("Uhrzeit wann Erinnern",10,73)
$stunden = GUICtrlCreateInput("HH",116,70,24,20,$ES_NUMBER)
$minuten = GUICtrlCreateInput("MM",140,70,24,20,$ES_NUMBER)
$sekunden = GUICtrlCreateInput("SS",164,70,24,20,$ES_NUMBER)
GUICtrlCreateLabel("Tätigkeit = ",20,120)
$ttk = GUICtrlCreateCombo("auswählen...",75,117,100)
GUICtrlSetData(-1,"auswählen...|Nachricht|anderes")
$nName = GUICtrlCreateInput("",30,150,140,20)
$nEreignis = GUICtrlCreateInput("", 30,180,140,20)
$nExtra = GUICtrlCreateInput("",30,210,140,70)
;groups
GUICtrlCreateGroup("", 5, 5, 190, 95)
GUICtrlCreateGroup("", 5, 95, 190, 200)
$probe=GUICtrlCreateButton("Save",0,300,200,30)
GUICtrlSetOnEvent($probe, "Save2")
GUISetState(@SW_SHOW)
Func Save2()
IniWrite("Termine.ini", "Datum", "", GUICtrlRead($date))
IniWrite("Termine.ini", "Stunden", "", GUICtrlRead($stunden))
IniWrite("Termine.ini", "Minuten", "", GUICtrlRead($minuten))
IniWrite("Termine.ini", "Sekunden", "", GUICtrlRead($sekunden))
IniWrite("Termine.ini", "Was?", "", GUICtrlRead($ttk))
IniWrite("Termine.ini", "Name", "", GUICtrlRead($nName))
IniWrite("Termine.ini", "Eriegnis", "", GUICtrlRead($nEreignis))
IniWrite("Termine.ini", "Extra Angaben", "", GUICtrlRead($nExtra))
If @error = 1 Then
MsgBox(4096,"","Speichern abgebrochen.")
EndIf
If not @error Then
MsgBox(4096,"Planer","Einstellungen Gespeichert")
EndIf
EndFunc
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $ttk
If GUICtrlRead($ttk) = "auswählen..." Then
GUICtrlSetData($nName,"")
GUICtrlSetData($nEreignis,"")
GUICtrlSetData($nExtra,"")
EndIf
If GUICtrlRead($ttk) = "Nachricht" Then
GUICtrlSetData($nName,"")
GUICtrlSetData($nEreignis,"")
GUICtrlSetData($nExtra,"")
GUICtrlSetData($nName,"Name der Person")
GUICtrlSetData($nEreignis,"Ereignis")
GUICtrlSetData($nExtra,"Extra angaben")
EndIf
EndSwitch
WEnd
wenn ich das dann mit
Opt("GUIOnEventMode", 1)
mache gehen meine anderen sachen nich mehr =)
muss ich script wieder rebeabrieten oda hat jemand ne lösung
Das kann auch nicht gehen . Du benutzt für den Button GuiCtrlSetOnEvent hast aber den OnEventMode nicht aktiviert.
#include <EditConstants.au3>
#include <GUIConstants.au3>
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <Date.au3>
$GUI = GUICreate("Planer", 200, 330)
GUICtrlCreateLabel("Bitte Wählen Sie ein Datum aus:", 25, 20)
$date = GUICtrlCreateDate("", 10, 40, 180)
GUICtrlCreateLabel("Uhrzeit wann Erinnern", 10, 73)
$stunden = GUICtrlCreateInput("HH", 116, 70, 24, 20, $ES_NUMBER)
$minuten = GUICtrlCreateInput("MM", 140, 70, 24, 20, $ES_NUMBER)
$sekunden = GUICtrlCreateInput("SS", 164, 70, 24, 20, $ES_NUMBER)
GUICtrlCreateLabel("Tätigkeit = ", 20, 120)
$ttk = GUICtrlCreateCombo("auswählen...", 75, 117, 100)
GUICtrlSetData(-1, "auswählen...|Nachricht|anderes")
$nName = GUICtrlCreateInput("", 30, 150, 140, 20)
$nEreignis = GUICtrlCreateInput("", 30, 180, 140, 20)
$nExtra = GUICtrlCreateInput("", 30, 210, 140, 70)
;groups
GUICtrlCreateGroup("", 5, 5, 190, 95)
GUICtrlCreateGroup("", 5, 95, 190, 200)
$probe = GUICtrlCreateButton("Save", 0, 300, 200, 30)
GUISetState(@SW_SHOW)
Func Save2()
IniWrite("Termine.ini", "Datum", "", GUICtrlRead($date))
IniWrite("Termine.ini", "Stunden", "", GUICtrlRead($stunden))
IniWrite("Termine.ini", "Minuten", "", GUICtrlRead($minuten))
IniWrite("Termine.ini", "Sekunden", "", GUICtrlRead($sekunden))
IniWrite("Termine.ini", "Was?", "", GUICtrlRead($ttk))
IniWrite("Termine.ini", "Name", "", GUICtrlRead($nName))
IniWrite("Termine.ini", "Eriegnis", "", GUICtrlRead($nEreignis))
IniWrite("Termine.ini", "Extra Angaben", "", GUICtrlRead($nExtra))
If @error = 1 Then
MsgBox(4096, "", "Speichern abgebrochen.")
EndIf
If Not @error Then
MsgBox(4096, "Planer", "Einstellungen Gespeichert")
EndIf
EndFunc ;==>Save2
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $probe
Save2()
Case $GUI_EVENT_CLOSE
Exit
Case $ttk
If GUICtrlRead($ttk) = "auswählen..." Then
GUICtrlSetData($nName, "")
GUICtrlSetData($nEreignis, "")
GUICtrlSetData($nExtra, "")
EndIf
If GUICtrlRead($ttk) = "Nachricht" Then
GUICtrlSetData($nName, "")
GUICtrlSetData($nEreignis, "")
GUICtrlSetData($nExtra, "")
GUICtrlSetData($nName, "Name der Person")
GUICtrlSetData($nEreignis, "Ereignis")
GUICtrlSetData($nExtra, "Extra angaben")
EndIf
EndSwitch
WEnd
Habe die Buttonabfrage in deinen MessageLoop geschrieben .
joa ahtte ich auch schon probiert aba jetzt funst die "Nachricht" nicht mehr =)
Das liegt daran das du 2 mal Auswählen in der Combo hast .
#include <EditConstants.au3>
#include <GUIConstants.au3>
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <Date.au3>
$GUI = GUICreate("Planer", 200, 330)
GUICtrlCreateLabel("Bitte Wählen Sie ein Datum aus:", 25, 20)
$date = GUICtrlCreateDate("", 10, 40, 180)
GUICtrlCreateLabel("Uhrzeit wann Erinnern", 10, 73)
$stunden = GUICtrlCreateInput("HH", 116, 70, 24, 20, $ES_NUMBER)
$minuten = GUICtrlCreateInput("MM", 140, 70, 24, 20, $ES_NUMBER)
$sekunden = GUICtrlCreateInput("SS", 164, 70, 24, 20, $ES_NUMBER)
GUICtrlCreateLabel("Tätigkeit = ", 20, 120)
$ttk = GUICtrlCreateCombo("auswählen...", 75, 117, 100)
GUICtrlSetData(-1, "Nachricht|anderes")
$nName = GUICtrlCreateInput("", 30, 150, 140, 20)
$nEreignis = GUICtrlCreateInput("", 30, 180, 140, 20)
$nExtra = GUICtrlCreateInput("", 30, 210, 140, 70)
;groups
GUICtrlCreateGroup("", 5, 5, 190, 95)
GUICtrlCreateGroup("", 5, 95, 190, 200)
$probe = GUICtrlCreateButton("Save", 0, 300, 200, 30)
GUISetState(@SW_SHOW)
Func Save2()
IniWrite("Termine.ini", "Datum", "", GUICtrlRead($date))
IniWrite("Termine.ini", "Stunden", "", GUICtrlRead($stunden))
IniWrite("Termine.ini", "Minuten", "", GUICtrlRead($minuten))
IniWrite("Termine.ini", "Sekunden", "", GUICtrlRead($sekunden))
IniWrite("Termine.ini", "Was?", "", GUICtrlRead($ttk))
IniWrite("Termine.ini", "Name", "", GUICtrlRead($nName))
IniWrite("Termine.ini", "Eriegnis", "", GUICtrlRead($nEreignis))
IniWrite("Termine.ini", "Extra Angaben", "", GUICtrlRead($nExtra))
If @error = 1 Then
MsgBox(4096, "", "Speichern abgebrochen.")
EndIf
If Not @error Then
MsgBox(4096, "Planer", "Einstellungen Gespeichert")
EndIf
EndFunc ;==>Save2
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $probe
Save2()
Case $GUI_EVENT_CLOSE
Exit
Case $ttk
If GUICtrlRead($ttk) = "auswählen..." Then
GUICtrlSetData($nName, "")
GUICtrlSetData($nEreignis, "")
GUICtrlSetData($nExtra, "")
EndIf
If GUICtrlRead($ttk) = "Nachricht" Then
GUICtrlSetData($nName, "")
GUICtrlSetData($nEreignis, "")
GUICtrlSetData($nExtra, "")
GUICtrlSetData($nName, "Name der Person")
GUICtrlSetData($nEreignis, "Ereignis")
GUICtrlSetData($nExtra, "Extra angaben")
EndIf
EndSwitch
WEnd
joa ahtte ich auch schon probiert aba jetzt funst die "Nachricht" nicht mehr =)
ah shit sry geh doch hatte nur vergessen was um zu schreiben sry nochma.....
typischer fehler durch fehlender konzentration sry
joa daran lag es
echt fetten dank =)