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

Вернуться   Форум DWG.RU > Программное обеспечение > AutoCAD > Как удалить гиперссылку из описания дин.блока?

Как удалить гиперссылку из описания дин.блока?

Ответ
Поиск в этой теме
Непрочитано 18.01.2010, 11:23 #1
Как удалить гиперссылку из описания дин.блока?
чеснок
 
Регистрация: 26.10.2009
Сообщений: 55

Спер дин.блок (у Garbina или Kriegera), а переделывать неохота, а блок с гиперссылкой, которая нафиг ненужна.
Думал что её(гиперссылку) можно удалить из описания блока. Но, фигня в том, что при удалении гиперссылки, что можно сделать в описании блока (команда _block), стераются динамические параметры этого блока. Причем, оказалось, что при внесении любых изменений в описание блока, теряются параметры динамичности.
Что-то мне это не нравится.
AutoCAD 2008 рус SP1.

Вложения
Тип файла: zip DynBlockLeader.zip (23.5 Кб, 88 просмотров)


Последний раз редактировалось чеснок, 18.01.2010 в 13:31. Причина: Пользуйтесь наздоровье )
Просмотров: 6523
 
Непрочитано 18.01.2010, 13:08
#2
Кулик Алексей aka kpblc
Moderator

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


Образчик приложи.
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Непрочитано 18.01.2010, 13:22
#3
kheylan


 
Регистрация: 24.05.2009
Екатеринбург
Сообщений: 86


Из блока удаляю гиперссылку вот так, сначала выделяю блок, потом нажимаю кнопку на палитре с таким макросом
^C^C_BEDIT;^C^C_-hyperlink;_r;_All;;*;^C^C_BCLOSE;_save;
и так каждый блок поочереди
Может кто знает лучше?!
kheylan вне форума  
 
Непрочитано 18.01.2010, 13:34
#4
Кулик Алексей aka kpblc
Moderator

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


Нечто типа
Код:
[Выделить все]
(vl-load-com)

(defun c:remove-all-hyper (/ adoc *error* fun_remove-hyper)

  (defun *error* (msg)
    (vla-endundomark adoc)
    (princ msg)
    (princ)
    ) ;_ end of defun

  (defun fun_remove-hyper (blk)
    (vlax-for ent blk
      (if (wcmatch (strcase (vla-get-objectname ent)) "*BLOCK*")
        (fun_remove-hyper (vla-item (vla-get-blocks adoc) (vla-get-effectivename ent)))
        (if (> (vla-get-count (vla-get-hyperlinks ent)) 0)
          (vlax-for lnk (vla-get-hyperlinks ent)
            (vla-delete lnk)
            ) ;_ end of vlax-for
          ) ;_ end of if
        ) ;_ end of if
      (vla-update ent)
      ) ;_ end of vlax-for
          ;(vla-update blk)
    ) ;_ end of defun

  (vla-startundomark (setq adoc (vla-get-activedocument (vlax-get-acad-object))))
  (vlax-for blk_def (vla-get-blocks adoc)
    (if (and (equal (vla-get-islayout blk_def) :vlax-false)
             (equal (vla-get-isxref blk_def) :vlax-false)
             ) ;_ end of and
      (fun_remove-hyper blk_def)
      ) ;_ end of if
    ) ;_ end of vlax-for
  (vla-regen adoc acallviewports)
  (vla-endundomark adoc)
  (princ)
  ) ;_ end of defun
В коде были ошибки, исправил
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Автор темы   Непрочитано 18.01.2010, 14:03
#5
чеснок


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


kheylan, не подходит. У тебя удаляются гиперссылки у объектов в блоке. Там их и нет. Ссылка прикреплена к описанию блока (команда _block).
Кулик Алексей aka kpblc, наскольео я разобрался у тебя тоже удаляются гиперссылки из объектов в описании блока. Тоже не подходит.

Балуюсь NET'ом, но с разбегу ничего не нашел у типа BlockTableRecord связанного с гиперссылками (hyperlink). Где она хранится то?
чеснок вне форума  
 
Непрочитано 18.01.2010, 14:40
#6
vadim_evg1


 
Регистрация: 08.01.2007
Рус
Сообщений: 398


Цитата:
Сообщение от чеснок Посмотреть сообщение
Но, фигня в том, что при удалении гиперссылки,......стераются динамические параметры этого блока
Так, чтоле?
Вложения
Тип файла: dwg
DWG 2004
DynBlockLeader.dwg (42.3 Кб, 1101 просмотров)
vadim_evg1 вне форума  
 
