So, folgendes Problem habe ich jetzt nur noch (bei diesem Quelltext[ausschnitt]):
Delphi-Quellcode:
const
ANZAHL=20;
BREITE=20;
var
Form1: TForm1;
feld:array [0..ANZAHL-1,0..ANZAHL-1] of integer;
dransein:integer;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
var
i,j: integer;
begin
spielfeld.ColCount:=ANZAHL+3;
spielfeld.RowCount:=ANZAHL+3;
spielfeld.DefaultColWidth:=BREITE;
spielfeld.DefaultRowHeight:=BREITE;
spielfeld.Width:=25*ANZAHL-13;
spielfeld.Height:=25*ANZAHL-13;
Form1.Width:=28*ANZAHL;
Form1.Height:=28*ANZAHL;
ShowMessage('');
ShowMessage ('');
for i:=0 to spielfeld.RowCount-1 do
for j:=0 to spielfeld.ColCount-1 do
Color of feld [i][j] :=Colors[(i + j) mod 2];
end;
[Fehler] version1.pas(54): Anweisung erforderlich, aber Ausdruck vom Typ 'TColor' gefunden
Aber, das kriegen wir (ich) auch noch hin, oder?
[edit=Sharky]Delphi-Tags gesetzt. Bitte beim nächsten mal selber machen 
Mfg, Sharky[/edit]