Проблема при копировании обозначения шероховатости

[xzenter]

Добрый день, коллеги!

Столкнулся с проблемой при копировании обозначения шероховатости (Не ГОСТ), см. картинку.  Если в полях требований имеется символ, то при копировании он превращается в нечто иное. Существует ли способ обойти эту проблему?

Код, который использую для копирования обозначения шероховатости:

Код - vb.net [Выбрать]

1. Dim oDrawDoc As DrawingDocument
2. oDrawDoc = ThisApplication.ActiveDocument
3.  
4. Dim oActiveSheet As Sheet
5. oActiveSheet = oDrawDoc.ActiveSheet
6.  
7. Dim oSymbol As SurfaceTextureSymbol
8. oSymbol=oActiveSheet.SurfaceTextureSymbols.Item(1)
9.  
10. Dim oTG As TransientGeometry
11. oTG = ThisApplication.TransientGeometry
12.  
13. Dim oLeaderPoints As ObjectCollection
14. oLeaderPoints = ThisApplication.TransientObjects.CreateObjectCollection
15.  
16. oLeaderPoints.Add(oTG.CreatePoint2d(0, 0))
17.  
18. oActiveSheet.SurfaceTextureSymbols.AddByDefinition(oLeaderPoints, oSymbol.Definition)

[mikazakov]

Да это какие то форменные глюки.
Напишу им в техподдержку, может когда нить поправят.

[mikazakov]

xzenter,
Ну вообщем ответили, с Автодеска, что это глюк и когда-нибудь они его поправят.

[xzenter]

mikazakov, большое спасибо за поддержку! Остается только ждать и надеяться)