Diskuzní fórum, poradna
CAD diskuze, rady, výměna zkušeností |
Veřejné diskuzní fórum k CAD aplikacím - ptejte se na libovolné otázky týkající se oboru CAx, podělte se o vaše znalosti a zkušenosti s programy AutoCAD, Inventor, Revit, Fusion 360, 3ds Max a s dalšími CAD aplikacemi.
Zaregistrujte se nebo se přihlašte a zašlete váš příspěvek do odpovídajícího fóra. Viz další informace o CAD Fóru. Nechcete se registrovat? Zeptejte se v naší Facebook poradně.
Fórum nenahrazuje technický support firmy Arkance Systems (CAD Studio) - přímá podpora pro zákazníky funguje na helpdesk.cadstudio.cz
Dĺžka, resp obvod všetkých objektov vo výkrese |
Odpovědět | archiv |
Autor | |
FilipTo
Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
Nováček Přihlášen: 02.zář.2013 Lokalita: Slovensko Používám: AutoCad2007 Stav: Offline Bodů: 4 |
Téma: Dĺžka, resp obvod všetkých objektov vo výkrese Zasláno: 02.zář.2013 v 19:38 |
Zdravím užívateľov fóra,
pracujem na prevádzke LASER a potrebujem zistiť ako by bolo možné zobrazovať dĺžku, resp.obvod všetkých objektov vo výkrese. Jedná sa o súčiastky zložitého tvaru s vonkajším obvodom a viacerými vnútornými. V predchádzajúcich dávnejších príspevkoch som našiel jeden Prosím poraďte, veľmi by mi to uľahčilo moju prácu. Spomínaný lisp: (defun c:pll (/ ss cnt area len) (vl-load-com) (setq cnt 0 area 0.0 len 0.0) (if (ssget (list '(-4 . "<OR") '(0 . "CIRCLE") '(-4 . "<AND") '(0 . "ELLIPSE") '(41 . 0.0) (cons 42 (* 2 pi)) '(-4 . "AND>") '(-4 . "<AND") '(0 . "LWPOLYLINE") ;;; '(-4 . "&") ;;; '(70 . 1) '(-4 . "AND>") '(0 . "MPOLYGON") '(-4 . "<AND") '(0 . " ;;; '(-4 . "&") ;;; '(70 . 1) '(-4 . "<") '(70 . 8) '(-4 . "AND>") '(0 . "REGION") '(-4 . "<AND") '(0 . "SPLINE") '(-4 . "&") '(70 . 9) '(-4 . "AND>") '(-4 . "OR>") ) ) (progn (vlax-for obj (setq ss (vla-get-ActiveSelectionSet (vla-get-ActiveDocument (vlax-get- ) ) ) (setq cnt (1+ cnt) area (+ area (vla-get-area obj)) len (+ len (if (member (vla-get-ObjectName obj) '("AcDbMPolygon" "AcDbRegion") ) (vla-get-Perimeter obj) (vlax-curve-getDistAtParam obj (vlax-curve-getEndParam obj) ) ) ) ) ) ;; (princ "\nZTOTM v2.1 - Cercle, Polyligne, Ellipse, Spline, Region, MPOLYGON") (princ "\nZTOTM v2.1 - Circle, Pline, Ellipse, Spline, Region, MPOLYGON") ;; (princ (strcat "\n""TOTAL -Surface: "(rtos area) " -Perimetre: "(rtos len)" -Objets: "(itoa cnt) (princ (strcat "\n""TOTAL -Area: " (rtos area) " -Length: " (rtos len)" -Objects: "(itoa cnt) )) (vla-delete ss) ) (prompt "\n*** Rien de Valable / Nothing available ") ) (princ) ) (princ "\n==> ZTOTM (Version 2.1) ") (princ)
|
|
Vladimír Michl
Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
Moderátor Arkance Systems Přihlášen: 09.zář.2004 Lokalita: ČR (JČ) Používám: Dodáváme produkty Autodesk Stav: Offline Bodů: 21472 |
Zasláno: 10.zář.2013 v 09:38 |
Zkuste do seznamu (pro member) přidat AcDbLine a AcDbArc. Ale na sčítání délek už existují hotové nástroje - např. náš Addlen (viz Download).
|
|
FilipTo
Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
Nováček Přihlášen: 02.zář.2013 Lokalita: Slovensko Používám: AutoCad2007 Stav: Offline Bodů: 4 |
Zasláno: 20.zář.2013 v 21:41 |
Veľmi pekne ďakujem za odpoveď, velice mi to uľahčilo robotu.
Zaujíma ma ešte jedna vec a to či sa dá niekde vypnúť tá otravná hláška : Soubor byl naposledy uložen v dxf2000, chcete uložit ve formáte cad2007? , potom ako zavieram výkresy. Totižto ukladám ich zásadne v dxf2000. |
|
Vladimír Michl
Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
Moderátor Arkance Systems Přihlášen: 09.zář.2004 Lokalita: ČR (JČ) Používám: Dodáváme produkty Autodesk Stav: Offline Bodů: 21472 |
Zasláno: 20.zář.2013 v 21:56 |
Toto hlášení asi vypnout nepůjde, ale je namístě - DXF je jen exportní/výměnný formát, není to plnohodnotná náhrada nativního souboru DWG. Asi by to šlo obejít např. pomocí utility PreSave.
|
|
vbehun
TOP uživatel Přihlášen: 04.říj.2004 Lokalita: ČR (ZL) Používám: Autocad R10 >> Autocad 2022 / altern. QCad Prof. Stav: Offline Bodů: 1221 |
Zasláno: 21.zář.2013 v 15:00 |
Brání něco v tom, aby se ukládalo ve formátu Autocad 2007 - když už jej používáte?
|
|
=^..^=
|
|
FilipTo
Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
Nováček Přihlášen: 02.zář.2013 Lokalita: Slovensko Používám: AutoCad2007 Stav: Offline Bodů: 4 |
Zasláno: 20.říj.2013 v 18:24 |
Brání - laser mašina :)
Ale ináč ďakujem za odpovede a pomoc. Veľmi mi to pomohlo.
|
|
Pro technickou podporu CAD
kontaktujte Helpdesk
Odpovědět | |
Přejít na fórum | Oprávnění fóra Nemůžete vytvářet nová témata v tomto fóru Nemůžete odpovídat na témata v tomto fóru Nemůžete vymazávat vaše příspěvky v tomto fóru Nemůžete upravovat vaše příspěvky v tomto fóru Nemůžete vytvářet ankety v tomto fóru Nemůžete hlasovat v anketách v tomto fóru |
Stránka byla vygenerována za 0,617 sekund.