Hello,

I try to create a sketchblock definition (circle with an arrow) through the API. But when I try using then sketchmanager to create a circle or a line an error occurs.

Dim tmpModel As ModelDoc2

Dim tmpSketchManager AsSketchManager

Dim tmpSketchSegment(0) As SketchSegment

...

If tmpModel.GetType = swDocumentTypes_e.swDocDRAWING Then

     tmpModel.SetAddToDB(True)

     tmpSketchSegment(0) = tmpSketchManager.CreateCircleByRadius(0,0,0, 2.5 / 1000)

     ...

Thanks,