Vytisknout stránku | Zavřít okno

Hromadné odznačenie šrafy

Vytištěno z: CAD Fórum
Kategorie: Autodesk - stavebnictví, strojírenství, CAD/GIS
Název fóra: AutoCAD
Popis fóra: Otázky kolem aplikací AutoCAD a AutoCAD LT, AutoCAD 360, prohlížečů, DWG a DWF, Design Review, Navisworks, nadstavby, 123D, A360 a cloud Autodesk 360
URL: https://www.cadforum.cz/forum/forum_posts.asp?TID=29621
Datum vytištění: 29.dub.2026 v 22:23


Téma: Hromadné odznačenie šrafy
Odeslal: mikeborecek
Předmět: Hromadné odznačenie šrafy
Datum odeslání: 07.lis.2019 v 11:54
Zdravím,
keď editujem hranice konkrétnej šrafy, je možné odznačiť viac hraníc naraz alebo len po jednom ako to robím teraz?



Odpovědi:
Odeslal: Vladimír Michl
Datum odeslání: 07.lis.2019 v 14:59
Pokud editujete jejich tvar, musíte jednotlivě. Pokud je např. posouváte, můžete hromadně.

-------------
Vladimír Michl (moderátor)
ARKANCE CZ - https://arkance.world - arkance.world
(podpora viz helpdesk.arkance-systems.cz)


Odeslal: mikeborecek
Datum odeslání: 07.lis.2019 v 15:01
skôr som myslel to, že keď mám šrafu ktorá má 5 hranic a potrebujem 3 odobrať, či je to možné robiť nejakým hromadním odznačením, lebo len jednotlivo cez ikonku "remove" v hatch editore?


Odeslal: Vladimír Michl
Datum odeslání: 07.lis.2019 v 21:05
To ne, tento typ úprav se musí dělat jednotlivě (nebo programově, přes API).

-------------
Vladimír Michl (moderátor)
ARKANCE CZ - https://arkance.world - arkance.world
(podpora viz helpdesk.arkance-systems.cz)


Odeslal: johny
Datum odeslání: 08.lis.2019 v 11:48
Je to zajímavé... jeden by si myslel, že když má výzvu "Select objects: " tak by mělo jít vybrat těch hranic hned několik...
Každopádně můžete dát tu šrafu separovat a pak smazat kolik chcete najednou. Nikdy jsem moc nepochopil, k čemu je dobré mít jednu šrafu přes víc lokací... Nepoužívám to.


Odeslal: mikeborecek
Datum odeslání: 08.lis.2019 v 11:51
Ak mám šrafu, ktorú by som menil, čo sa mi občas stáva, pri zmene mierky, tak označím konkrétnu šrafu, ktorá označí všetky potrebné hranice pre zmenu buď šrafy, mierky, uhla ...

Skôr mi príde absurdné že pri výbere hraníc ne možnosť klasického "AutoCAD výberu", ale pri odobratí už nie. Človek by čakal, že by to mohlo byť rovnaké


Odeslal: johny
Datum odeslání: 08.lis.2019 v 15:30
Však jak píšu... ono se to tváří že to umí, dokonce to hlásí "vyber objekty", ale neumí. Asi někdo myslel... a skutek utek.

Jen tak cvičně jsem zkoušel dát dohromady nějaký lisp... je to taková splácanina sledující svůj účel, ale vypadá, že funguje.


(vl-load-com)

(defun c:BoundariesRemove (/ sh eh lst ss sk i en)

  (if (and (or (setq sh (ssget "I"))
       (prompt "\nImplied selection required."))
   (or (= (sslength sh) 1)
       (prompt "\Single select required."))
   (setq eh (ssname sh 0))
   (or (= (cdr (assoc 0 (entget eh))) "HATCH")
       (prompt "\nHatch object reqired."))
   (setq lst (mapcar 'cdr (vl-remove-if-not '(lambda (x) (= 330 (car x))) (entget eh))))
   (setq ss (ssadd))
   )
    (progn
      (foreach e lst (ssadd e ss))
      (command-s "_.select" ss "_r")
      (setq sk (ssget "P"))
      (command "_.zoom" "_e")
      (command "_.hatchedit" eh "_remove")
      (repeat (setq i (sslength ss))
(setq en (ssname ss (setq i (1- i))))
(if (not (ssmemb en sk))
  (command (trans (vlax-curve-getstartpoint en) 0 1))))
      (command "")
      (command "_.zoom" "_p")
      (sssetfirst nil sh)))
  (princ)
)


Odeslal: mikeborecek
Datum odeslání: 08.lis.2019 v 15:34
Funguje perfektne.

ĎAKUJEM!!!Clap



Vytisknout stránku | Zavřít okno