GUI statusbar / progressbar

  • Hallo wie schaff ich es das sich die ersten 2 progressbar von links nach rechts bewegen und die letzten 2 von rechts nach links bewegen :( bewegen sich alle 4 von links nach rechts bekomm einfach nicht raus wie es umgekehrt geht :(


    Spoiler anzeigen


    Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

    Spoiler anzeigen
    [autoit]


    $passwort0001 = ""
    $passwort0002 = 0
    $programmname = "Programmname"
    $programmversion = "0.0.0.1"
    $programmierer = "S.C."
    $guicreatex = 500
    $guicreatey = 500
    For $passwort0003 = 1 To 1 Step -1
    If InputBox("Passwort","Bitte Passwort eingeben" & @CRLF & "Sie haben noch " & $passwort0003 & " Versuche","","*") <> $passwort0001 Then
    ContinueLoop
    Else
    $passwort0002 = 1
    ExitLoop
    EndIf
    Next
    If $passwort0002 = 0 Then Exit MsgBox (262144+16, "Fehler", "Es wurde das falsche Passwort eingegeben!") & MsgBox (262144+16, "Fehler", "Das Programm wird beendet!")

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

    #include <GuiConstantsEx.au3>
    #include <GuiMenu.au3>
    #include <GuiStatusBar.au3>
    #include <ComboConstants.au3>
    #include <WinAPI.au3>
    #include <EditConstants.au3>
    #include <WindowsConstants.au3>
    #include <Date.au3>
    #include <DateTimeConstants.au3>
    #include <ProgressConstants.au3>
    #include <SendMessage.au3>
    #include <StaticConstants.au3>
    #Include <Timers.au3>
    Opt ("CaretCoordMode", 1)
    Opt ("ExpandEnvStrings", 0)
    Opt ("ExpandVarStrings", 0)
    Opt ("FtpBinaryMode", 1)
    Opt ("GUICloseOnESC", 1)
    Opt ("GUICoordMode", 1)
    Opt ("GUIDataSeparatorChar","|")
    Opt ("GUIOnEventMode", 0)
    Opt ("GUIResizeMode", 0)
    Opt ("GUIEventOptions",0)
    Opt ("MouseClickDelay", 10)
    Opt ("MouseClickDownDelay", 10)
    Opt ("MouseClickDragDelay", 250)
    Opt ("MouseCoordMode", 1)
    Opt ("MustDeclareVars", 0)
    Opt ("OnExitFunc","OnAutoItExit")
    Opt ("PixelCoordMode", 1)
    Opt ("SendAttachMode", 0)
    Opt ("SendCapslockMode", 1)
    Opt ("SendKeyDelay", 5)
    Opt ("SendKeyDownDelay", 5)
    Opt ("TCPTimeout",100)
    Opt ("TrayAutoPause",0)
    Opt ("TrayIconDebug", 0)
    Opt ("TrayIconHide", 0)
    Opt ("TrayMenuMode",0)
    Opt ("TrayOnEventMode",0)
    Opt ("WinDetectHiddenText", 0)
    Opt ("WinSearchChildren", 1)
    Opt ("WinTextMatchMode", 1)
    Opt ("WinTitleMatchMode", 1)
    Opt ("WinWaitDelay", 250)

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

    Local $hGUI

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

    HotKeySet ("{ESC}", "_exit")
    HotKeySet ("{F8}", "_button")

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

    ; DirCreate
    ; FileInstall
    $guicreate0010 = GUICreate ($programmname & " - " & $programmversion, $guicreatex, $guicreatey, -1, -1)
    GUISetBkColor (0x000000)
    $guicreate0011 = _GUICtrlStatusBar_Create ($guicreate0010)
    _GUICtrlStatusBar_SetParts ($guicreate0011, 4, $guicreatex / 4)
    GUISetState (@SW_SHOW, $guicreate0010)

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

    $guicreate0012 = GUICtrlCreateProgress (0, 0, -1, -1, $PBS_MARQUEE)
    $guicreate0013 = GUICtrlGetHandle ($guicreate0012)
    _GUICtrlStatusBar_EmbedControl ($guicreate0011, 0, $guicreate0013, 4)
    _SendMessage ($guicreate0013, $PBM_SETMARQUEE, True, 200)

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

    $guicreate0014 = GUICtrlCreateProgress (0, 0, -1, -1, $PBS_MARQUEE)
    $guicreate0015 = GUICtrlGetHandle ($guicreate0014)
    _GUICtrlStatusBar_EmbedControl ($guicreate0011, 1, $guicreate0015, 4)
    _SendMessage ($guicreate0015, $PBM_SETMARQUEE, True, 400)

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

    ; dieses soll in die andere richtung laufen
    $guicreate0016 = GUICtrlCreateProgress (0, 0, -1, -1, $PBS_MARQUEE)
    $guicreate0017 = GUICtrlGetHandle ($guicreate0016)
    _GUICtrlStatusBar_EmbedControl ($guicreate0011, 2, $guicreate0017, 4)
    _SendMessage ($guicreate0017, $PBM_SETMARQUEE, True, 400)

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

    ; dieses soll in die andere richtung laufen
    $guicreate0018 = GUICtrlCreateProgress (0, 0, -1, -1, $PBS_MARQUEE)
    $guicreate0019 = GUICtrlGetHandle ($guicreate0018)
    _GUICtrlStatusBar_EmbedControl ($guicreate0011, 3, $guicreate0019, 4)
    _SendMessage ($guicreate0019, $PBM_SETMARQUEE, True, 200)

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

    GUISetCursor (3)
    _button ()

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

    Func _button ()
    While True
    Sleep (1000)
    WEnd
    EndFunc

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

    Func _exit ()
    ; FileDelete
    ; DirRemove
    Exit
    EndFunc

    [/autoit]

    2 Mal editiert, zuletzt von SchrotterCh (24. September 2009 um 15:42)