ImageEn, unit iegdiplus

TIECanvas.LineTo

TIECanvas.LineTo


Declaration

procedure LineTo(X, Y: integer);


Description

Draw a line from the current pen position (set by MoveTo) to a point.

Note: Same as using DrawLine

GDI+ Method: GdipDrawLine


Example

// Draw an envelope with 50% transparency
with ImageEnView1.IEBitmap.IECanvas do
begin
  Pen.Mode  := pmCopy;
  Pen.Style := psSolid;
  Pen.Color := clBlack;
  Pen.Transparency := 128;

  Brush.Color := clYellow;
  Brush.Style := bsSolid;
  Brush.Transparency := 128;

  // Draw outer rect
  Rectangle( 100, 100, 500, 300 );

  // Draw flap
  MoveTo( 100, 100 );
  LineTo( 300, 200 );
  LineTo( 500, 100 );
end;
ImageEnView1.Update();