Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Prozentwert von ProgressBar.Position abziehen


elzer - Sa 25.10.08 15:35
Titel: Prozentwert von ProgressBar.Position abziehen
Hi Leute, ist es möglich von einer ProgressBar.Position auf ButtonClick z.B. 25% abziehen zu lassen?
Habe selbst schon probiert aber da ich mit:

Delphi-Quelltext
1:
ProgressBar1.Position:=ProgressBar1.Position*(25/100)  //oder -25%                    

einen Integer Wert abziehen will (und 25/100 bzw 25%, keine sind) fällt mir keine weitere Möglichkeit ein; habe auch die Suchfunktion ohne Erfolg benutzt.
Danke für eure Hilfe :)
Elzer

Edit: Rechtschreibfehler


pigfacejoe - Sa 25.10.08 15:44

25% entspricht 1/4 der Progressbar.Position.
=> progressbar1.position:=progressbar.position-(progressbar1.position div (100 div p%));
Bei dir:progressbar1.position:=progressbar.position-(progressbar1.position div (100 div 25));
Gruß
Max


elzer - Sa 25.10.08 15:58

Danke es geht =)


jakobwenzel - Sa 25.10.08 16:05

Da waren nur zwei kleine Fehler in deinem Quelltext:

Delphi-Quelltext
1:
ProgressBar1.Position:=round(ProgressBar1.Position*(75/100))                    

Zum einen muss man das ganze auf die nächste ganze Zahl runden, und zum anderen musst du nicht das nehmen was wegkommt, sondern das was noch bleibt.


Hidden - Sa 25.10.08 17:03


Statt / und Round sollte aber schon:
1:
ProgressBar1.Position := ProgressBar1.Position * 75 div 100;                    


mfG,


elzer - Sa 25.10.08 20:15

Danke =) hat funktioniert