Progressbar nur bis zu bestimmten Punkt

Waluev

Hi Leute

Folgendes Problem:

Ich habe bei meinem [Insider]tollen Internet -.- [/Insider] eine wöchentliche Trafficbeschränkung....

Wieviel ich davon verbraucht habe kann ich mir auf der Website ansehen, da mir das aber zu umständlich ist, hab ich mir überlegt, ein Programm dafür zu schreiben.

Ich hab jetz also die Zahl wieviel ich verbraucht hab (z.B 25,8%) und möchte jetzt also eine Progrssbar, die von 1-100 geht, aber halt bis 25,8% anzeigt, der Fortschrittsbalken soll aber nicht erst anlaufen, sondern, das gleich bis dahin anzeigen...

Also ich hoffe mal auf eure Hilfe

Waluev

teh_hahn

Hi,

irgendwie versteh ich nicht ganz was Du willst. 25,8% sollen 100% sein? Oder willst Du einfach nur 25,8% anzeigen lassen? Ich denke mal nicht, dass Du folgendes meinst:

[autoit]

#include <GUIConstants.au3>

$h_maingui = GUICreate("FB 0.00A for GW", 320, 70, -1, -1)
$h_progressbar = GUICtrlCreateProgress(10, 10, 300, 20, $PBS_SMOOTH )
$h_fillbt = GUICtrlCreateButton("&Fill", 10, 40, 60, 20)
GUISetState(@SW_SHOW, $h_maingui)

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

$f_readvalue = 25.8

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

While 1
$a_msg = GUIGetMsg(1)

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

Select
Case $a_msg[0] == $GUI_EVENT_CLOSE
ExitLoop 1
Case $a_msg[0] == $h_fillbt
GUICtrlSetData($h_progressbar, $f_readvalue)
EndSelect
WEnd
GUIDelete($h_maingui)
Exit(0)

[/autoit]

**GtaSpider**

Hallo!

Meinst du sowashier?

Spoiler anzeigen

[autoit]

$momProgress = 55
$MaxProgress = 25.8
ProgressOn("Wieviel benutzt wird","")
_ProgressSet($momProgress,$MaxProgress)
Sleep(5000)
ProgressOff()

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

Func _ProgressSet($iProg,$iMaxProg)
$iProg = StringReplace(StringReplace($iProg,".",""),",","")
$iProg = $iProg/$iMaxProg*100
$ProgSet = $iProg
If $ProgSet >= 100 Then $ProgSet = 100
ProgressSet($ProgSet,Round($iProg,1)&"%")
EndFunc

[/autoit]

Mfg Spider

Waluev

Jo, teh_han hatte Recht, das mein ich.
Nur am besten wäre es, wenn das von anfang an so gefüllt wird, also ohne, dass ichauf den Button klicken muss, bzw, die Scrollbar nicht erst bisdahin lädt, also diese "Animation", sondern der Balken gleich da ist.

Waluev

**GtaSpider**

Hallo

Spoiler anzeigen

[autoit]

#include <GUIConstants.au3>

$h_maingui = GUICreate("FB 0.00A for GW", 320, 70, -1, -1)
$h_progressbar = GUICtrlCreateProgress(10, 10, 300, 20, $PBS_SMOOTH )
$h_fillbt = GUICtrlCreateButton("&Fill", 10, 40, 60, 20)
GUISetState(@SW_SHOW, $h_maingui)

$f_readvalue = 25.8
GUICtrlSetData($h_progressbar, $f_readvalue)

While 1
$a_msg = GUIGetMsg(1)

Select
Case $a_msg[0] == $GUI_EVENT_CLOSE
ExitLoop 1
Case $a_msg[0] == $h_fillbt
GUICtrlSetData($h_progressbar, $f_readvalue)
EndSelect
WEnd
GUIDelete($h_maingui)
Exit(0)

[/autoit]

Mfg Spider

**BugFix**

oder so:

Spoiler anzeigen

[autoit]

#include <GUIConstants.au3>

$h_maingui = GUICreate("FB 0.00A for GW", 320, 70, -1, -1)
$h_progressbar = GUICtrlCreateProgress(10, 10, 300, 20)
$label = GUICtrlCreateLabel('', 45, 45, 230, 17, $SS_CENTER)
GUISetState(@SW_SHOW, $h_maingui)

$f_readvalue = 25.8
GUICtrlSetData($h_progressbar, $f_readvalue)
GUICtrlSetData($label, $f_readvalue)
While 1
$a_msg = GUIGetMsg(1)

Select
Case $a_msg[0] == $GUI_EVENT_CLOSE
ExitLoop 1
EndSelect
WEnd
GUIDelete($h_maingui)
Exit(0)

[/autoit]

oder die Sparversion:

[autoit]

$f_readvalue = 25.8
ProgressOn("FB 0.00A for GW",'')
ProgressSet($f_readvalue,'',$f_readvalue)
Sleep(3000)
ProgressOff()

[/autoit]

teh_hahn

Ja, da stand es doch schon (bei gtaspiders Post):

Spoiler anzeigen

[autoit]

#include <GUIConstants.au3>

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

$f_readvalue = 25.8

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

$h_maingui = GUICreate("FB 0.00A for GW", 320, 40, -1, -1)
$h_progressbar = GUICtrlCreateProgress(10, 10, 300, 20, $PBS_SMOOTH )
GUICtrlSetData($h_progressbar, $f_readvalue)

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

GUISetState(@SW_SHOW, $h_maingui)

While 1
$a_msg = GUIGetMsg(1)

Select
Case $a_msg[0] == $GUI_EVENT_CLOSE
ExitLoop 1
EndSelect
WEnd
GUIDelete($h_maingui)
Exit(0)

[/autoit]

**BugFix**

Da war mein Browserfenster noch nicht aktualisiert.

Waluev

So da meld ich mich auch mal wieder....

Vielen Dank es funktioniert alles super!

Waluev