Создание записей в таблицах стилей, слоев и т.п.

Как показала практика, приведенный пример не совсем жизнеспособен. Он прекрасно будет работать только в том случае, если в файле либо уже существует указанный текстовый стиль (и тогда выполняется его модификация), либо в файле с момента его открытия этого стиля еще не существовало.
Если же стиль был создан, а потом удален, то строка

вернет true, несмотря на то, что стиль имеет свойство IsErased = true. Что же делать?
Далее