MoveTo/LineTo

**brechi**

Ich bin gerade ein wenig verwundert ueber LineTo / Polyline. Diese zeichnen die Linie nicht bis zum angegeben Punkt sondern hoeren einen Pixel vorher auf. War das schon immer so, oder liegt das an einstellungen (Windows7 / canvas.Pen / Grafikkarte etc.) ?

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TForm3.Button1Click(Sender: TObject);

var

  x: Integer;

begin

  x := 2;

  // Fadenkreuz zu kurz

  Canvas.MoveTo(100 - x, 100);

  Canvas.LineTo(100 + x, 100);

  Canvas.MoveTo(100, 100 - x);

  Canvas.LineTo(100, 100 + x);

  // vollständiges Fadenkreuz

  Canvas.MoveTo(150 - x, 150);

  Canvas.LineTo(150 + x, 150);

  Canvas.LineTo(150 - x, 150);

  Canvas.MoveTo(150, 150 - x);

  Canvas.LineTo(150, 150 + x);

  Canvas.LineTo(150, 150 - x);

end;

MoveTo/LineTo

MoveTo/LineTo

Forumregeln