DrawGrid Zellen abwechselnd mit Farbe füllen

[himitsu]

Wieso dein Code eventuell nicht das macht, was er soll?

Klar, er macht ja auch was Anderes, als du gesagt hast.
-> Färben, wenn etwas in der Zelle, wo hier niemand weiß, was deren Inhalt ist.


@TurboMagic, das geht auch mathematisch

Delphi-Quellcode:

if Odd(ARow) xor {not} Odd(ACol) then  // NOT oder das Color:=... umdrehen, falls andersrum
  DrawGrid1.Canvas.Brush.Color := clBlue
else
  DrawGrid1.Canvas.Brush.Color := clRed;
DrawGrid1.Canvas.FillRect(Rect);