Progress Bar

Hej jeg gir 200 Up til den der har et svar

Hvordan laver jeg en "Fake" Progress Bar?

MVH
Mikkel A. Andersen

Hvad mener du med "Fake"?

Uden at bruge componenten fra VB6, eller hvad mener du egentligt?

Hvis du bare vil have en progressbar til at køre fra 0 til 100 % i trin over noget tid ... så brug en Timer.
I Timer eventen tæller du op på din progressbar og kalder doevent.
Din timers hastighed styrer hvor hurtigt den progressbar fyldes op.

Men det var vel næppe det du mente med "Fake" progressbar, vel?

Hej jeg gir 200 Up til den der har et svar

Hvordan laver jeg en "Fake" Progress Bar?

MVH
Mikkel A. Andersen

lav en progressbar
lav en timer

Timer
If progressbar1.value =>100 then
timer1.enabled = false
else
Progressbar1.value = +1
endif

det skulle meget gerne virke har ikke tested det da jeg sidder på arbejde.. tjekker trådet igen når jeg kommer hjem og tjekker om det virker =)

Jeg kan ikke få den til at virke please hjælp

Okay! Jeg laver lige en n00b gennemgang (selvom du måske ikke er n00b. Men så er jeg sikker på at det virker)

1. Opret en progressbar og sæt den på formen!
2. Indsæt en timer på formen!
3. Dobbelt-klik på timeren og indtast følgende kode:

'BEMÆRK: ERSTAT XXXXX MED NAVNET PÅ DIN PROGRESSBAR OG
'ERSTAT YYYYY MED NAVNET PÅ DIN TIMER!!!

If XXXXX.Value =>100 Then
   YYYYY.Enabled = False
   'Dette sker når processlinjen når 100!
Else
   XXXXX.Value = Val(XXXXX.Value) + Val(1)
End If

Og sidst men ikke mindst. Sæt timerens Interval-property til 1. (Jo højere jo langsommere tæller progressbaren op)

Hilsen Morten.

PS: Du kan tilføje dette efter koden herover for at gøre det lidt mere realistisk!

'BEMÆRK: ERSTAT XXXXX MED NAVNET PÅ DIN PROGRESSBAR OG
'ERSTAT YYYYY MED NAVNET PÅ DIN TIMER!!!

If XXXXX.Value = 70 Then
    YYYYY.Interval = 50
End If

If XXXXX.Value = 75 Then
    YYYYY.Interval = 200
End If

If XXXXX.Value = 80 Then
    YYYYY.Interval = 1
End If

Hehe Det er fordi jeg har en Slash Screen til mit program og jeg ved godt at det ikke loader men jeg vil narre folk til at tro det.....
Men fortæl ændelig vidre om det der Timer Haløj for jeg tror jeg kan bruge det

Jeg kan ikke få den til at virke please hjælp