Array of Boolean verarbeiten

[Uwe Raabe]

Delphi-Quellcode:

      i := 0;
      for x := MaxX downto 0 do
        for y := MaxY downto 0 do
        begin
          UniversumsMatrix[x,y] := StrToBool(StrList[I]);
          Inc(i);
        end;