problem mit komponentenposition

[der t0r]

die neuordnung is so bevor einer fragt ^^ :

Code:

if rb1.checked then begin
   for i:=1 to 21 do begin
      case i of
      1..7:stapel[i]:= arr2[i];
      8..14:stapel[i]:=arr1[i-7];
      15..21:stapel[i]:=arr3[i-14];
      end;
      end;
      end;