Diagonales Raster zeichnen

[hansklok]

Zitat von Delbor:

Die Diagonale erreichst du, indem du die einzelnen Rasterpunkt gegeneinander versetzt.

Hi Delbor,

danke für Deinen Beitrag. Wie müsste ich diesen Code hier modifizieren, damit die Rasterpunkte gegeneinander versetzt werden?

Delphi-Quellcode:

for rx := 0 to (img_main.Width div gridsize) do
  for ry := 0 to (img_main.Height div gridsize) do
    img_main.Canvas.Pixels[rx*gridsize,ry*gridsize] := clGrey;