Vytisknout stránku | Zavřít okno

Povinné přichytávání

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=31847
Datum vytištění: 18.dub.2026 v 12:51


Téma: Povinné přichytávání
Odeslal: barru
Předmět: Povinné přichytávání
Datum odeslání: 08.dub.2021 v 20:10
Dobrý den, 
je možné nějak nastavit povinné přichytávání na body, aby mi to lomový bod křivky udělalo pouze pokud se chytí na nějaký bod a ne jenom tak v prostoru?
Obkresluji řezy mračna štoly a tohle by mi usnadnilo práci.
Děkuji za odpovědi
Smile



Odpovědi:
Odeslal: Vladimír Michl
Datum odeslání: 08.dub.2021 v 21:57
Myslíte aby AutoCAD odmítl bod, který není určen uchopením? Vestavěná funkce na to není, ale možná by šlo naprogramovat. Napadají mne dvě cesty - buď zkontrolovat, jestli "pod" bodem existuje jiný objekt, nebo zkontrolovat zda souřadnice původně zadaného a "uchopením" modifikovaného bodu jsou identické.

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


Odeslal: johny
Datum odeslání: 09.dub.2021 v 16:43
No jestli to oklikáváte 3dpoly po nodech a máte zapnuté jen ty, tak toto by mohlo pomoct.
Návod k použití:  http://www.lee-mac.com/runlisp.html" rel="nofollow - http://www.lee-mac.com/runlisp.html

(defun c:3dpolynode ( / *error* p r)

   (defun *error* (errmsg)
    (if (not (wcmatch errmsg "Function cancelled,quit / exit abort,console break,end"))
      (princ (strcat "\nError: " errmsg)))
    (setvar 'cmdecho 1)
    (princ))
  
  (setq p (getpoint "\nSpecify start point of polyline: "))
  (setvar 'cmdecho 0)
  (command "_.3dpoly" "_node" p)
  (while (setq r (getpoint p "\nSpecify endpoint: "))
    (if (osnap r "node")
      (progn
(command "_node" r)
(setq p r))
      (princ "\nMissed, try again.")))
  (command "")
  (*error* "end")
  )



Vytisknout stránku | Zavřít okno