• Jevgeni
  • Восстановленный участник
  • На форуме с 14 августа 2003г.
  • Сообщений: 14
  • Спасибо: 0

Тема: Как автоматически вставлять название файла в чертеж?

Как сделать, чтобы в чертеж автоматически вставлялось название файла. И если я меняю название файла, то в чертеже происходили сответствующие изменения. (можно это сделать в AutoCAD 2004LT?)

  • На форуме с 23 апреля 2003г.
  • Сообщений: 795
  • Спасибо: 0

Re: Как автоматически вставлять название файла в чертеж?

Можно на lispe
(defun C:imf(/ nab fname btv)
  (setvar "cmdecho" 0)
  (setq fname(getvar "dwgname")) 
    (setq nab
       (ssget "x" (list (cons 1 fname))))
  (if nab
    (command "erase" nab "")
    )
  (setq btv (getpoint "\n Введите точку вставки текста:"))
    (command "text" btv
         (getvar "textsize") 0 fname)
  )

  • Jevgeni
  • Восстановленный участник
  • На форуме с 14 августа 2003г.
  • Сообщений: 14
  • Спасибо: 0

Re: Как автоматически вставлять название файла в чертеж?

К сожалению у меня установлен AutoCAD 2004LT, и я не могу пользоваться lisp. может возможно как-нибудь иначе?

  • На форуме с 23 апреля 2003г.
  • Сообщений: 795
  • Спасибо: 0

Re: Как автоматически вставлять название файла в чертеж?

Если нужно имя  с путем 

setq fname(strcat (getvar "dwgprefix")(getvar "dwgname")))

  • DMS
  • Восстановленный участник
  • На форуме с 9 августа 2002г.
  • Сообщений: 477
  • Спасибо: 0

Re: Как автоматически вставлять название файла в чертеж?

Вроде в LT спасёт только Diesel при наличии Express'ов:
$(substr,$(getvar,"dwgname"),1,$(-,$(strlen,$(getvar,"dwgname")),4))

  • Jevgeni
  • Восстановленный участник
  • На форуме с 14 августа 2003г.
  • Сообщений: 14
  • Спасибо: 0

Re: Как автоматически вставлять название файла в чертеж?

Cпасибо

  • На форуме с 29 августа 2002г.
  • Сообщений: 117
  • Спасибо: 0

Re: Как автоматически вставлять название файла в чертеж?

Можно и без Express'ов, повесить на кнопку макрос:
^C^C_text \\\$M=$(getvar,dwgname);
вставляет текст в чертеж - имя чертежа. Проверил на ACAD LT 2002 - работает.

  • Jevgeni
  • Восстановленный участник
  • На форуме с 14 августа 2003г.
  • Сообщений: 14
  • Спасибо: 0

Re: Как автоматически вставлять название файла в чертеж?

Извиняюсь, но вы можете обьяснить( мне тупому:) ), как посать макросы в CAD'e, ни разе не пробовал!

  • KIRILL.CO.IL
  • Восстановленный участник
  • На форуме с 29 мая 2003г.
  • Сообщений: 39
  • Спасибо: 0

Re: Как автоматически вставлять название файла в чертеж?

ДЕРЕВЕНСКИЙ СПОСОБ НА ВСЕ СЛУЧАИ ЖИЗНИ   
1  КОМАНДА STATUS 
2 ВЫДЕЛЯЮ ИМЯ ФАЙЛА И ЕГО МЕСТОПОЛОЖЕНИЕ
3 COPY
4 PASTE В ЧЕРТЕЖ
ПОЛУЧАЕМ  MTEXT ----  E:\skaner\luvr\alek-s.dwg
РАБОТАЕТ ВСЕГДА И ВЕЗДЕ   :)

  • Jevgeni
  • Восстановленный участник
  • На форуме с 14 августа 2003г.
  • Сообщений: 14
  • Спасибо: 0

Re: Как автоматически вставлять название файла в чертеж?

Разобрался как все это делать, но к сожалению мне не совсем это нужно было :(.
Мне нужно было сделать так, чтобы если я меняю название файла, то соответственно у меня и менялась бы надпись с названием в чертеже автоматически (я думал, что может можно использовать какие-нибудь переменные в тексте), но по ходу дела этого нельзя сделать в LT.

  • Jevgeni
  • Восстановленный участник
  • На форуме с 14 августа 2003г.
  • Сообщений: 14
  • Спасибо: 0

Re: Как автоматически вставлять название файла в чертеж?

> KIRILL.CO.IL
:)

  • На форуме с 29 августа 2002г.
  • Сообщений: 117
  • Спасибо: 0

Re: Как автоматически вставлять название файла в чертеж?

Кажется в лайте это сделать не получится. Diesel очень ограничен в своих возможностях. Можно получить значение переменной, но нельзя вытащить значение из объекта (текста). Ну и соответственно не получится сравнить старое и новое значение имени файла. А Лисп в лайте к сожалению не работает.

  • DMS
  • Восстановленный участник
  • На форуме с 9 августа 2002г.
  • Сообщений: 477
  • Спасибо: 0

Re: Как автоматически вставлять название файла в чертеж?

> Jevgeni
Создай объект RTEXT, а в нём вставь вышеуказанную строку.
Всё должно работать.

  • Jevgeni
  • Восстановленный участник
  • На форуме с 14 августа 2003г.
  • Сообщений: 14
  • Спасибо: 0

Re: Как автоматически вставлять название файла в чертеж?

Извиняюсь конечно, а как создать объект RTEXT?