Непрочитано 18.01.2010, 14:52
#7
Кулик Алексей aka kpblc
Moderator

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


чеснок, я не зря просил именно образец. А так-то да, я делал по аналогу макроса. Хотя как ты гиперссылку на описание блока засунул, не затрагивая никаких объектов - для меня загадка
P.S. Свойства Hyperlinks у описания блока я тоже не видел.
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Непрочитано 18.01.2010, 15:01
#8
AlexV

Инженер
 
Регистрация: 02.10.2008
С-Пб
Сообщений: 3,692


Цитата:
Сообщение от Кулик Алексей aka kpblc Посмотреть сообщение
чеснок, я не зря просил именно образец. А так-то да, я делал по аналогу макроса. Хотя как ты гиперссылку на описание блока засунул, не затрагивая никаких объектов - для меня загадка
P.S. Свойства Hyperlinks у описания блока я тоже не видел.
Может, так:

У описания блока нет свойства Hyperlinks, а у AcadBlockReference есть..
Миниатюры
Нажмите на изображение для увеличения
Название: Безымянный.jpg
Просмотров: 1670
Размер:	36.3 Кб
ID:	32037  
__________________
...Не пытайся гнуть ты ложку,
Не вяжи её узлом.
Ложка - ложка понарошку,
А по правде, - это лом!
AlexV вне форума  
 
Непрочитано 18.01.2010, 15:13
#9
Кулик Алексей aka kpblc
Moderator

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


<...> Фигню написал
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Автор темы   Непрочитано 18.01.2010, 15:39
#10
чеснок


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


vadim_evg1, Да. Как?
чеснок вне форума  
 
Непрочитано 18.01.2010, 16:04
#11
vadim_evg1


 
Регистрация: 08.01.2007
Рус
Сообщений: 398


Элементарно.
Редактор блока-панель свойств(ничего не выделяя) - гиперссылка - удалить
vadim_evg1 вне форума  
 
Автор темы   Непрочитано 18.01.2010, 16:22
#12
чеснок


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


vadim_evg1, для меня это открытие, не знал, что в редакторе блоков, в палитре свойств понапихано всего. Не замечалось как-то ). Спасибо!

Про программный способ вопрос открыт ).
чеснок вне форума  
 
Непрочитано 24.01.2017, 10:27
1 | #13
perpetule


 
Регистрация: 23.09.2008
Волгоград
Сообщений: 805
<phrase 1= Отправить сообщение для perpetule с помощью Skype™


Цитата:
Про программный способ вопрос открыт
Присоединяюсь к просьбе
-----------------------------------
Отбой - есть стандартная команда

Команда AC 2014
Удаление гиперссылок в чертеже

УРЛРАЗОРВАТЬ
_DETACHURL

P.S. Команды нет в иконках, только командная строка!

Обратная команда
УРЛСВЯЗАТЬ
_ATTACHURL
Вложения
Тип файла: zip иконки-24-24-для-2-команд-.zip (564 байт, 20 просмотров)
__________________
tc71

Последний раз редактировалось perpetule, 24.01.2017 в 12:12.
perpetule вне форума  
 
Непрочитано 24.01.2017, 11:35
#14
Хмурый


 
Регистрация: 29.10.2004
СПб
Сообщений: 16,379


Цитата:
Сообщение от perpetule Посмотреть сообщение
_DETACHURL
Спасибо, а то я через Ctrl+K удалял.
Хмурый вне форума  
 
Непрочитано 05.02.2017, 17:18
#15
frostmourn


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


Цитата:
Сообщение от perpetule Посмотреть сообщение
Отбой
Нет-нет-нет! То есть, может быть, в #13 и #14 и говорится о гиперссылке во вхождении блока, но у автора из #1 она в описании, а такая как раз этими командами не удаляется.
Цитата:
Сообщение от чеснок Посмотреть сообщение
Где она хранится то?
Хранится в расширенных данных, соответственно для удаления надо очистить РД блока - это к вопросу о программном удалении.
frostmourn вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > AutoCAD > Как удалить гиперссылку из описания дин.блока?



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
как удалить ненужные слои FruSnork AutoCAD 33 08.12.2023 12:09
Как удалить Selection Set, не зная его имени? Torino Программирование 15 08.11.2017 22:01
как АБСОЛЮТНО удалить Автокад не снося Винды? newAndrey AutoCAD 3 12.02.2009 09:35
Мониторы LCD CRT Разное 94 17.06.2008 10:51
Как программно удалить Стиль Текста Led AutoCAD 2 12.01.2004 14:35