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);

[TurboMagic]

Ja, ich dachte mir schon, dass es vermutlich noch einen einfacheren Weg gibt. Ich wollte aber
zumindest einen möglichen Weg aufzeigen. Jetzt kann er sich's raussuchen.

[TLAng]

Auch Dir danke schön.
Es gibt ja immer verschiedene Lösungen.

Zitat von TurboMagic:

Ja, ich dachte mir schon, dass es vermutlich noch einen einfacheren Weg gibt. Ich wollte aber
zumindest einen möglichen Weg aufzeigen. Jetzt kann er sich's raussuchen.

[TLAng]

Hi himitsu,

herzlichen Dank für deine Hilfe. Das habe ich gesucht.