Вставка текстовых надписей из txt файла

Kostinok · 28.07.2011, 01:42

Здравствуйте!

Может кто встречал реализацию такой программы, которая содержала бы текстовые шаблоны, шаблон надписи для соответствующих чертежей проекта, выбрав который, программа выводила текст на чертеж?

Alan · 28.07.2011, 11:05

Не совсем внятно написано...
Но так как я понял всё очень просто.
Есть текстовый файл (названный вами шаблон) <<имя файла>>. Его пишем на чертеж. Так?

Код:

[Выделить все]

 (setq point (getpoint "\n Укажите точку")
      fl    (open <<имя файла>> "r")
) ;_ конец setq
(while (setq s (read-line fl))
  (progn
    (command "_.TEXT" point 2.7 0 s)
    (setq point    (polar point (/ pi -2.) 6)
    ) ;_ конец setq  6 - шаг между строками в мм чертежа
  ) ;_ конец progn
  (close fl)
) ;_ конец while

Kostinok · 28.07.2011, 11:36

Да, все верно и работает шикарно.

Вчера как не искал, не мог найти подобную тему, а сегодня наткнулся на
http://forum.dwg.ru/showthread.php?p=284825
ЛИСП - Автозаписная книжка в реализации VVA.

Большое спасибо за подсказку.

28.07.2011, 01:42		#1
Вставка текстовых надписей из txt файла Kostinok Инженер-электрик Калининград Регистрация: 13.10.2007 Сообщений: 151 Здравствуйте! Может кто встречал реализацию такой программы, которая содержала бы текстовые шаблоны, шаблон надписи для соответствующих чертежей проекта, выбрав который, программа выводила текст на чертеж? __________________ Можно сопротивляться вторжению армий, вторжению идей сопротивляться невозможно. /В. Гюго/
Просмотров: 2234

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
План кабельных сетей - алгоритм автоматизации построения и программирование?	Frigate	Программирование	643	22.12.2022 15:13
LISP. Вставка в таблицу поля, соотвествующего площади примитива	Profan	Готовые программы	272	06.06.2021 23:12
Express Tools	Perezz!!	AutoCAD	483	13.02.2015 10:57
построение профиля с помошью лиспа	rino_black	LISP	9	27.11.2010 19:32

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

	Реклама i