Již 10.000+ CAD tipů.
Přes 118.000 registrovaných u nás, celkem 1.092.000 registrovaných (CZ+EN), přes 53.000 CAD/BIM bloků.
Vyzkoušejte nový přesný Inženýrský kalkulátor.
Kompletní příkazy AutoCADu a proměnné AutoCADu 2026.
CAD tip # 13717:
Otázka
A
Seznam všech adres URL připojených jako hypertextové odkazy k vybraným objektům DWG ve výkresu AutoCADu lze zobrazit pomocí následující LISP funkce (definující příkaz HYPERLIST). Uložte její kód jako soubor .LSP, načtěte jej pomocí příkazu APLČTI a zadejte příkaz HYPERLIST.
;List hyperlinks (URLs)
(defun C:HYPERLIST (/ ss ent aurl www)
(and
(setq ss (ssget '((-3 ("PE_URL")))))
(foreach ent (vl-remove-if 'listp (mapcar 'cadr (ssnamex ss)))
(setq aurl (cdadr (assoc -3 (entget ent '("PE_URL")))))
(if (= "" (setq www (cdr (assoc 1000 aurl))))
(print (cdr (assoc 1000 (reverse aurl))))
(print www)
)
)
)
(princ)
)
platí pro: AutoCAD · AutoCAD LT · Civil 3D 3D · AutoCAD Map 3D · AutoCAD Plant 3D 3D · AutoCAD Architecture ·