for- Schleife : Anfangsvariable aktualisieren

[Draos]

Delphi-Quellcode:

  i:=10;  
  while i<=Length(Head) do
   if Irgendwas then begin
    ...
    Inc(i,5);
   end else
    Inc(i);