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 (CAD Studio) - přímá podpora pro zákazníky funguje na helpdesk.arkance-systems.cz
plocha, objem telies |
Odpovědět | Stránka 12> archiv |
Autor | |
mikeborecek
TOP uživatel Přihlášen: 10.říj.2008 Lokalita: Slovensko Používám: AutoCAD 2016, 3ds Max 2016 Stav: Offline Bodů: 410 |
Možnosti příspěvku
Poděkování0
Zasláno: 20.úno.2024 v 13:50 |
Zdravím
viem nejako automaticky vytiahnúť do výkresu veľkosti plôch 3D objektov, ktoré sú vymodelované? Pomohli by aj objemy.
|
|
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ů: 21695 |
Možnosti příspěvku
Poděkování0
|
Pokud v AutoCADu, tak objemy lze zobrazovat automatickou popiskou fArea (fProp) - viz https://www.cadforum.cz/cz/dynamicke-zobrazeni-libovolne-vlastnosti-objektu-jako-pole-tip9481
|
|
Vladimír Michl (moderátor)
Arkance Systems s.r.o. - arkance.world (podpora viz helpdesk.arkance-systems.cz) |
|
mikeborecek
TOP uživatel Přihlášen: 10.říj.2008 Lokalita: Slovensko Používám: AutoCAD 2016, 3ds Max 2016 Stav: Offline Bodů: 410 |
Možnosti příspěvku
Poděkování0
|
funguje to, ale každý objekt musím "nastaviť" samostatne. viem potom cez field zrátať všetky položky?
Alebo je nejaká možnosť naraz vyviesť plochy označených 3D objektov?
|
|
mikeborecek
TOP uživatel Přihlášen: 10.říj.2008 Lokalita: Slovensko Používám: AutoCAD 2016, 3ds Max 2016 Stav: Offline Bodů: 410 |
Možnosti příspěvku
Poděkování0
|
ako viem potom informáciu o celkovej ploche objektov vyviesť do výkresu?
|
|
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ů: 21695 |
Možnosti příspěvku
Poděkování0
|
Můžete zkusit naši utilitu 3Dprops (viz Download). Výsledný objem či povrch vypíše a uloží do proměnné USERR1. Tu můžete zobrazit např. pomocí textového pole.
|
|
Vladimír Michl (moderátor)
Arkance Systems s.r.o. - arkance.world (podpora viz helpdesk.arkance-systems.cz) |
|
mikeborecek
TOP uživatel Přihlášen: 10.říj.2008 Lokalita: Slovensko Používám: AutoCAD 2016, 3ds Max 2016 Stav: Offline Bodů: 410 |
Možnosti příspěvku
Poděkování0
|
Možno je to banálna otázka, ale ako dokážem USERR1 dať do textu?
Je potom táto informácia o objeme/ploche adaptabilná - ak zmením veľkosť objektu zmení sa aj hodnota? Viem použiť na 2 separátne objekty? Teda aby som mal 2 rôzne adaptabilné hodnoty napr, plocha všetkých stien a plocha strechy?
|
|
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ů: 21695 |
Možnosti příspěvku
Poděkování0
|
Do textu ji vložíte kódem:
%<\AcVar userr1>% Ale není to adaptivní, to by bylo komplikovanější. Pokud by mělo sloužit pro více různých výběrů, tak by se asi musely ukládat i ty výběry, plus jejich výsledky.
|
|
Vladimír Michl (moderátor)
Arkance Systems s.r.o. - arkance.world (podpora viz helpdesk.arkance-systems.cz) |
|
mikeborecek
TOP uživatel Přihlášen: 10.říj.2008 Lokalita: Slovensko Používám: AutoCAD 2016, 3ds Max 2016 Stav: Offline Bodů: 410 |
Možnosti příspěvku
Poděkování0
|
Dakujem za info
v mojom prípade asi skôr využijem fArea ktoré je adaptívne a viem ho dostať do výkresu. Co by som ešte potreboval je nejakým spôsobom zrátať viac hodnôt takto dostaných cez field do výkresu. viem to urobiť v textovom poli?
|
|
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ů: 21695 |
Možnosti příspěvku
Poděkování0
|
Tohle je LISP kód té aplikace. Pokud by někoho napadla rozumná cesta jak ukládat a aktualizovat vlastnosti jednotlivých výběrů těles.
;Display sum of 3D props
;ARKANCE, 2024 - www.cadforum.cz
(defun C:3DPROPS ( / ss ssl en obj cmde i vals valsum minpt maxpt height width depth volume area)
(vl-load-com)
(princ "\nSelect 3D Solids <all>: ")
(setq ss (ssget '((0 . "3DSOLID"))))
(if (not ss) (setq ss (ssget "_X" '((0 . "3DSOLID")))))
(if (and ss (setq ssl (sslength ss)))(progn
(initget "Height Volume Surface")
(setq kwd (getkword "\nReport solids property [Volume/Surface/Height] <Volume>: "))
(if (not kwd)(setq kwd "Volume"))
(setq i 0 vals "" valsum 0)
;(princ "\nSearching... ")
(repeat ssl
(setq en (ssname ss i)
obj (vlax-ename->vla-object en)
)
(vla-getboundingbox obj 'minpt 'maxpt)
(setq minpt (vlax-safearray->list minpt) maxpt (vlax-safearray->list maxpt))
(setq width (- (car maxpt)(car minpt)))
(setq depth (- (cadr maxpt)(cadr minpt)))
(setq height (- (caddr maxpt)(caddr minpt)))
(setq volume (vl-catch-all-apply 'vla-get-volume (list obj )))
(if (vl-catch-all-error-p volume)(setq volume nil))
(if (= kwd "Surface")(progn
(setq cmde (getvar "CMDECHO")) (setvar "CMDECHO" 0)
(command "_AREA" "_Obj" en)(setq area (getvar "AREA"))
(setvar "CMDECHO" cmde)
))
(cond
((= kwd "Height") (setq vals (strcat vals (rtos height 2) "+") valsum (+ valsum height)))
((= kwd "Volume") (if volume (setq vals (strcat vals (rtos volume 2) "+") valsum (+ valsum volume))))
((= kwd "Surface") (setq vals (strcat vals (rtos area 2) "+") valsum (+ valsum area)))
)
(setq i (1+ i))
);rep
(princ (strcat "\nTotal " kwd "=" (rtos valsum 2) " (" (substr vals 1 (1- (strlen vals))) ") - see USERR1"))
(setvar "USERR1" valsum)
));if
(princ)
) ;defun
(princ "\n3Dprops command loaded.")
|
|
Vladimír Michl (moderátor)
Arkance Systems s.r.o. - arkance.world (podpora viz helpdesk.arkance-systems.cz) |
|
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ů: 21695 |
Možnosti příspěvku
Poděkování1
|
Tak ještě jedna iterace, obecnější. V nové verzi (1.1) lze promítnout objem do vlastnosti "Měřítko typu čáry", která už jde standardně vykazovat, včetně tabulek (a sumarizací) příkazu EXTRDATA. Reaktor na příkazu REGEN se postará o aktualizace této vlastnosti při případných změnách těles.
Viz: |
|
Vladimír Michl (moderátor)
Arkance Systems s.r.o. - arkance.world (podpora viz helpdesk.arkance-systems.cz) |
|
mikeborecek
TOP uživatel Přihlášen: 10.říj.2008 Lokalita: Slovensko Používám: AutoCAD 2016, 3ds Max 2016 Stav: Offline Bodů: 410 |
Možnosti příspěvku
Poděkování0
|
zistil som že regen nefunguje
musím nanovo spustiť 3dprops, potom dať updatedataextrakt až potom to obnoví
|
|
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ů: 21695 |
Možnosti příspěvku
Poděkování0
|
Na objemy by fungovat měl. Ale musíte v každém sezení "nahodit" ten reaktor - volba "Use object's LTscale" v příkazu 3DProps. Asi by také šlo nějak zautomatizovat.
|
|
Vladimír Michl (moderátor)
Arkance Systems s.r.o. - arkance.world (podpora viz helpdesk.arkance-systems.cz) |
|
mikeborecek
TOP uživatel Přihlášen: 10.říj.2008 Lokalita: Slovensko Používám: AutoCAD 2016, 3ds Max 2016 Stav: Offline Bodů: 410 |
Možnosti příspěvku
Poděkování0
|
aaa ja som to skúšal použiť na plochu, asi preto to nešlo automaticky
|
|
mikeborecek
TOP uživatel Přihlášen: 10.říj.2008 Lokalita: Slovensko Používám: AutoCAD 2016, 3ds Max 2016 Stav: Offline Bodů: 410 |
Možnosti příspěvku
Poděkování0
|
je možné dostať z 3D objektov maximálne rozmery? Objekty budú vždy hranaté
|
|
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ů: 21695 |
Možnosti příspěvku
Poděkování0
|
Myslíte ohraničující kvádr? Pokud bude stačit bez otáčení, tedy kvádr v globálních osách XYZ, pak ano, ale asi bez toho dynamického vykazování (už není, kam ty 3 souřadnice ukládat aby to byly vykazovatelné vlastnosti).
|
|
Vladimír Michl (moderátor)
Arkance Systems s.r.o. - arkance.world (podpora viz helpdesk.arkance-systems.cz) |
|
mikeborecek
TOP uživatel Přihlášen: 10.říj.2008 Lokalita: Slovensko Používám: AutoCAD 2016, 3ds Max 2016 Stav: Offline Bodů: 410 |
Možnosti příspěvku
Poděkování0
|
niektoré objekty mám natočené aj o 45° , takže výsledok bude nesprávny
|
|
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ů: 21695 |
Možnosti příspěvku
Poděkování1
|
Ta "kartézská" verze bounding-boxů (tedy bez pootáčení) je k dispozici ve verzi 1.2. Ta také už umí dynamické aktualizace povrchů a automaticky aktivuje reaktor (po načtení aplikace) pokud byl v daném DWG zapnut.
|
|
Vladimír Michl (moderátor)
Arkance Systems s.r.o. - arkance.world (podpora viz helpdesk.arkance-systems.cz) |
|
mikeborecek
TOP uživatel Přihlášen: 10.říj.2008 Lokalita: Slovensko Používám: AutoCAD 2016, 3ds Max 2016 Stav: Offline Bodů: 410 |
Možnosti příspěvku
Poděkování0
|
farea viem nejakým spôsobom zmeniť formát výsledku? teraz to hádže číselnú hodnotu v mm na 4 desatinné miesta a na konci m2 napr 5555555.5555 m2 viem upraviť lisp tak aby výsledok bol bez jednotiek na 2 desatinné miesta a číselná hodnota v metroch? napr 5.55 viem že sa to dá v nastaveniach pri spustení v konkrétnom výkrese, ale je potrebné to robiť pri každom novom výkrese
|
|
Pro technickou podporu CAD
kontaktujte Helpdesk
Odpovědět | Stránka 12> archiv |
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 1,230 sekund.