Обратная задача для функции Mtext.ExplodeFragments

Автор Тема: Обратная задача для функции Mtext.ExplodeFragments  (Прочитано 2346 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн Алексей (IdeaSoft)Автор темы

  • ADN
  • *
  • Сообщений: 1188
  • Карма: 9
    • idea-soft.ru
  • Skype: makar_govorun
Привет всем! С прошедшими новогодними праздниками!
Ранее в темах я поднимал вопрос о получении фрагментов текстов из объекта MText
Есть функция для этого ExplodeFragments.
С помощью нее я могу получить массив фрагментов.

Делаю так:
Код - vb.net [Выбрать]
  1. '...
  2. ObjMT.ExplodeFragments(New CAD_DBS.MTextFragmentCallback(AddressOf acadnet_primitive_GetMtextLines))
  3. '...
  4. Private Function acadnet_primitive_GetMtextLines(ByVal Param As CAD_DBS.MTextFragment, _
  5.          ByVal myData As Object) As CAD_DBS.MTextFragmentCallbackStatus
  6.      
  7.       Dim str As String = Param.Text
  8.       GetMLinesNorm.Add(str)
  9.       Return CAD_DBS.MTextFragmentCallbackStatus.Continue
  10.  
  11. End Function
  12.  
  13.  

Я добавляю фрагменты в список строк GetMLinesNorm as List(of String)
А как мне подменить тексты в этих фрагментах Mtext?
Ведь Param.Text только для чтения.

Хочу попробовать вариант через вставку полей в MText
Что-то не найду подходящего поля в категории полей.