Fehler beim Programmieren von Zeit und Datum

  • Hey leute,


    ich habe hier ein kleines Test Programm gemacht um Datum und die Aktuelle Uhrzeit anzeigen zu lassen.
    Auf meinem XP Rechner geht es aber bei Vista nicht....
    Wieso das?


    Hier mal der Code

    #include <GUIConstants.au3>


    $Form1 = GUICreate("Zeit & Datum by Michi2q", 367, 172, 198, 151)
    GUISetIcon("C:\Users\Michi\Desktop\ICO\My Computer No Wallpaper.ico")
    GUISetCursor (3)
    GUISetBkColor(0x0066CC)
    $Label1 = GUICtrlCreateLabel("Zeit:", 8, 8, 29, 20)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    GUICtrlSetColor(-1, 0xA0A0A4)
    $Group2 = GUICtrlCreateGroup("", 8, 96, 337, 49)
    $Label5 = GUICtrlCreateLabel("Heute ist der : " &@MDAY &"."&@MON &"."&@YEAR, 16, 112, 189, 24)
    GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
    GUICtrlSetColor(-1, 0xC0DCC0)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $Group1 = GUICtrlCreateGroup("", 8, 24, 337, 49)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    GUICtrlSetColor(-1, 0xA0A0A4)
    $Label4 = GUICtrlCreateLabel("Es ist: "&@HOUR &":"&@MIN &":"&@SEC, 16, 40, 119, 24)
    GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
    GUICtrlSetColor(-1, 0xC0DCC0)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $Label2 = GUICtrlCreateLabel("Datum", 8, 80, 43, 20)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    GUICtrlSetColor(-1, 0xA0A0A4)
    $Label3 = GUICtrlCreateLabel("by Zero2q", 8, 152, 55, 17)
    GUICtrlSetFont(-1, 9, 400, 0, "MS Sans Serif")
    GUICtrlSetColor(-1, 0xC8C8C8)
    GUISetState(@SW_SHOW)


    $start=timerinit()
    While 1
    $g=guigetmsg()
    if $g=-3 then exit
    if timerdiff($start)>=1000 then
    $start=timerinit()
    GUICtrlSetData($label4,"Es ist: "&@HOUR &":"&@MIN &":"& @[user]sec[/user])
    endif
    WEnd

  • bei mir (W7) kommt eine Fehlermeldung betreffend Zeile 36:
    GUICtrlSetData($label4,"Es ist: "&@HOUR &":"&@MIN &":"& @[user]sec[/user])



    Meldung:

  • achso ok :rolleyes:
    Also bei mir tut es jetzt auch, sieht gut aus und läuft perfekt..
    Vielleicht unterschiedliche Autoit-Versionen auf beiden Rechnern?
    Compile es doch mal zur .exe und versuchs dann mal...

  • Danke super Funktioniert auch jetzt bei Vista... :thumbup:


    Edit:
    ist eigentlich die selbe Version von AutoIt...


  • #include <GUIConstants.au3>


    $Form1 = GUICreate("Zeit & Datum by Michi2q", 367, 172, 198, 151)
    GUISetIcon("C:\Users\Michi\Desktop\ICO\My Computer No Wallpaper.ico")
    GUISetCursor (3)
    GUISetBkColor(0x0066CC)
    $Label1 = GUICtrlCreateLabel("Zeit:", 8, 8, 29, 20)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    GUICtrlSetColor(-1, 0xA0A0A4)
    $Group2 = GUICtrlCreateGroup("", 8, 96, 337, 49)
    $Label5 = GUICtrlCreateLabel("Heute ist der : " &@MDAY &"."&@MON &"."&@YEAR, 16, 112, 189, 24)
    GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
    GUICtrlSetColor(-1, 0xC0DCC0)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $Group1 = GUICtrlCreateGroup("", 8, 24, 337, 49)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    GUICtrlSetColor(-1, 0xA0A0A4)
    $Label4 = GUICtrlCreateLabel("Es ist: "&@HOUR &":"&@MIN &":"&@SEC, 16, 40, 119, 24)
    GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
    GUICtrlSetColor(-1, 0xC0DCC0)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $Label2 = GUICtrlCreateLabel("Datum", 8, 80, 43, 20)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    GUICtrlSetColor(-1, 0xA0A0A4)
    $Label3 = GUICtrlCreateLabel("by Zero2q", 8, 152, 55, 17)
    GUICtrlSetFont(-1, 9, 400, 0, "MS Sans Serif")
    GUICtrlSetColor(-1, 0xC8C8C8)
    GUISetState(@SW_SHOW)


    $start=timerinit()
    While 1
    $g=guigetmsg()
    if $g=-3 then exit
    if timerdiff($start)>=1000 then
    $start=timerinit()
    GUICtrlSetData($label4,"Es ist: "&@HOUR &":"&@MIN &":"& @sec)
    endif
    WEnd


    Diese zeile:
    $start=timerinit()
    GUICtrlSetData($label4,"Es ist: "&@HOUR &":"&@MIN &":"& @sec)
    endif
    WEnd


    Sah vorher so aus:
    $start=timerinit()
    GUICtrlSetData($label4,"Es ist: "&@HOUR &":"&@MIN &":"& @[user]sec[/user])
    endif
    WEnd