Ladebalken

  • Wie ist der Befehl dafü, dass ein Ladebalken nach so und soviel secunden so und soweit geladen hat?

  • hallo habe hier auch ein beispiel!

    einfacher ladebalken ...

    Spoiler anzeigen
    [autoit]


    #Include <Misc.au3>
    #include <File.au3>
    #include <Process.au3>
    #include <String.au3>
    #include <GUIConstantsEx.au3>
    #include <GUIConstants.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>

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

    #Region ### START Koda GUI section ### Form=C:\scripte\gui.kxf
    $gui = GUICreate("Setup 1.0.0.1 ...", 251, 90, 222, 137)
    GUISetBkColor(0xFFFFFF) ; setzt hintergrundfarbe
    $picbk = GUICtrlCreateLabel("", 20, 50, 205, 15)
    GUICtrlSetBkColor(-1, 0xFFFFFF)
    ;$pic = GUICtrlCreatePic("C:\scripte\gradientbar2.bmp", 28, 70, 5, 15)
    ;$Pic1 = GUICtrlCreatePic("C:\scripte\01Logo.gif", 64, 0, 105, 57, BitOR($SS_NOTIFY,$WS_CLIPSIBLINGS))
    $pic = GUICtrlCreatePic(@ScriptDir & "\TEMP\gradientbar2.bmp", 28, 70, 5, 15)
    ;$Pic1 = GUICtrlCreatePic(@ScriptDir & "\TEMP\01Logo.gif", 64, 0, 105, 57, BitOR($SS_NOTIFY,$WS_CLIPSIBLINGS))
    $label = GUICtrlCreateLabel("... Setup wird vorbereitet ...", 20, 70, 205, 15, $SS_CENTER)
    ;$Label1 = GUICtrlCreateLabel("Label1", 16, 72, 212, 17, $SS_CENTER)

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

    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    For $n = 1 to 200
    ControlMove($gui,"",$pic,20,50,5 + $n,15)
    sleep(20)
    Next

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

    $Counter = 5
    AdlibRegister("CountDown", 1000) ;-- ruft function countdown auf
    Sleep (6000)

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

    ;--------countdown---------------------------
    Func CountDown()
    $Counter = $Counter - 1
    GUICtrlSetData($label, "... Setup beginnt in " & $counter & " sek. ...")
    If Not $Counter Then
    AdlibUnRegister()
    GUICtrlSetData($label, "... Setup wird durchgeführt ...")
    ;GUIDelete()
    ;Exit
    EndIf
    EndFunc

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

    autoit.de/wcf/attachment/8341/

    beispiel 2 "progress on"

    Spoiler anzeigen
    [autoit][/autoit] [autoit][/autoit] [autoit]

    #Include <File.au3>
    #Include <Array.au3>

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

    $FileList_01 =_FileListToArray("\\server\d$\Profiles\pc\") ; listet dateien (user) in array
    If @Error=1 Then
    MsgBox (0,"","No Files\Folders Found.")
    Exit
    EndIf

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

    ;_ArrayDisplay($FileList_01,"$FileList")
    ;MsgBox(0,"",$FileList[0])
    ;---------------
    Global $w1,$V

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

    $w1 = ($FileList_01[0] /100) ;berechnung --> $w1 = 1% von $FileList_01[0]
    ;MsgBox(0,"",$FileList_01[0] & " /" & $w1)

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

    ProgressOn("Progress Meter - Profile", " ... lösche Dateien ...", "0 %")

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

    For $x = 1 to $FileList_01[0]
    ;Msgbox(0,'Record:' & $x, $FileList_01[$x],1)

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

    $FileList_02 =_FileListToArray("\\server\d$\Profiles\pc\" & $FileList_01[$x] & "\tool\", "*.bmp",1) ; filelist to array aus zusammengesetztem pfad
    ;_ArrayDisplay($FileList_02,"$FileList")

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

    FileDelete("\\server\d$\Profiles\pc\" & $FileList_01[$x] & "\tool\", "*.bmp") ;lösche files
    $x1 = Round( $x / $w1, 0) ; wert runden

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

    sleep(100)
    ProgressSet( $x1, $x1 & " %")

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

    Next
    ProgressSet(100 , "Done", "Complete")
    sleep(500)
    ProgressOff()

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


    gruß gmmg ;)

  • es sind es nur beispiele, bei denen du den pfad anpassen musst!

    poste doch mal dein script, sonst kann keienr die fehler sehen!

    progess on in meinem beispiel 2erstellt automatisch die gui!
    bei dem anderen, muss das bild "\gradientbar2.bmp" im verzeichnis @ScriptDir & "\TEMP liegen oder in jedem beliebigen pfad den du dort angibst!

    [autoit]


    DirCreate(@ScriptDir & "\TEMP\") ;erstellt den temp pfad
    FileInstall("c:\gradientbar2.bmp", @ScriptDir & "\TEMP\gradientbar2.bmp",1) ;integriert das bild in die exe

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

    $pic = GUICtrlCreatePic(@ScriptDir & "\TEMP\gradientbar2.bmp", 28, 70, 5, 15)

    [/autoit]


    gruß gmmg

  • Ich hab jetzt

    [autoit]

    #include <GUIConstantsEx.au3>
    #include <ProgressConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=C:\Users\Al.Gaida\Desktop\Form1.kxf
    $Form1 = GUICreate("Installieren", 504, 185, 269, 124)
    $Progress1 = GUICtrlCreateProgress(16, 16, 468, 41)
    GUICtrlSetColor(-1, 0x00FF00)
    GUICtrlSetBkColor(-1, 0xFFFFFF)
    GUICtrlSetCursor (-1, 15)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

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

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

    EndSwitch
    WEnd

    [/autoit]


    wie füge ich jetzt ein das er lädt?

  • [autoit]


    #include <GUIConstantsEx.au3>
    #include <ProgressConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=C:\Users\Al.Gaida\Desktop\Form1.kxf
    $Form1 = GUICreate("Installieren", 504, 185, 269, 124)
    $Progress1 = GUICtrlCreateProgress(16, 16, 468, 41)
    GUICtrlSetColor(-1, 0x00FF00)
    GUICtrlSetBkColor(-1, 0xFFFFFF)
    GUICtrlSetCursor (-1, 15)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    $progress=0

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    $progress+=1
    guictrlsetdata($Progress1,$progress)
    sleep(1000);damit es nicht zu schnell geht, sonst 10 damit der Prozesser nicht überlastet wird
    WEnd

    [/autoit][autoit][/autoit][autoit][/autoit]
  • Cool
    gibt es einen Befehl der die Prozent anzeigt und bei blablabla prozent den und den Text schreibt?

    *edit* ich wollte nämlich EINEN button machen der sich einmal von Installieren zu Fertig ändert und EIN Textfeld was pro prozent seinen Text ändert

    Einmal editiert, zuletzt von Sever (22. März 2010 um 18:47)

  • Cool
    gibt es einen Befehl der die Prozent anzeigt und bei blablabla prozent den und den Text schreibt?

    *edit* ich wollte nämlich EINEN button machen der sich einmal von Installieren zu Fertig ändert und EIN Textfeld was pro prozent seinen Text ändert

    schau dir das Beispiel zu

    [autoit]

    GuiCtrlCreateProgress

    [/autoit]

    in der Hilfe an, ganz besonders auch die Verwendung von

    [autoit]

    GuiCtrlSetData

    [/autoit]

    mfg (Auto)Bert