Einzelnen Beitrag anzeigen

hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.276 Beiträge
 
Delphi 10.4 Sydney
 
#1

TStringGrid, OnwerDraw, Kreis sieht komisch aus

  Alt 22. Okt 2008, 15:09
Hallo #,

ich male einen Kreis in einer Zelle

OnDrawCell
c ist der Canvas

Inc(ARect.Left,4);
Inc(ARect.Top,4);
Dec(ARect.Right,4);
Dec(ARect.Bottom,4);

c.Ellipse(ARect);

Der Kreis sieht aber komisch aus,
irgendwie eckig.

Ich weiss (aus Grafik in Informatik) dass Treppenstufen unvermeidbar sind,
aber war da mal nicht was, dass der rechte untere Punkt des Rechtecks nicht mitzählt ??

Danke


Heiko
Heiko
  Mit Zitat antworten Zitat