Как поменять шрифт в автокаде на всем чертеже
Перейти к содержимому

Как поменять шрифт в автокаде на всем чертеже

  • автор:

Как изменить шрифт всех надписей чертежа за один раз в Autocad?

А надписи — это какие объекты? Однострочные тексты? Многострочные с принудительным форматированием? Атрибуты? Блоки с атрибутами? Блоки с многострочными атрибутами? OLE-объекты?

__________________
Моя библиотека lisp-функций

Обращение ко мне — на «ты».
Все, что сказано — личное мнение.

Кулик Алексей aka kpblc
Посмотреть профиль
Посетить домашнюю страницу Кулик Алексей aka kpblc
Найти ещё сообщения от Кулик Алексей aka kpblc

Регистрация: 27.10.2010
Калининград
Сообщений: 246

Попробуйте Format-Text-название текстового стиля (например Standard) — в падающем меню замените Arial на Romanc или Romans не помню.

Регистрация: 03.11.2011
Сообщений: 16
Сообщение от Кулик Алексей aka kpblc

А надписи — это какие объекты? Однострочные тексты? Многострочные с принудительным форматированием? Атрибуты? Блоки с атрибутами? Блоки с многострочными атрибутами? OLE-объекты?

простой Мтекст
http://files.mail.ru/35GIUU
Последний раз редактировалось massa99, 29.05.2012 в 22:27 . Причина: 1

LISP, C# (ACAD 200[9,12,13,14])

Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,810
У меня нет доступа на mail.ru. К посту приложить материал кто мешает?

__________________
Моя библиотека lisp-функций

Обращение ко мне — на «ты».
Все, что сказано — личное мнение.

Кулик Алексей aka kpblc
Посмотреть профиль
Посетить домашнюю страницу Кулик Алексей aka kpblc
Найти ещё сообщения от Кулик Алексей aka kpblc

Регистрация: 03.11.2011
Сообщений: 16
Сообщение от Кулик Алексей aka kpblc
У меня нет доступа на mail.ru. К посту приложить материал кто мешает?

DWG 2010 диплом на печать кран.dwg (2.93 Мб, 21882 просмотров)

LISP, C# (ACAD 200[9,12,13,14])

Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,810

Mtext не совсем простой: в нем принудительно задано форматирование. В поиск по словам «снять форматирование многострочного текста» и им подобным.

__________________
Моя библиотека lisp-функций

Обращение ко мне — на «ты».
Все, что сказано — личное мнение.

Кулик Алексей aka kpblc
Посмотреть профиль
Посетить домашнюю страницу Кулик Алексей aka kpblc
Найти ещё сообщения от Кулик Алексей aka kpblc

Регистрация: 11.05.2005
Сообщений: 6,991

LISP. Замена текстового стиля Там есть и деформатирование мтекста и приведение всех текстов к одному стилю и восстановление у текстов установок стиля.

__________________
Как использовать код на Лиспе читаем здесь
Регистрация: 30.05.2011
Сообщений: 27

А Сtrl+A, свойства, Мтекст, стиль (замена стиля с соответствующей гарнитурой шрифта) не решит вопрос?

Ivan Pushin
Посмотреть профиль
Найти ещё сообщения от Ivan Pushin

Регистрация: 11.05.2005
Сообщений: 6,991
Сообщение от Ivan Pushin

А Сtrl+A, свойства, Мтекст, стиль (замена стиля с соответствующей гарнитурой шрифта) не решит вопрос?

Сообщение от Кулик Алексей aka kpblc
Mtext не совсем простой: в нем принудительно задано форматирование
__________________
Как использовать код на Лиспе читаем здесь
Регистрация: 07.12.2007
Сообщений: 43

Задам здесь похожий вопрос. В чертеже есть надпись МТЕКСТ, по двойному клику — пишет что шрифт называеться gost, стиль STANDART. При снятии принудительного форматирования — выделил текст, нажал cntr+пробел — форматирование снимаеться и шрифт меняеться на TXT. Вообщем проблема в следующем. Хотел создать новый текстовый стиль с этим шрифтом (gost) — но когда захожу в меню, создать новый стиль — в списке шрифтов gost- а нету! Как вытащить этот шрифт в новый стиль, тоесть чтобы он в спсике шрифотов отобразился, а то получаеться что этим шрифтом (gost) можно пользоваться только копируя и вставляя его.
Файл прилагаю.

DWG 2004 шрифт гост.dwg (71.6 Кб, 20304 просмотров)

Регистрация: 25.01.2007
Сообщений: 740
подыму тему!
А как поменять стиль текста одним махом во всех атрибутах блока?

__________________
Time and time again
I witness a birth of a new-born star.
I climb the highest mountain
To find the essence of a new era.

