Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Algorithmen, Datenstrukturen und Klassendesign (https://www.delphipraxis.net/78-algorithmen-datenstrukturen-und-klassendesign/)
-   -   Matheass braucht Denker :P (https://www.delphipraxis.net/191513-matheass-braucht-denker-p.html)

hansklok 23. Jan 2017 13:38

Matheass braucht Denker :P
 
Hallo an alle,

Mathe zählte nie zu meinen Stärken. Umso lustiger, dass ich dennoch programmiere. Simple Frage:

Ich habe ein Dynamisches Array, welches durchlaufen wird und eine Progressbar. Diese hat einen maximalen Wert von 100 (=100%) und soll immer dann aktualisiert werden, wenn ein Prozent des Arrays durchlaufen ist.

1% = Array.Count/100

Und wie ermittle ich nun innerhalb der Schleife beim durchlaufen des Arrays ob jeweils ein Prozent mehr erreicht ist?

Beste Grüße

a.def 23. Jan 2017 13:41

AW: Matheass braucht Denker :P
 
Du speicherst den aktuellen Wert der ProgressBar in eine Variable und prüfst diese mit dem Wert der ProgressBar beim nächsten Durchlauf.

Delphi-Quellcode:
var
 iTmp, iProgress_Old:Integer;
begin
 iTmp := 0;
 iProgress_Old := 0;

 for i := 1 to 100 do
  begin
   iTmp := BerechneProzentFuerProgressBar;

   if iTmp > iProgress_Old then // Wenn berechneter (neuer) Wert größer als der alte, dann ProgressBar.Position setzen
    ProgressBar1.Position := iTmp;

   iProgress_Old := iTmp; // neuen Wert in temporäre Variable zum späteren Vergleichen speichern
  end;
end;

Valle 23. Jan 2017 13:44

AW: Matheass braucht Denker :P
 
Du kannst auch vorher das Max-Attribut deiner ProgressBar auf die Länge des Arrays ändern. Dann sparst du dir das Rechnen.

a.def 23. Jan 2017 13:45

AW: Matheass braucht Denker :P
 
Zitat:

Zitat von Valle (Beitrag 1359707)
Du kannst auch vorher das Max-Attribut deiner ProgressBar auf die Länge des Arrays ändern. Dann sparst du dir das Rechnen.

Hat er doch schon :P Seine ProgressBar hat den Max-Wert 100.
Eine ProgressBar mit Max-Wert 100 (Prozent) finde ich deutlich angenehmer als eine ProgressBar mit 50.123 oder so.

Valle 23. Jan 2017 13:47

AW: Matheass braucht Denker :P
 
Warum schreibst du deinen Code dann so kompliziert, wenn du meinst er hätte den Max-Wert auf die Array-Länge gesetzt?

a.def 23. Jan 2017 13:49

AW: Matheass braucht Denker :P
 
Zitat:

wenn du meinst er hätte den Max-Wert auf die Array-Länge gesetzt?
Sein Max-Wert ist 100, nicht die Array-Länge.

Was ist an meinem Code kompliziert?
Seine Frage war wie man mitbekommt, dass der neue ProgressBar-Wert größer als der alte ist.
Und genau das macht mein Code. Er überprüft das und nur wenn der neue Wert größer ist als der alte wird die ProgressBar.Position neu gesetzt.

Verstehe nicht was daran kompliziert sein soll :roll:

DeddyH 23. Jan 2017 13:50

AW: Matheass braucht Denker :P
 
Die Komponente kann das doch alles ganz allein, wenn man die Werte entsprechend setzt. Wozu das Rad neu erfinden?

a.def 23. Jan 2017 13:52

AW: Matheass braucht Denker :P
 
Die von mir vorgeschlagene Methode kann aber noch für andere Zwecke benutzt werden.
Es ist ja nicht nur das Setzen der ProgressBar. Vielleicht kommt später ja noch mehr dazu und man möchte nicht immer alles ausführen sondern nur dann wenn der Wert sich geändert hat.

Außerdem erspart man sich so ein SendMessage und noch weiteren Kram :stupid:

DeddyH 23. Jan 2017 13:55

AW: Matheass braucht Denker :P
 
Dafür wäre eine Klasse mit einem entsprechenden Eventhandler aber deutlich eleganter, oder?

a.def 23. Jan 2017 13:55

AW: Matheass braucht Denker :P
 
Eleganter ja. Aber danach hat keiner gefragt.

Die Frage war
Zitat:

Und wie ermittle ich nun innerhalb der Schleife beim durchlaufen des Arrays ob jeweils ein Prozent mehr erreicht ist?
und die habe ich beantwortet.


Alle Zeitangaben in WEZ +1. Es ist jetzt 15:30 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz