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

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

Помогите разобраться с командой text

Ответ
Поиск в этой теме
Непрочитано 29.08.2011, 21:46 #1
Помогите разобраться с командой text
DoomBoom
 
Регистрация: 29.08.2011
Сообщений: 4

Возникла задача по созданию однострочного текста из командной строки, а именно путем вставки в командную строку команды text из буфера обмена со всеми параметрами и уже готовым текстом. К примеру, я набираю в блокноте следующее <текст выравнивание центр 100,100 0.5 0 “текст”> копирую все это в буфер обмена, а затем вставляю в командной строке автокада. Автокад все понимает до тех пор пока дело не доходит непосредственно до ввода самого текста. Он требует, чтобы я вводил его с клавиатуры. Если кто знает, подскажите, как добиться, чтобы текст не надо было вводить с клавиатуры, а его значение бралось из последовательности, которую я вставляю в командную строку.
Просмотров: 2763
 
Непрочитано 29.08.2011, 23:14
#2
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,829


Высота, установленная в настройках текстового стиля, чему равна?
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Автор темы   Непрочитано 29.08.2011, 23:29
#3
DoomBoom


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


По умолчанию 0.
DoomBoom вне форума  
 
Непрочитано 30.08.2011, 00:16
#4
Олег (jr.)

специалист по околачиванию грушевых деревьев
 
Регистрация: 14.09.2004
Pietari, Venäjä
Сообщений: 813


Используй эту функцию и забудь про высоту текста и т.д.
(кажется в редакции VVA):

Код:
[Выделить все]
 (defun text-draw (txt pnt height rotation justification)
   (if (null pnt)(command "_.-TEXT" "" txt)
   (if (= (cdr (assoc 40 (tblsearch "STYLE" (getvar "TEXTSTYLE"))))
    0.0
       ) ;_ end of =
     (progn
     ;; нулевая высота текста
       (if justification
   (command "_.-TEXT" "_J" justification "_none" pnt height rotation txt)
   (command "_.-TEXT" "_none" pnt height rotation txt)
       ) ;_ end of if
     ) ;_ end of progn
     (progn
       (if justification
   (command "_.-TEXT" "_J" justification "_none" pnt rotation txt)
   (command "_.-TEXT" "_none" pnt rotation txt)
       ) ;_ end of if
     ) ;_ end of progn
   ) ;_ end of if
     )
  (entlast)
)
Олег (jr.) вне форума  
 
Автор темы   Непрочитано 30.08.2011, 01:41
#5
DoomBoom


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


Олег (jr.), спасибо. Если не зтруднит, поясни пожалуйста в каком виде указывается аргумент pnt. Я так понимаю он отвечает за координатную привязку текста.

Последний раз редактировалось DoomBoom, 30.08.2011 в 01:50.
DoomBoom вне форума  
 
Непрочитано 30.08.2011, 02:21
#6
Олег (jr.)

специалист по околачиванию грушевых деревьев
 
Регистрация: 14.09.2004
Pietari, Venäjä
Сообщений: 813


Аргументы вроде:
txt - строка
pnt - точка вставки
height - высота текста
rotation - угол поворота (не помню в градсах или радианах, сам поверь)
justification -выравнивание (в виде строки "L","R","C","ML","MR","MC" итд)
Олег (jr.) вне форума  
 
Непрочитано 31.08.2011, 10:00
#7
alex8888

Инженер
 
Регистрация: 27.04.2009
Deutschland
Сообщений: 208


DoomBoom, для себя я сделал такую прогу (см.вложение), что тебе не нужно - можно в ней убрать, вроде бы работает
Вложения
Тип файла: lsp at_text.LSP (10.7 Кб, 53 просмотров)
alex8888 вне форума  
 
Автор темы   Непрочитано 01.09.2011, 16:43
#8
DoomBoom


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


2alex8888: Благодарю, буду разбираться
DoomBoom вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Помогите разобраться с командой text

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

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
AUTOCAD 2010 перестал переключаться в многооконный режим. Проблемы с переменными Андрей Х. AutoCAD 24 27.05.2015 10:17
Express Tools Perezz!! AutoCAD 483 13.02.2015 10:57
ориенитация текста размера при смене UCS baaba AutoCAD 12 17.03.2011 13:33
Помогите разобраться с командой Publish Minerva1978 AutoCAD 5 24.05.2010 06:17