Delphi - for - loop
<p>is there solution in Delphi 7 for deynamically creating for-loop cycles?</p>

<p>for example, i want to have a function that generates 1..n for-cycles</p>

<p>for example:</p>

<pre><code>function generate_binary(var number_of_loops:integer):string
var x:word
begin
 for x:=1 to number_of_loops do begin
  for ...  cycle 1
    ...
    ...
    ...
  for ... cycle[x]
    //code
  end; //cycle n

  end; //cycle[x]
 end;
end;
</code></pre>

<p>is there some code for doing that?  Or i must manually set every for..  cycles?</p>