Configuring Miter Limit
Delphi
[copy to clipboard]
{ PDF object is supposed to be created }
PDF.BeginDoc;
PDF.PDFPAGE_SetLineWidth(10);
PDF.PDFPAGE_SetMiterLimit(1);
PDF.PDFPAGE_SetLineJoin(ljMiter);
PDF.PDFPAGE_MoveTo(30, 30);
PDF.PDFPAGE_LineTo(80, 80);
PDF.PDFPAGE_LineTo(130, 30);
PDF.PDFPAGE_Stroke;
PDF.EndDoc;
C/C++
[copy to clipboard]
// PDF object is supposed to be created
PDF->BeginDoc();
PDF->PDFPAGE_SetLineWidth(10);
PDF->PDFPAGE_SetMiterLimit(1);
PDF->PDFPAGE_SetLineJoin(TxLineJoin.ljMiter);
PDF->PDFPAGE_MoveTo(30, 30);
PDF->PDFPAGE_LineTo(80, 80);
PDF->PDFPAGE_LineTo(130, 30);
PDF->PDFPAGE_Stroke();
PDF->EndDoc();
// PDF object is supposed to be created
PDF.BeginDoc();
PDF.PDFPAGE_SetLineWidth(10);
PDF.PDFPAGE_SetMiterLimit(1);
PDF.PDFPAGE_SetLineJoin(TxLineJoin.ljMiter);
PDF.PDFPAGE_MoveTo(30, 30);
PDF.PDFPAGE_LineTo(80, 80);
PDF.PDFPAGE_LineTo(130, 30);
PDF.PDFPAGE_Stroke();
PDF.EndDoc();
Visual Basic
[copy to clipboard]
' PDF object is supposed to be created
PDF.BeginDoc
PDF.PDFPAGE_SetLineWidth 10
PDF.PDFPAGE_SetMiterLimit 1
PDF.PDFPAGE_SetLineJoin 0 'ljMiter = 0
PDF.PDFPAGE_MoveTo 30, 30
PDF.PDFPAGE_LineTo 80, 80
PDF.PDFPAGE_LineTo 130, 30
PDF.PDFPAGE_Stroke
PDF.EndDoc
Syntax