Ich möchte das sich die Uhrzeit ständig aktualisiert
Ich habe es im moment in einer Msgbox stehen also:
[autoit]Msgbox(0, "Uhrzeit", @Hour&" : "&@Min&" : "&@SEC)
[/autoit]So zeigt die Msgbox die Uhrzeit an, wo diese gestartet wurde.
Nun möchte ich das die sekunden, minuten und stunden sich sozusagen immer synchronisieren.
Wie kann man dieses hinbekommen?
Ich würde das mit n GUI machen also n label wo die uhrzeit drinsteht.
LG Nono
Nun möchte ich das die sekunden, minuten und stunden sich sozusagen immer synchronisieren.
IMMER, wohl kaum. 
Aber alle 100 Millisekunden z.B.
#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]$hWnd = GUICreate("Uhrzeit", 100, 30)
$cLabelTime = GUICtrlCreateLabel("", 5, 2, 200, 30)
GUICtrlSetFont(-1, 18)
GUISetState()
$sOldTime = ""
AdlibRegister("_UpdateTime", 100)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Func _UpdateTime()
$sNewTime = @HOUR & ":" & @MIN & ":" & @SEC
If $sNewTime <> $sOldTime Then
GUICtrlSetData($cLabelTime, $sNewTime)
$sOldTime = $sNewTime
EndIf
EndFunc
while Msgbox(0, "Uhrzeit", @Hour&" : "&@Min&" : "&@SEC,1)<>1 ;Msgbox wird jede Sekunde aktualisiert, so lange bis OK gedrückt wird
wend
sry, aber der musste jetzt sein :o)
danke habs jez geschafft =)
[autoit]#include <GUIConstants.au3>
[/autoit][autoit][/autoit][autoit]GUICreate("Uhrzeit", 200, 200, 600, 200)
$Zeit = GUICtrlCreateLabel(@HOUR&" : "&@MIN&" : "&@SEC, 40, 50, 100, 17)
GUISetState(@SW_Show)
[/autoit][autoit][/autoit][autoit]While 1
GUICtrlSetData($Zeit, @HOUR&" : "&@MIN&" : "&@SEC)
$msg = GUIGETMSG()
Switch $msg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Mach es Lieber so dann ruckelt das Label nicht so 
#include <GUIConstants.au3>
#Include <Date.au3>
GUICreate("Uhrzeit", 200, 200, -1, -1)
$Zeit = GUICtrlCreateLabel(_NowTime(), 40, 50, 100, 17)
GUISetState(@SW_Show)
AdlibRegister("_Update", 100)
Func _Update()
GUICtrlSetData($Zeit, _NowTime())
EndFunc
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Beispiel für eine Anzeige nur nach Änderung.
Damit könnte man auch täglich die Zeit mit einem Zeitserver synchronisieren...
#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]GUICreate("Uhrzeit", 200, 200, 600, 200)
$Zeit = GUICtrlCreateLabel("", 40, 50, 100, 17) ;muß nicht vorbelegt sein
GUISetState(@SW_SHOW)
$oldsec = ""
While 1
If $oldsec <> @SEC Then ;Zeit wird nur aktualisiert, wenn @sec sich verändert hat
GUICtrlSetData($Zeit, @HOUR & " : " & @MIN & " : " & @SEC)
$oldsec = @SEC
EndIf
$msg = GUIGetMsg()
Switch $msg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
@tuttifrutti,
wieso updatest du nicht alle 1000ms sondern alle 100ms?
Weiterhin ist die "Date.au3" sicherlich nützlich, aber eine 129kb-UDF einzubinden um im Quellcode 12 Bytes zu sparen?
Außerdem macht _NowTime() nichts anderes als...
Func _NowTime($sType = 3)
If $sType < 3 Or $sType > 5 Then $sType = 3
Return (_DateTimeFormat(@YEAR & "/" & @MON & "/" & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC, $sType))
EndFunc ;==>_NowTime
d.h. je nach Systemzeiteinstellung werden die Sekunden "weggebügelt"! Und es sind nur HH:MM sichtbar....suboptimal!
Ich gebe noch mal meinen Senf dazu
hier ist ein Beispiel von einer sich Aktualiesierenden MsgBox.
[autoit]
#include <Timers.au3>
$hGui = GUICreate("") ; Nur als Dummy
_Timer_SetTimer($hGui,1000,"_UpdateMsgBox")
MsgBox(0,"Aktualisierende MsgBox",@HOUR & ":" & @MIN & ":" & @SEC)
[/autoit][autoit][/autoit][autoit]Func _UpdateMsgBox($hWnd, $Msg, $iIDTimer, $dwTime)
ControlSetText("Aktualisierende MsgBox","","Static1",@HOUR & ":" & @MIN & ":" & @SEC)
EndFunc
Sprenger120: Des sieht bei mir graphisch sehr verbuggt aus.
Sprenger120: Des sieht bei mir graphisch sehr verbuggt aus.
Änder mal das "Static1" zu "Static2"
Ah, Ok, jetzt siehts gut aus 
Das is immer das Problem bei der Methode. Entweder isses Static1 oder 2
Eine Methode um keine Gui (naja eine MsgBox halt) zu verwnden:
Updatebare Msgbox
