Text position of linear drawing dimension

[m_baczewski]

Hi, after changing the position of the linear dimension text, the dimension lines become dashed. How can I make them solid again? I wrote a short code for this and it looks like the one below:

Dim oDoc As DrawingDocument
oDoc = ThisApplication.ActiveDocument

Dim oSheet As Sheet
oSheet = oDoc.ActiveSheet

Dim oTG As TransientGeometry = ThisApplication.TransientGeometry

Dim point As Point2d
Dim point1 As Point2d

Dim oDimensions As DrawingDimensions
oDimensions = oSheet.DrawingDimensions

Dim oDimension As LinearGeneralDimension
oDimension = oDimensions.Item(12)

point = oTG.CreatePoint2d(25.71,14.2)


oDimension.Text.Origin = point

 

Image before the changes:

 

Image after the changes:

 

[dalton98]

oDimension.Style.LineType = LineTypeEnum.kContinuousLineType

[Michael.Navara]

I tested your code and I can't confirm this behavior. Everything works as expected.

The issue is not in code.