CAD FÓRUM - TIPY A TRIKY | UTILITY | DISKUZE | BLOKY | PODPORA | POMOC A RADY
Již 10.000+ CAD tipů.
Přes 118.500 registrovaných u nás, celkem 1.094.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.
AUTOCAD
INVENTOR
REVIT
CIVIL 3D
FUSION
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, 3ds Max, Vault a s dalšími CAD/BIM/PDM 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 | |
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: Implementujeme řešení Autodesk Stav: Offline Bodů: 21901 |
 Možnosti příspěvku
 Poděkování1
 Citace Odpověď
 Téma: plocha, objem teliesZasláno: 07.bře.2024 v 12:21 |
|
Ano, buď takto, nebo ty hodnoty přednastavit programově, podobně jako u toho LUPREC. Zde konkrétně:
(setq _FAREASUFFIX "") (setq _FAREAFACTOR 0.000001) (setq _FAREAPREC 2) |
|
 |
|
|
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
Citace Odpověď
Zasláno: 07.bře.2024 v 07:44 |
|
akým spôsobom sa zadávajú príkazy do textu, ako macro?
^C^Cfarea;s;.;0.000001;2;; |
|
|
|
|
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: Implementujeme řešení Autodesk Stav: Offline Bodů: 21901 |
Možnosti příspěvku
Poděkování1
Citace Odpověď
Zasláno: 06.bře.2024 v 21:41 |
|
Dokonce při každém otevření výkresu, proto také navrhuji ten automaticky načítaný soubor - např. ACADDOC.LSP. Tím se to zařídí "samo".
V textovém poli také můžete použít přepočítávací koeficient a počet desetinných míst. Viz pole Přesnost a Doplňkový formát v dialogu Pole (Field).
|
|
|
|
|
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
Citace Odpověď
Zasláno: 06.bře.2024 v 19:16 |
|
ale teraz som si všimol, že aj to " (setvar "LUPREC" 2)." je potrebné robiť pri každom spustení autocadu 
|
|
|
|
|
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
Citace Odpověď
Zasláno: 06.bře.2024 v 19:14 |
|
Teraz sa to ssnažím dostať len do textu a ten cez field do textu vo výkrese.
desatinné miesto sa mi podarilo zmeniť, ale ako by sa dalo vyhodiť m2 a vynásobiť to 0.000001 aby bola vyrátaná plocha v metroch?
|
|
|
|
|
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: Implementujeme řešení Autodesk Stav: Offline Bodů: 21901 |
Možnosti příspěvku
Poděkování0
Citace Odpověď
Zasláno: 06.bře.2024 v 18:43 |
|
Počet des.míst (nejen pro tuto funkci) lze nastavit v šabloně, nebo vytvořením automaticky načítaného LSP souboru s řádkem (setvar "LUPREC" 2).
Jestli to ale chcete jen pro výkazovou tabulku, tam můžete formát nastavit přímo v DXE šabloně - v průvodci klikněte pravým tlačítkem na název sloupce a zvolte požadovaný formát.
|
|
|
|
|
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
Citace Odpověď
Zasláno: 06.bře.2024 v 16:38 |
|
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
|
|
|
|
|
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: Implementujeme řešení Autodesk Stav: Offline Bodů: 21901 |
Možnosti příspěvku
Poděkování1
Citace Odpověď
Zasláno: 26.úno.2024 v 19:06 |
|
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.
|
|
|
|
|
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
Citace Odpověď
Zasláno: 26.úno.2024 v 13:41 |
|
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: Implementujeme řešení Autodesk Stav: Offline Bodů: 21901 |
Možnosti příspěvku
Poděkování0
Citace Odpověď
Zasláno: 26.úno.2024 v 13:30 |
|
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).
|
|
|
|
|
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
Citace Odpověď
Zasláno: 26.úno.2024 v 09:11 |
|
je možné dostať z 3D objektov maximálne rozmery? Objekty budú vždy hranaté
|
|
|
|
|
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
Citace Odpověď
Zasláno: 23.úno.2024 v 10:42 |
|
aaa ja som to skúšal použiť na plochu, asi preto to nešlo automaticky
|
|
|
|
|
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: Implementujeme řešení Autodesk Stav: Offline Bodů: 21901 |
Možnosti příspěvku
Poděkování0
Citace Odpověď
Zasláno: 23.úno.2024 v 10:38 |
|
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.
|
|
|
|
|
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
Citace Odpověď
Zasláno: 23.úno.2024 v 08:53 |
|
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: Implementujeme řešení Autodesk Stav: Offline Bodů: 21901 |
Možnosti příspěvku
Poděkování1
Citace Odpověď
Zasláno: 21.úno.2024 v 10:30 |
|
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
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: Implementujeme řešení Autodesk Stav: Offline Bodů: 21901 |
Možnosti příspěvku
Poděkování0
Citace Odpověď
Zasláno: 21.úno.2024 v 07:57 |
|
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.")
|
|
|
|
|
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
Citace Odpověď
Zasláno: 21.úno.2024 v 07:55 |
|
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: Implementujeme řešení Autodesk Stav: Offline Bodů: 21901 |
Možnosti příspěvku
Poděkování0
Citace Odpověď
Zasláno: 20.úno.2024 v 22:39 |
|
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.
|
|
|
|
Možnosti tématu
Vladimír Michl napsal(a):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 0,823 sekund.
CADfórum
Tipy, triky, podpora, pomoc a rady pro AutoCAD, LT, Inventor, Revit, Map, Civil 3D, 3ds Max, Fusion, Forma, Vault, PowerMill a další Autodesk aplikace (support firmy ARKANCE). Viz O portálu.
Copyright © 2025 | Web reklama na tomto serveru | Ochrana soukromí, podmínky
