The white background image is a conversion to PDF using cadimport dll, the black one is a free viewer of the same drawing.
Circle are rendered in different way... (see "9", "7", etc...)

Why ?
I'm drawing the circle in this way, due to a problem with radius property using iterate.
Code: Select all
Private Sub ImportPolyPDF(ByVal E As Object)
Dim First As Boolean = True
Dim StartPoint As DPoint
Dim PdfPoint As DPoint
'_Cb.SetLineWidth(0.5)
Me.CbPDFSetLineWidth(E.LineWeight)
_Cb.SetLineCap(PdfContentByte.LINE_CAP_ROUND)
_Cb.SetLineJoin(PdfContentByte.LINE_JOIN_ROUND)
SetColor(E)
For Each pt As DPoint In E.PolyPoints
Me.RealPointNode(pt, PdfPoint)
If First Then
CbPDFMove(PdfPoint)
First = False
StartPoint = pt
Else
_Cb.LineTo(PdfPoint.X, PdfPoint.Y)
End If
Next
_Cb.Stroke()
End Sub