Aktuelle Uhrzeit

  • Hab versuch das hin zu bekommen das die aktuelle uhrzeit angezeigt wird, aber ich bekomme nur die msg hin ich wolte gerne das in das eine fenster wo uhrzeit drin steht da die aktuelle uhr zeit drin steht

    einmal Deutsche Zeit und (zb. 15:00 )
    einmal Koreanische ( 23:00 )

    wäre das möglich so untereinander ich weiß cniht ob das gehtr darum frag ich lieber

    [autoit]

    #include <Date.au3>
    #include <GUIConstants.au3>

    [/autoit][autoit][/autoit][autoit]

    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("AForm1", 157, 60, 193, 115)
    $Group1 = GUICtrlCreateGroup(" Uhrzeit ", 8, 8, 137, 41)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    MsgBox(0,'',"The time is:" & _NowTime())

    [/autoit][autoit][/autoit][autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

    [/autoit][autoit][/autoit][autoit]

    EndSwitch
    WEnd

    [/autoit]

    2 Mal editiert, zuletzt von bernd670 (7. Dezember 2007 um 19:13)

  • guck dir mal @hour @min und @sec an ;)

    [autoit]

    msgbox(0,"tile","es ist gerade: " @hour & ":" & @min & ":" & @sec)

    [/autoit]
  • habs mia angeschaut aber hab kein plan finde keine beispiele wenn es vlt beispiele geben würde oder so
    hauptsache die uhr läuft ohne messagebox

    und sry ich kenn mcih ncoh nciht so gut mit AutoIt aus

    hat jemand vlt beispiele

  • Wenns dir hilft hier rein Beispiel ^^

    [autoit]

    #include

    [/autoit][autoit][/autoit][autoit]

    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Aktuelle Zeit", 300, 87, 193, 115)
    GUISetBkColor(0x000000)
    $Input1 = GUICtrlCreateInput("TAG", 8, 8, 113, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    GUICtrlSetColor(-1, 0x00FF00)
    GUICtrlSetBkColor(-1, 0x000000)
    $Input2 = GUICtrlCreateInput("TAG", 128, 8, 33, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    GUICtrlSetColor(-1, 0x00FF00)
    GUICtrlSetBkColor(-1, 0x000000)
    $Input3 = GUICtrlCreateInput("Monat", 168, 8, 33, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    GUICtrlSetColor(-1, 0x00FF00)
    GUICtrlSetBkColor(-1, 0x000000)
    $Input4 = GUICtrlCreateInput("Jahr", 208, 8, 57, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    GUICtrlSetColor(-1, 0x00FF00)
    GUICtrlSetBkColor(-1, 0x000000)
    $Input5 = GUICtrlCreateInput("Stunde", 8, 48, 33, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    GUICtrlSetColor(-1, 0x00FF00)
    GUICtrlSetBkColor(-1, 0x000000)
    $Input6 = GUICtrlCreateInput(":", 48, 48, 17, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    GUICtrlSetColor(-1, 0x00FF00)
    GUICtrlSetBkColor(-1, 0x000000)
    $Input7 = GUICtrlCreateInput("Minute", 72, 48, 33, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    GUICtrlSetColor(-1, 0x00FF00)
    GUICtrlSetBkColor(-1, 0x000000)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    [/autoit][autoit][/autoit][autoit]

    While 1
    If @WDAY = 1 Then
    $d = "Montag"
    ElseIf @WDAY = 2 Then
    $d = "Dienstag"
    ElseIf @WDAY = 3 Then
    $d = "Mittwoch"
    ElseIf @WDAY = 4 Then
    $d = "Donnerstag"
    ElseIf @WDAY = 5 Then
    $d = "Freitag"
    ElseIf @WDAY = 6 Then
    $d = "Samstag"
    ElseIf @WDAY = 7 Then
    $d = "Sonntag"
    EndIf
    GUICtrlSetData($Input1,$d)
    GUICtrlSetData($Input2,@MDAY)
    GUICtrlSetData($Input3,@MON)
    GUICtrlSetData($Input4,@YEAR)
    GUICtrlSetData($Input5,@HOUR)
    GUICtrlSetData($Input6,@MIN)
    GUICtrlSetData($Input7,@SEC)
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    sleep(1000)
    EndSwitch
    WEnd

    [/autoit]


    gruß
    Carsten
    </GUIConstants.au3>

    2 Mal editiert, zuletzt von Carsten8 (11. Dezember 2007 um 20:28)

  • genau sowas ich hatte mia das nur als schlichte version vorgestellt aber das ist ja schon gepimpt danke

    das ist echt gut aber wie kann man das ncoh so machen das es ncoh ein uhr gibt die ander ist die muss 8 std vor gehen als die deutsche zeit

  • das ist echt gut aber wie kann man das ncoh so machen das es ncoh ein uhr gibt die ander ist die muss 8 std vor gehen als die deutsche zeit

  • das ist denk ich mal etwas schwerer zu machen. mit @hour usw wird man das denke ich mal nicht so leicht hinbekommen.

    man könnte zwar @hour - 8 rechnen bin mir aber nicht sicher ob das so ohne weiteres möglich ist und auch funktioniert.

  • mhh okay mal schaun ob jemand hier ist und sich damit vlt auskennt sonst bedank ich mich schon mal für eure hilfe

  • ich kenn mich damit auch aus...das ist ja nicht das problem^^

    ich hab lediglich grad keine zeit um das zu machen.

    aber noch ein kleiner tipp falls du es selber versuchen willst:
    ich würde das mit ner func machen.
    die func muss wenn es in deutschland 1 uhr ist nicht 1-8 = -7 rechnen sondern 1-8 = 17. weil negertiv zeiten gibt es ja nicht ;)

    EDIT: war pee wohl shcneller :( und ne bessere lösung hat er auch. ;)

  • okay werde ich mal schaun ob ich das hin bekomme aber ich vermute nicht mal schaun und das mit

    Mod(@Hour + 16, 24)


    versteh ich leider nicht

    • Offizieller Beitrag

    +16 war falsch (wäre Zeit 8 Stunden hinter D), +8 sollte passen.

    Erklärung ist die Modulo-Funktion (siehe Wiki), Beispiel:
    5 + 16 = 21 mod 24 = 21
    7 + 16 = 23 mod 24 = 23
    8 + 16 = 24 mod 24 = 0
    12 + 16 = 28 mod 24 = 4
    23 + 16 = 39 mod 24 = 15

    peethebee

  • @Darki: ich hab mir das auch al eben erklären lass udn hab festgestellt das das gar nicht so schwer is wenn man es erst einmal hat.

    also die modulo-rechnung(mod) gibt den rest einer division zurück, außer wenn der erste wert kleiner als der zweite ist, dann wird der erste wert zurück gegeben.
    vllt kennst du das aus der grundschule..bei der schriftlichen division. 5 / 2 = 2 rest 1 ^^

  • Warum neue Funktionen erfinden, wenn es _DateAdd gibt: 8 Stunden dazu:
    $date = _NowCalc ( )
    $theirdate = _DateAdd("h",8,$date)

    Und Hier die Uhr:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>
    #include <date.au3>

    [/autoit] [autoit][/autoit] [autoit]

    ; GUI-Design by Carsten8

    [/autoit] [autoit][/autoit] [autoit]

    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Aktuelle Zeit", 300, 200, 193, 115)
    GUISetBkColor(0x000000)
    $Input0 = GUICtrlCreateLabel("Zeit in DE", 8, 8, 400, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    GUICtrlSetColor(-1, 0x0000FF)
    GUICtrlSetBkColor(-1, 0x000000)
    $Input1 = GUICtrlCreateLabel("TAG", 8, 30, 400, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    GUICtrlSetColor(-1, 0x00FF00)
    GUICtrlSetBkColor(-1, 0x000000)
    $Input2 = GUICtrlCreateLabel("Stunde", 8, 53, 300, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    GUICtrlSetColor(-1, 0x00FF00)
    GUICtrlSetBkColor(-1, 0x000000)
    $Input3 = GUICtrlCreateLabel("Zeit in Korea", 8, 108, 400, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    GUICtrlSetColor(-1, 0x0000FF)
    GUICtrlSetBkColor(-1, 0x000000)
    $Input4 = GUICtrlCreateLabel("TAG", 8, 130, 400, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    GUICtrlSetColor(-1, 0x00FF00)
    GUICtrlSetBkColor(-1, 0x000000)
    $Input5 = GUICtrlCreateLabel("Stunde", 8, 153, 300, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    GUICtrlSetColor(-1, 0x00FF00)
    GUICtrlSetBkColor(-1, 0x000000)
    #EndRegion ### END Koda GUI section ###
    AdlibEnable("_DateUpdate",500)
    GUISetState()

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd
    Func _DateUpdate()
    $date = _NowCalc ( )
    GUICtrlSetData($Input2,_DateTimeFormat($date,5))
    GUICtrlSetData($Input1, _DateTimeFormat($date,1))
    $theirdate = _DateAdd("h",8,$date)
    GUICtrlSetData($Input5,_DateTimeFormat($theirdate,5))
    GUICtrlSetData($Input4, _DateTimeFormat($theirdate,1))
    EndFunc

    [/autoit]


    Ach ja, ich hab mir die Date.au3 so angepasst, dass sie auch deutsche Tage und Monate anzeigt. Wenn gewünscht bitte melden

  • So ich habs mai jetzt so geaut wie ich es wolte mt der uhr dank eurer hilfe
    aber das problem ist das das meie ganze box und zu flakert wegen der uhr

    ich hab ein tab menu

    kann mia vlt jemand helfen

  • Update die Uhr nicht in der Whileschleife, sondern über AdlibEnable und zwar nur alle 500 Millisekunden, dann flackert sie nicht mehr

  • [autoit]

    #include <date.au3>
    #include <GUIConstants.au3>

    [/autoit][autoit][/autoit][autoit]

    ; GUI-Design by Carsten8

    [/autoit][autoit][/autoit][autoit]

    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Aktuelle Zeit", 300, 200, 193, 115)
    GUISetBkColor(0x000000)
    $Input0 = GUICtrlCreateLabel("Zeit in DE", 8, 8, 400, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    GUICtrlSetColor(-1, 0x0000FF)
    GUICtrlSetBkColor(-1, 0x000000)
    $Input1 = GUICtrlCreateLabel("TAG", 8, 30, 400, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    GUICtrlSetColor(-1, 0x00FF00)
    GUICtrlSetBkColor(-1, 0x000000)
    $Input2 = GUICtrlCreateLabel("Stunde", 8, 53, 300, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    GUICtrlSetColor(-1, 0x00FF00)
    GUICtrlSetBkColor(-1, 0x000000)
    $Input3 = GUICtrlCreateLabel("Zeit in Korea", 8, 108, 400, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    GUICtrlSetColor(-1, 0x0000FF)
    GUICtrlSetBkColor(-1, 0x000000)
    $Input4 = GUICtrlCreateLabel("TAG", 8, 130, 400, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    GUICtrlSetColor(-1, 0x00FF00)
    GUICtrlSetBkColor(-1, 0x000000)
    $Input5 = GUICtrlCreateLabel("Stunde", 8, 153, 300, 30)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    GUICtrlSetColor(-1, 0x00FF00)
    GUICtrlSetBkColor(-1, 0x000000)
    #EndRegion ### END Koda GUI section ###
    AdlibEnable("_DateUpdate",500)
    GUISetState()

    [/autoit][autoit][/autoit][autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd
    Func _DateUpdate()
    $date = _NowCalc ( )
    GUICtrlSetData($Input2,_DateTimeFormat($date,5))
    GUICtrlSetData($Input1, _DateTimeFormat($date,1))
    $theirdate = _DateAdd("h",8,$date)
    GUICtrlSetData($Input5,_DateTimeFormat($theirdate,5))
    GUICtrlSetData($Input4, _DateTimeFormat($theirdate,1))
    EndFunc

    [/autoit]

    wo soll ich das da den einfügen :das AdlibEnable und die 500 millisec

    Zitat

    Update die Uhr nicht in der Whileschleife, sondern über AdlibEnable und zwar nur alle 500 Millisekunden, dann flackert sie nicht mehr

    Einmal editiert, zuletzt von bernd670 (14. Dezember 2007 um 23:47)

  • hmm Das ist doch mein Code oder? Da hab ich das ADLibEnable schon drin. Flackert der Code etwa auch?
    Ich dachte, das hast du in dein eigenes Programm eingebaut wegen dem TabMenu.

    Also, das AdLibEnable ist hier in Zeile 34 und ruft _DateUpdate alle 500ms auf