| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Замена текстого стиля

Замена текстого стиля

Ответ
Поиск в этой теме
Непрочитано 24.03.2008, 17:03
Замена текстого стиля
Shoorup
 
Минск
Регистрация: 16.09.2006
Сообщений: 1,587

Может есть программы по замене текстового стиля.
Суть проблемы: Есть куча чертежей. Сделаны они оооочень плохо. Т.е есть ну очень много текстовых стилей, порой даже не используемых или пустых строк. Недавно было принято соглашение по замене текстового стиля на один стандартный. Простое выделение через быстрый выбор и замена не поможет т.к высота и степень сжатия для текста не известна заранее (чертежи разные и делали разные люди). Иногда все текстовые стили (не используемые) удалить не получается или их удаление занимает очень много времени. Хотелосьбы заменять их быстро и безболезненно. т.е. чтобы высота и степень сжатия, наклон сохранялись. а не используемые стили удалялись (пурж не всегда помогает)
__________________
Поезд который устал от ржавого здравомыслия рельсов...
Просмотров: 26374
 
Непрочитано 22.05.2008, 13:30
#21
zenon

Остекляем!!! Алюминим!!!
 
Регистрация: 21.02.2005
Москва
Сообщений: 3,680
<phrase 1=


VVA, зер гуд.
только вот в Mtext сбивается при наличии в нем разных шрифтов, то бишь 1 строка шрифт ***.shx другая ***.ttf третья опять shx.
Где-то мелькала прожка по снятию форматирования Mtext.
Может их объеденить????
__________________
Мы можем делать быстро, качественно и недорого, выбирайте любые 2 условия.:search:
zenon вне форума  
 
Непрочитано 22.05.2008, 15:02
#22
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,922
<phrase 1= Отправить сообщение для VVA с помощью Skype™


CTSU-Change Text Style with Unformat text

*** Код удален
Последняя версия здесь: LISP. Замена текстового стиля
__________________
Как использовать код на Лиспе читаем здесь

Последний раз редактировалось VVA, 03.06.2011 в 20:46. Причина: Актуальная версия
VVA вне форума  
 
Непрочитано 22.05.2008, 15:28
#23
zenon

Остекляем!!! Алюминим!!!
 
Регистрация: 21.02.2005
Москва
Сообщений: 3,680
<phrase 1=


VVA
CTSU-Change Text Style with Unformat text
выдает ошибку
Цитата:
Command: CTSU
; error: bad argument value: positive 0
прикладываю файл который некоррктно обрабатываеся командой
Preseci 15.05.2008.dwg
Цитата:
CTS - Change Text Style
Этой нормально обрабатывается, но не происходить сброса форматирования
__________________
Мы можем делать быстро, качественно и недорого, выбирайте любые 2 условия.:search:
zenon вне форума  
 
Непрочитано 22.05.2008, 16:01
#24
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,922
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Исправил
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 22.05.2008, 16:14
#25
zenon

Остекляем!!! Алюминим!!!
 
Регистрация: 21.02.2005
Москва
Сообщений: 3,680
<phrase 1=


VVA, спасибо, то что надо!!!
__________________
Мы можем делать быстро, качественно и недорого, выбирайте любые 2 условия.:search:
zenon вне форума  
 
Автор темы   Непрочитано 22.05.2008, 17:16
#26
Shoorup


 
Регистрация: 16.09.2006
Минск
Сообщений: 1,587
<phrase 1= Отправить сообщение для Shoorup с помощью Skype™


Да прога Ваще супер! Очень помогает от корявых рук! Эту прогу вообще стоит в Download добавить. Даже мои дедушки и бабушки разобрались
__________________
Поезд который устал от ржавого здравомыслия рельсов...
Shoorup вне форума  
 
Непрочитано 23.05.2008, 11:42
#27
Axel_


 
Регистрация: 07.11.2007
Сообщений: 16


Программа классная! А можно сделать так чтобы она заменяла только в выделенном?
Axel_ вне форума  
 
Непрочитано 23.05.2008, 12:47
#28
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,922
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Немного ее изменить. Но это чуть позже.
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 26.05.2008, 10:33
#29
dextron3

проектировшик
 
Регистрация: 01.01.2007
СССР
Сообщений: 5,138


VVA, спасибо, !
dextron3 вне форума  
 
Непрочитано 26.05.2008, 15:43
#30
Profan


 
Регистрация: 25.12.2005
Москва
Сообщений: 13,627


В "Готовые программы" надо ее добавить.
Profan вне форума  
 
Непрочитано 26.05.2008, 17:32
#31
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,922
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Я объединю 2 команды (со сносом форматировани и без), постараюсь учесть предложение Axel_, тогда и выложу
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 18.09.2008, 17:56
#32
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,922
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Обещанного 3 года ждут. Выложил здесь LISP. Замена текстового стиля
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 08.04.2011, 13:30
#33
serg72


 
Регистрация: 26.03.2011
Сообщений: 13


Требуется срочная помощь. В лиспе в простом тексте меняю имя шрифта с помощью vla-put-StyleName, но при переходе с курсива на прямой остается наклон текста. С помощью какого свойства можно отредактировать наклон?
serg72 вне форума  
 
Непрочитано 08.04.2011, 13:47
#34
Лиспер


 
Регистрация: 11.10.2010
Сообщений: 980


ObliqueAngle - кажется, так.
__________________
(/= RegDate StartReadDate)
Лиспер вне форума  
 
Непрочитано 08.04.2011, 15:13
#35
serg72


 
Регистрация: 26.03.2011
Сообщений: 13