Поиск и замена текста

  1. Выберите вкладку «Аннотации» > панель «Текст» > «Найти» . найти
  2. Введите текст, который необходимо найти, и нажмите клавишу ENTER. Можно ввести подстановочные знаки, чтобы определить текстовую строку. Дополнительные сведения о поиске с помощью подстановочных знаков см. в разделе Справка по подстановочным знакам. Откроется диалоговое окно «Поиск и замена».
  3. Введите фрагмент текста, которым следует заменить искомый фрагмент. Например, если в чертеже есть несколько похожих фрагментов и все их необходимо заменить на 4384K61, введите 4384K6? в поле «Найти» и 4384K61 в поле «Заменить на».
  4. Не обязательно. Выберите область поиска текстовых объектов в раскрывающемся списке параметра «Область поиска». Для того чтобы временно выйти из диалогового окна «Поиск и замена» и создать или изменить набор объектов, можно воспользоваться кнопкой «Выбрать объекты».
  5. При необходимости разверните диалоговое окно для настройки параметров поиска и ввода текста.

Прим.: Если в поле «Найти» указаны подстановочные знаки, убедитесь, что установлен флажок «Подстановочные знаки».

  • Щелкните «Найти» или «Найти далее», чтобы перейти к экземпляру. Нажмите «Заменить» для каждого экземпляра, текст которого нужно обновить.
  • Нажмите «Заменить все», чтобы обновить все экземпляры, подходящие под параметры поиска.

Поиск и замена текста в многострочном тексте

  1. Щелкните дважды многострочный текст.
  2. Щелкните вкладку «Текстовый редактор» > панель «Сервис» > «Поиск и замена» . найти Откроется диалоговое окно «Поиск и замена».

  • Щелкните «Найти далее», чтобы выделить каждый экземпляр. Нажмите «Заменить» для каждого экземпляра, текст которого нужно обновить.
  • Нажмите «Заменить все», чтобы обновить все экземпляры, подходящие под параметры поиска.
Понятия, связанные с данным

Как поменять шрифт в автокаде на всем чертеже

Если используемый на чертеже шрифт недоступен, он автоматически подменяется другим шрифтом.

Программа заменяет отсутствующий в системе шрифт другим шрифтом.

Задание альтернативного шрифта

Если используемый на чертеже шрифт отсутствует в системе, то он автоматически заменяется альтернативным шрифтом, заданным пользователем. По умолчанию используется файл шрифта simplex.shx. Если необходимо задать другой шрифт, требуется ввести имя файла альтернативного шрифта в системную переменную FONTALT. Если используется текстовый стиль, содержащий большой шрифт, можно привести его в соответствие с другим шрифтом с помощью системной переменной FONTALT. По умолчанию системная переменная использует пару файлов шрифтов txt.shx, bigfont.shx. Дополнительную информацию см. в разделе Использование шрифтов текста для работ в рамках международного сотрудничества .

В предыдущих версиях программы поддерживалось отображение шрифтов PostScript ® на чертеже. Так как в более поздних версиях шрифты PostScript не отображаются, в программе Autodesk используются шрифты, эквивалентные TrueType. Таблица соответствия шрифтов PostScript шрифтам, эквивалентным TrueType, хранится в файле соответствия шрифтов, поставляемом с программой.

Шрифты сторонних разработчиков или пользовательские SHX-шрифты, не имеющие TrueType-эквивалентов, заменяются одним из нескольких шрифтов TrueType, называемых шрифтами-заместителями. В контекстном редакторе шрифты-заместители отличаются по внешнему виду от замещаемых шрифтов для отображения того, что они служат заместителями шрифтов чертежа.

Пользовательские SHX-шрифты не отображаются в списке шрифтов на панели «Форматирование текста». Чтобы иметь возможность использовать такие шрифты, необходимо вначале создать текстовый стиль с нужным шрифтом, а затем применить его к фрагменту текста.

Использование файлов соответствия шрифтов

Иногда возникает необходимость использования в чертеже ограниченного набора шрифтов, или преобразования заданных в чертеже шрифтов в другие. В этом случае следует с помощью любого текстового редактора создать таблицу соответствия шрифтов.

Таблицы соответствия удобно использовать для подгонки чертежей под шрифтовые стандарты различных фирм, а также для ускорения вычерчивания рабочих вариантов чертежей. Например, при передаче чертежей консультантам в таблице соответствия шрифтов необходимо определить, какой шрифт следует применить при отображении текстового объекта, созданного с использованием другого шрифта. В ходе черновой работы надписи можно наносить с применением быстро обрабатываемых SHX-шрифтов, а для получения окончательного чертежа заменить их на более сложные шрифты, создав таблицу, ставящую в соответствие каждому из SHX-шрифтов его эквивалент.

Таблица соответствия шрифтов представляет собой текстовый ASCII-файл с расширением .fmp, в каждой строке которого записываются исходный и подставляемый вместо него шрифты. Каждая строка файла — это запись об одном соответствии шрифтов. Запись состоит из базового имени файла шрифта (без пути к его папке), точки с запятой (;) и имени файла шрифта, используемого для подмены. Имя файла, используемого для замены, содержит расширение файла, например .ttf.

Например, для замены файлом шрифта TrueType times.ttf файла шрифта romanc.shx в таблице соответствия необходимо сделать следующую запись:

