j wird immer um eins inkrementiert. Und ich sehe, da gibt es noch eine kleine Hürde, vor der while-Schleife wird die Zählvariable der while-Schleife immer auf null gesetzt:
Delphi-Quellcode:
for i := 0 to x do
begin
j := 0; // <-- !!!
while j < y do
begin
j_total := j_total + j
// hier Gesamtfortschritt ermitteln
end;
end
Ich denke, da bräuchte ich eine Hilfsvariable: j_total := j_total + j oder so was.
@sirius: Ich bräuchte es in Prozent.
