Ladebalken beim Programmstart laden

09/12/2011 00:30 xEr0r#1
Wie es oben schon steht, will ich dass wenn das Programm geöffnet wird, der Ladebalken von selbst lädt. Irgendwie bekomme ich das nicht hin bzw. der Ladebalken fängt einfach nicht an zu laden.
09/12/2011 09:11 butter123#2
du musst mit
GUICtrlSetData($progressbar1, $i)
dem balken sagen, bis wohin er grade grün sein soll

guck dir mal
[Only registered and activated users can see links. Click Here To Register...]
das skript unten an
09/12/2011 09:12 omer36#3
PHP Code:
ProgressOn("wird gestartet", "", "Vorbereitung...")

For $i = 0 To 150
    ProgressSet($i)
    Sleep(50)
Next

ProgressSet(100, "Ready!")
Sleep(1000)
ProgressOff() 
09/13/2011 13:40 xEr0r#4
So hat jz gefunkt
So wenn ich jetzt aber GuiSetState() einbaue, um den Ladebildschirm zu schließen und das eigentliche Programm erscheinen zu lassen, kommt ein Error, bzw. schließt sich der Ladebildschirm bevor er vollgeladen ist.

(GuiSetState() nicht eingebaut.) Wo muss ich es nun richtig einbauen

Code:
$Form0 = GUICreate("F5-Klicker wird geladen...", 610, 422, 540, 197)
$Pic1 = GUICtrlCreatePic(@ScriptDir & "\Lapper\LoadinScreen.jpg", 0, 0, 617, 393, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Progress1 = GUICtrlCreateProgress(0, 390, 617, 33)
GUISetState(@SW_SHOW)
For $i = 0 To 300
	GUICtrlSetData($Progress1, $i)
Next
09/13/2011 17:47 FichteFoll#5
Eine Progressbar funktioniert in ganzzahligen Prozentzahlen, ergo ist der minimale Wert 0 und der maximale 100.

Ich vermute mal, dass du unter Windows 7 operierst. Die Progressbar von Windows 7 hat die Eigenschaft, dass sich der Fortschritt der Bar von selbst "smooth" erhöht. Dadurch ist der wirkliche Status der Bar, wie du ihn setzt, höher und schneller als die Anzeige davon.

Ein Sleep(2000) danach sollte dir zeigen, was ich meine.

PS: Auch ein Sleep(10) o.ä. in der Schleife wäre nicht ganz verkehrt, das spart Ressourcen.
09/14/2011 14:12 xEr0r#6
Ja aber mein Problem ist, das sich der Ladebildscirm durch GuiSetState($Form0, @SW_HIDE) nicht verstecken bzw. das eigentliche Programm durch GuiSetState($Form1, @SW_SHOW) nicht zeigen lässt
09/15/2011 16:28 irrenhaus#7
Probier es mal mit
PHP Code:
GUICtrlSetState(@SW_HIDE,$Form0)
GUICtrlSetState(@SW_SHOW,$Form1) 
09/15/2011 16:42 xEr0r#8
Das weiß ich auch -,-*
Aber wohin soll ich das setzen? Wenn ichs in die For-Schleife mache passiert nichts
Habs auch schon so versucht:

Code:
If $i = 100 Then
GUISetState($Form0, @SW_HIDE)
GUISetState($Form1, @SW_SHOW)
EndIf
Klappt aba trotzdem nicht
09/15/2011 17:24 FichteFoll#9
Code:
GUI[B]Ctrl[/B]SetState($Progess1, [B]$GUI_HIDE[/B])
GUI[B]Ctrl[/B]SetState($Progess1, [B]$GUI_SHOW[/B])
Mehr in der Dokumentation.
09/15/2011 19:57 xEr0r#10
Geht iwie trotzdem nicht -,-^^

Ganzer Code:

Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <ProgressConstants.au3>
#Region ### START Koda GUI section ### Form=

$iniread1 = IniRead(@ScriptDir & "\Key-Einstellungen.ini", "Start-Key", "", 0)
$iniread2 = IniRead(@ScriptDir & "\Key-Einstellungen.ini", "Exit-Key", "", 0)

HotKeySet($iniread1, "_start")
HotKeySet($iniread2, "_Exit")

;-----------------------------------------------------------------------------

$Form1 = GUICreate("Youtube F5-Klicker By xEr0r", 373, 235, 540, 197)
$Label1 = GUICtrlCreateLabel("Start Taste:", 16, 40, 109, 20)
$Input1 = GUICtrlCreateInput($iniread1, 168, 32, 145, 24)
$Label2 = GUICtrlCreateLabel("Beenden Taste:", 16, 96, 109, 20)
$Input2 = GUICtrlCreateInput($iniread2, 168, 96, 145, 24)
$Button1 = GUICtrlCreateButton("Einstellungen übernehmen", 64, 152, 249, 49, $WS_GROUP)
$Label3 = GUICtrlCreateLabel("Version 1.0", 290, 210)
GUISetState(@SW_HIDE)
#EndRegion ### END Koda GUI section ###

$Form0 = GUICreate("F5-Klicker wird geladen...", 610, 422, 540, 197)
$Pic1 = GUICtrlCreatePic(@ScriptDir & "\Lapper\LoadinScreen.jpg", 0, 0, 617, 393, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$Progress1 = GUICtrlCreateProgress(0, 390, 617, 33)
GUISetState(@SW_SHOW)
For $i = 0 To 100
GUICtrlSetData($Progress1, $i)
Sleep(10)
GUICtrlSetState($Form0, $GUI_HIDE)
GUICtrlSetState($Form1, $GUI_SHOW)
Next



While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1
			_save()
	EndSwitch
WEnd


Func _save()
	$read1 = GUICtrlRead($Input1)
	$read2 = GUICtrlRead($Input2)
	IniWrite(@ScriptDir & "\Key-Einstellungen.ini", "Start-Key", "", $read1)
	IniWrite(@ScriptDir & "\Key-Einstellungen.ini", "Exit-Key", "", $read2)
	Sleep(500)
	MsgBox(0, "Erfolgreich", "Die Einstellungen wurden erfolgreich übernommen")
EndFunc

Func _start()
	While 1
	Send("{F5}")
	Sleep(3000)
	WEnd
EndFunc

Func _Exit()
	Exit
EndFunc
09/15/2011 20:37 omer36#11
09/17/2011 12:31 xEr0r#12
ty klappt