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

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

Сжатие текста

Ответ
Поиск в этой теме
Непрочитано 03.03.2008, 21:21 #1
Сжатие текста
paradoxvaha
 
проектирование противооползневых сооружений
 
Yalta
Регистрация: 06.04.2007
Сообщений: 50

Вечер добрый! Помогите пожалуйста разобраться с текстом.
Можно ли как то програмно задать "Width factor" для текста?

Есть вот такая строка:
(command "_text" (list 300 300) "300" "0" x_kon)
но в таком варианте выводимый текст пишется с параметром "Width factor" = 1, можно ли его как то уменьшить (програмно), то есть немного сжать текст?
Просмотров: 3629
 
Непрочитано 04.03.2008, 09:19
#2
Makswell

Инженер-строитель
 
Регистрация: 15.08.2007
Киров
Сообщений: 2,204


Посмотри здесь:
http://dwg.ru/f/showthread.php?t=13271
Makswell вне форума  
 
Непрочитано 04.03.2008, 09:24
#3
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,996


Код:
[Выделить все]
 
(command "_text" (list 300 300) "300" "0" "TEST")
(entmod (subst
          (cons 41 0.8) ;_0.8 - сжатие
          (assoc 41 (setq ed (entget (entlast))))
          ed
          )
        )
Я бы рекомендовал проверять на 0 высоту текста в стиле
Код:
[Выделить все]
 
(if (= (cdr (assoc 40 (tblsearch "STYLE" (getvar "TEXTSTYLE")))) 0.0)
     (progn
     ;; нулевая высота текста
     ;;Команда текст запрашивает высоту
     ;;Что-то делаем
     ) ;_ end of progn
     (progn
       ;; фиксированнная высота
       ;;Команда текст не запрашивает высоту
     ;;Что-то делаем       
     ) ;_ end of progn
   )
Вариант 2:
Entmake. Как пример: entmaketext
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Автор темы   Непрочитано 05.03.2008, 22:45
#4
paradoxvaha

проектирование противооползневых сооружений
 
Регистрация: 06.04.2007
Yalta
Сообщений: 50
<phrase 1=


Всем спасибо, разобрался, всё работает!
paradoxvaha вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Сжатие текста

Реклама i
Опции темы Поиск в этой теме
Поиск в этой теме:

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
LISP. Вставка в таблицу поля, соотвествующего площади примитива Profan Готовые программы 272 06.06.2021 23:12
Выравнивание текста pasha_1977 AutoCAD 12 16.03.2020 18:27
Редактирование текста в AutoCAD2008 kkiak AutoCAD 7 01.10.2009 12:29
сжатие текста в размерах Axel_ AutoCAD 2 03.12.2007 14:15
Изменение форматированного текста посредством lisp Tramp LISP 4 03.03.2006 11:28