Программа поставляется со стандартным файлом соответствия шрифтов. Его можно редактировать с помощью любого текстового редактора, поддерживающего формат ASCII. Для использования другой таблицы соответствия шрифтов ее имя можно задать в диалоговом окне «Настройка» или с помощью системной переменной FONTMAP. В следующей таблице приводятся правила замены шрифтов, применяемые, если файл шрифта не может быть обнаружен при открытии чертежа.

Как сделать автоматическую замену одного шрифта другим?

Форумы CADUser → Приемы работы → Текст (MTEXT) и шрифты → Как сделать автоматическую замену одного шрифта другим?

Страницы 1

Чтобы отправить ответ, вы должны войти или зарегистрироваться

Сообщения 10

#1 Тема от Nino 27 сентября 2005г. 21:34:53

Тема: Как сделать автоматическую замену одного шрифта другим?

Решил поменять шрифты, старые снёс, теперь проблема в старых чертежах всё, что набрано старыми шрифтами, в том числе и атрибуты в блоках, не отображаются.
При попытке изменения шрифта для конкретного стиля слетает выравнивание текста.
Как сделать, чтобы при открытии чертежа происходила автозамена дного шрифта на другой с сохранением выравнивания.

#2 Ответ от Nino 28 сентября 2005г. 09:22:04

Re: Как сделать автоматическую замену одного шрифта другим?

Похоже, что по поводу выравнивания — это глюк.
При изменении шрифта в стиле всё нормально.
Как сделать, чтобы при открытии чертежа происходила автозамена одного шрифта на другой?

#3 Ответ от kpblc 28 сентября 2005г. 09:44:04

Re: Как сделать автоматическую замену одного шрифта другим?
;|======================================================================================= * Функция создает текстовый стиль. Создание идет через (entmake). * Созданный стиль делается активным * Параметры вызова: * нет * Примеры вызова: (_kpblc-create-textstyle) =======================================================================================|; (defun _kpblc-create-textstyle (/ ent_list font_filename exist_style) (if (findfile "spds.shx") (setq font_filename (strcat (vl-filename-base (findfile "spds.shx")) ".shx")) (setq font_filename (strcat (vl-filename-base (findfile "simplex.shx")) ".shx")) ) ;_ end of if (setq ent_list (list '(0 . "STYLE") '(100 . "AcDbSymbolTableRecord") '(100 . "AcDbTextStyleTableRecord") '(2 . "SPDS") ; text style name '(70 . 0) ; '(40 . 0.0) ; text height '(41 . 0.8) ; width factor '(50 . 0.0) ; oblique angle '(71 . 0) ; not backwatf, not upside down '(42 . 2.5) ; last height used (cons 3 font_filename) ; primary font file name '(4 . "") ; big font file name ) ;_ end of list ) ;_ end of setq ;(entmake ent_list) (if (setq exist_style (tblobjname "style" "SPDS")) ;; Стиль есть, возвращаем стандартный вид (foreach item ent_list (_kpblc-ent-modify exist_style (car item) (cdr item)) ) ;_ end of foreach ;; Стиля нет, делаем его и нормализуем все примитивы (entmake ent_list) ) ;_ end of if (setvar "textstyle" "SPDS") ;(princ) ) ;_ end of defun

Тут в принципе все понятно. Если что — пиши.

#4 Ответ от kpblc 28 сентября 2005г. 09:44:49

Re: Как сделать автоматическую замену одного шрифта другим?

Упс, забыл одну функцию:

;|======================================================================================= * Функция модификации указанного бита примитива * Параметры вызова: * entity - примитив, полученный через (entsel), (entlast) etc * bit - dxf-код, значение которого надо установить * value - новое значение * Примеры вызова: (_kpblc-ent-modify (entlast) 8 "0") ; перенести последний примитив на слой 0 (_kpblc-ent-modify (entsel) 62 10) ; установить выбранному примитиву цвет 10 * Возвращаемое значение: * примитив с модифицированным dxf-списком. Примитив автоматически перерисовывается. =======================================================================================|; (defun _kpblc-ent-modify (ent bit value / ent_list old_dxf new_dxf) (if (not (and (or (= (cdr (assoc 0 (entget ent))) "STYLE") (= (cdr (assoc 0 (entget ent))) "DIMSTYLE") ) ;_ end of or (= bit 100) ) ;_ end of and ) ;_ end of not (progn (setq ent_list (entget ent) new_dxf (cons bit (if (and (= bit 62) (= (type value) 'str)) (if (= (strcase value) "BYLAYER") 256 0 ) ;_ end of if value ) ;_ end of if ) ;_ end of cons ) ;_ end of setq (if (not (equal new_dxf (setq old_dxf (assoc bit ent_list)))) (progn (entmod (if old_dxf (subst new_dxf old_dxf ent_list) (append ent_list (list new_dxf)) ) ;_ end of if ) ;_ end of entmod (entupd ent) (redraw ent) ) ;_ end of progn ) ;_ end of if ) ;_ end of progn ) ;_ end of if ent ) ;_ end of defun

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *