AggPas - Anti-Grain Geomertry for Object Pascal

TAgg2D.LineJoin(join)

Description

Changes the current type of bending on corners of stroke (line).

The default value is AGG_JoinRound.

Parameters

join: TAggLineJoin [*]

Constant specifying a new value of line join.

Example

if VG.Attach(Image1.Picture.Bitmap) then begin

  VG.ClearAll(255, 255, 255);

  // Bold line & drawing path
  VG.LineWidth(25);

  VG.ResetPath;
  VG.MoveTo(30, 90);
  VG.LineTo(90, 30);
  VG.LineTo(150, 90);

  // Default AGG_JoinRound
  VG.Translate(10, -10);
  VG.DrawPath(AGG_StrokeOnly);

  // Change to AGG_JoinMiter
  VG.LineJoin (AGG_JoinMiter);
  VG.Translate(0, 50);
  VG.DrawPath (AGG_StrokeOnly);

  // Change to AGG_JoinBevel
  VG.LineJoin (AGG_JoinBevel);
  VG.Translate(0, 50);
  VG.DrawPath (AGG_StrokeOnly);

end;

Screenshot: example