Wie schwarze Linie mit 1 Pixel Stärke zeichnen ?

[luisk]

Wie kann ich eine schwarze Linie mit 1 Pixel Stärke zeichnen ?
Die Linie hier wird 2 Pixel dick und transparent dunkelgrau:

Delphi-Quellcode:

      Column.Canvas.Stroke.Thickness:=1.0;
      Column.Canvas.Stroke.Kind := TBrushKind.bkSolid;
      Column.Canvas.Fill.Color := TAlphaColorRec.Black;
      Column.Canvas.Fill.Kind := TBrushKind.bkSolid;
      Column.Canvas.Stroke.color := TAlphaColorRec.Black;
      Column.Canvas.DrawLine( p1, p2, 1 );

Hier wurde das Thema auch besprochen:
http://stackoverflow.com/questions/1...lack-rectangle

[BUG]

Kurz und knapp: du zeichnest zwischen den Pixeln und das Antialiasing sorgt dafür, dass die Linie 2px breit wird. Wie in der von dir verlinkten Stackoverflow-Seite beschrieben, sollte es reichen +0.5 auf die Koordinaten zu addieren.

[luisk]

OK, hat geklappt.
Danke.