Zuweisung für FOR-Schleifenvariablen wird nicht akzeptiert

[Angel4585]

dann mach doch ne Funktion/prozedur aus dem Abschnitt! So etwa:

Delphi-Quellcode:

procedure DeineMainPrc;

  procedure InMainproc(var x,y,a,z,b,c : integer);
  begin
  for i:= x to y do
    for j:= a to z do
      for k := b to c do
        begin
        if stop then
          exit;
        end;
  end;

begin

InMainProc(x1,x2,x3,x4,x5,x6)

end;

Naja weist schon was ich mein oder?