Оно и есть. Спасибо.
serg72 вне форума  
 
Непрочитано 03.06.2011, 14:15
#36
ioderey

сам себе начальник
 
Регистрация: 02.06.2011
Санкт-Петербург
Сообщений: 3


Проконсультируйте новичка, пожалуйста!
В Чертеже1 нужно весь текст перевести в стиль Standart (шрифт Arial.ttf).
Делал так:
После ctsu, отмена, Standart - МТексты приобретают должный вид, а Тексты слегка утолщённый "корявый" вид.
После tsup часть Текстов становится нормальными (экспликация помещений), а часть так и остаётся "корявой".(Чертёж2).
Изменение высоты и ширины в свойствах некрасивых Текстов эту утолщённость не убирает.На печати эта утолщённость заметна на глаз, что не желательно.
Копирование "корявого" текста в момент редактирования Текста и вставка в новый Текст или МТекст делает шрифт нормальным, а простое копирование и вставка ничего не меняют.
Проблема в том, что таких файлов много и копирование/вставка каждого отдельного "корявого" Текста не выход.
Делал процедуру на XP+AutoCad2008 и Win7+AutoCad2010 - результат одинаковый.

Как избавиться от утолщенности шрифта?

P.S. Я не программист, и даже не проектировщик - попросили разобраться с проблемой.
Вложения
Тип файла: dwg
DWG 2007
Чертеж1.dwg (176.1 Кб, 1263 просмотров)
Тип файла: dwg
DWG 2007
Чертеж2.dwg (173.3 Кб, 1267 просмотров)
ioderey вне форума  
 
Непрочитано 03.06.2011, 20:54
#37
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,922
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Я у себя проблемы не увидил. Windows7, Автокад 2009 + все сервис паки. Сообщи версию автокада, наличие сервиспаков, версию Windows, приложи копию эркана с проблемой. Попробуй переписать тексты командой RETXT
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 04.06.2011, 12:25
#38
ioderey

сам себе начальник
 
Регистрация: 02.06.2011
Санкт-Петербург
Сообщений: 3


RETXT переписал 119 текстов без видимых изменений на экране.
Снимок сделан из Autocad x64 2010 русский + update2 и Windows 7 x64 sp1 со всеми последующими обновлениями.
dwg из моего первого поста сделаны в Autocad 2008 русский (сервиспаки не известно какие, машина на работе, а сегодня выходной) на Windows XP sp3 + обновления.
Исходный файл пробовали преобразовать и на других машинах с тем же результатом.

P.S. похожая проблема упоминалась vovan981 http://forum.dwg.ru/showthread.php?t=24790&page=5, но осталась без ответа.
Вложения
Тип файла: zip screen16.zip (52.4 Кб, 50 просмотров)
ioderey вне форума  
 
Непрочитано 05.06.2011, 11:50
#39
ioderey

сам себе начальник
 
Регистрация: 02.06.2011
Санкт-Петербург
Сообщений: 3


удалено

Последний раз редактировалось ioderey, 06.06.2011 в 09:21.
ioderey вне форума  
 
Автор темы   Непрочитано 18.01.2013, 09:52
#40
Shoorup


 
Регистрация: 16.09.2006
Минск
Сообщений: 1,587
<phrase 1= Отправить сообщение для Shoorup с помощью Skype™


Добрый день коллеги!
Нужна помощь, совет как решить проблему.

Сейчас довольно много чертежей сделано текстовым стилем с именем SCB и шрифтом romans.shx (коэффициент сжатия 0.8, высота разная, угол 0)
Требуется в этих чертежах сделать для этого же стиля (SCB) замену шрифта romans.shx на шрифт на StandartSCB.ttf и заменить коэффициент сжатия на 1.0

Допустим заменить в диспетчере стилей шрифт и коэффициент сжатия (КС) ручками довольно просто. Но на чертеже все тексты у которых был КС 0.8 так и остался. Приходится через "Быстрый поиск" искать все тексты, Мтексты, атрибуты с КС 0.8 и заменять на 1.0. А бывает сжимали тексты и 0.7, 0.6, 0.9 и т.д. Но самое страшное это то, что атрибуты в блоках быстро заменить я не знаю как.
+ к этому нужно избавиться от всех других стилей и согнать все в стиль SCB - но это задача №2

Макросом нужно сделать:
1. Заменить шрифт для стиля SCB. Там же КС ставим 1 - сделано
2. Устанавливаем стиль SCB по умолчанию - не знаю как
3. CST - как бы это все проделать макросом без выбора в окне стиля?
4. TSUP
5. Очищаем от других стилей - легко
Из минусов - все загоняется под один КС=1
Теперь это все нужно както загнать на кнопку чтоб пользователи одной кнопкой проделывали эти 5 пунктов
__________________
Поезд который устал от ржавого здравомыслия рельсов...

Последний раз редактировалось Shoorup, 18.01.2013 в 13:01.
Shoorup вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Замена текстого стиля

Размещение рекламы
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Создание размерного стиля amator Программирование 13 12.04.2009 00:45
детализация в advance steel 7.1 и настройка стиля. 8infinity Advance Steel 30 12.02.2009 00:23
замена шрифтов в документах Fenomen AutoCAD 7 16.01.2008 12:29
Как программно узнать масштабный коэфф. размерного стиля? kp+ Программирование 1 18.07.2006 12:37
Настройка "Стандартного" текстового стиля. Кулик Алексей aka kpblc AutoCAD 6 23.10.2003 22:49