progeCAD support, tips and troubleshooting forum. progeCAD works very similar to some versions of AutoCAD. Moderated.

Moderators: caddit, Moderators

#2205 by thomasullmann
Sun Dec 28, 2014 12:00 pm
is it possible to Change (not only read) the TextInside property of a Dimension?

Sub bem_mitte_ein_aus()
Dim MyDok As IntelliCAD.Document
Dim DimObj As Object
Dim BasicPkt As IntelliCAD.Point

On Error Resume Next
Set MyDok = Application.ActiveDocument
MyDok.Utility.GetEntity DimObj, BasicPkt, vbCr & "choose dimension"
If Err <> 0 Then 'wenn nichts ausgewählt wurde dann ende
Err.Clear
MsgBox "nothing choosed, Program-End."
Exit Sub
End If
If DimObj.EntityName <> "DimRotated" Then 'wenn keine bemaßung gewählt wurde dann ende
MsgBox "no dimension choosed, Program-End."
Exit Sub
End If
On Error GoTo 0

'#### the following is working
MsgBox DimObj.TextInside

'### this doesnt work
DimObj.TextInside = Not (DimObj.TextInside)
' ### the error is
' run-time-error 2147417848 (80010108)
' method 'TextInside' of object 'IIcadDimRotated' failed
End Sub

Recent Topics

User avatar Reloading ProgeCad2016

by caddit

Wed Apr 05, 2017 11:33 pm

Default Avatar Start ProgeCad by C# dll Error

by ftauto

Mon Mar 20, 2017 3:44 pm

User avatar Mathcad Prime 4.0 Released

by caddit

Wed Mar 08, 2017 10:40 pm

User avatar Lisp routine help

by caddit

Wed Mar 08, 2017 10:30 pm

Default Avatar Classic/Ribbon menu help

by SClapham

Sun Feb 19, 2017 11:04 am

Twitter

About Us

Welcome to Ausstralia/New Zealand's CADDIT CAD software forum. CAD CAM Forum for support and discussion regarding AutoCAD, progeCAD IntelliCAD, Geomagic Freeform, Mathcad, CNC software.

This forum offers free support for progeCAD by qualified technical staff. Thank you for visiting.

CADDIT.net

The CADDIT.net team