Canvas line

From Lazarus wiki
Revision as of 16:36, 17 September 2018 by Wp (talk | contribs) (Fix coordinate of pixel in bottom/right corner of form. Avoid reference to form variable in form code.)
Jump to navigationJump to search

The Canvas.Line(x1, y1, x2, y2) statement will draw a line from point (x1, y1) to (x2, y2).

The coordinates of the canvas are:

canvas2.png


This code will draw the diagonals in a form:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Canvas.Line(0, 0, Width-1, Height-1);
  Canvas.Line(0, Height-1, Width-1 ,0);
end;

See also