Stringgrid - Problem

[Spicker]

Ich habe nun ein neues Problem, wo ich absolut ratlos bin...

Delphi-Quellcode:

procedure Tf_lampenspiel.sg_LampenDrawCell(Sender: TObject; ACol,
  ARow: Integer; Rect: TRect; State: TGridDrawState);
  var i, k, j: integer;
begin
j := 0;
Setlength (aLampen,se_groesse.value,se_groesse.value);
 if aLampen[Acol,Arow] then
   sg_lampen.canvas.brush.color := clblue
  else
   sg_lampen.canvas.brush.color := clwhite;
   sg_lampen.canvas.fillrect(rect);
   for i := 0 to (se_groesse.value-1) do
     for k := 0 to (se_groesse.value-1) do
     begin                                            //Hab ich gewonnen?
     If sg_lampen.cells[i,k] = clblue
       [B]then inc(j);[/B]
     end;
    If j = se_groesse.value * 2
      then showmessage('Herzlichen Glückwunsch, sie haben Gewonnen! Sie haben ' + IntToStr(zuege) + ' Züge gebraucht. Das Feld wird zurückgesetzt.')
end;

An der Fett markierten Stelle bekomme ich folgende Fehlermeldung:

Zitat:

Inkompatible Typen: 'String' und 'Integer'

Ich habe alles Probiert, aber ich kriege den fehler nicht behoben

MfG