For While Repeat Unterschied in der Geschwindigkeit

[alzaimar]

Wat? Stimmt nicht. Die Endbedingung muss doch jedesmal geprüft werden, sonst wäre es eine Endlosschleife. Der Term wird allerdings nur einmal ausgewertet, das ist richtig.

Um die Schleifen irgendwie vergleichen zu können, muss man dann eben soetwas machen:

Var
i : Integer;

...
For i:=0 to ccMaxLoops Do
_DoSomeThing;

i := 0;
While i<= ccMaxLoops do Begin
_DoSomeThing;
inc(i);
End;

i := 0;
Repeat
_DoSomeThing;
inc (i);
Until i = ccMaxLoops;
...