Děkujeme za účast na konferenci CADfórum 2025 - podívejte se na reportáž
Přes 120.000 registrovaných u nás, celkem 1.105.000 registrovaných (CZ+EN), přes 53.000 CAD/BIM bloků.
Vyzkoušejte nový přesný Inženýrský kalkulátor a
proměnné prostředí AutoCADu.
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
|
Odpovědět
|
Stránka <12 archiv |
| Autor | |
Ferdinand
TOP uživatel
Přihlášen: 01.říj.2004 Lokalita: ČR (JM) Používám: AutoCAD2004 (EN) na Windows XP Stav: Offline Bodů: 1906 |
Zasláno: 09.čvc.2008 v 08:34 |
|
To Buba: Jasně, příkaz jako takový jsem vyzkoušel a funguje bez jediného zádrhelu (2x kliknout, 1x napsat, 1x Enter). Ovšem zde jsme ve fóru Programování, tudíž to chci použít v lispu. Bohužel, v tomto případě asi mám smůlu. To Sedláček: To myslíte sáhnout do kódu gatte.lsp ?
|
|
|
-FerTh-
|
|
![]() |
|
Sedláček
TOP uživatel
Přihlášen: 15.dub.2005 Lokalita: Czech Republic Používám: AutoCad 2024 LT Stav: Offline Bodů: 384 |
Zasláno: 09.čvc.2008 v 08:44 |
Ano myslel jsem sáhnout do GATTE.LSP. Ale obávám se, že to nebude až ak jednoduché.
Jen pro úplnost jsem zkoušel příkaz _-ATTEDIT. I zde jsem narazil na problém s diakritikou. (Mám A2002LT)
Jsem rád, že jsem si zvykl (jako odkojenec DOSu) psát názvy souborů, bloků, hladin... bez hacku bez carek.
|
|
![]() |
|
Luděk Líkař
Diskutér
Přihlášen: 10.čer.2005 Lokalita: ČR (JČ) Používám: AutoCad LT 2018 Stav: Offline Bodů: 41 |
Zasláno: 09.čvc.2008 v 12:41 |
|
Pro to co potřebujete mám udělanou utilitku ve VBA, která mi běží pod AC 2004 na XP (vzhledem k použitým funkcím XP nutné). Po nastavení prohledá soubor a změní hodnotu daného atributu ve všech blocích výkresu daného jména. Pro nastavení je nutné mít daný blok v samostaném souboru. U výkresů s velkým množstvím entit to trvá déle. Pokud budete mít zájem mohu utilitku nahrát na server iprojekt. Dejte vědět.
|
|
|
Líkař
|
|
![]() |
|
chlebovsky
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
Zasloužilý člen
Přihlášen: 18.čer.2007 Lokalita: ČR (JM) Používám: Autocad R9 - 2022 Stav: Offline Bodů: 112 |
Zasláno: 09.čvc.2008 v 13:33 |
|
Pokud jsem dobře pochopil tak ve výkrese je spousta bloků, a já potřebuju vybrat jen se jménem "RT1" a u těchto bloků změnit pouze atribut "DATUM" na nějaký napsaný text.
Toto by to mělo vyřešit :
(setq ssbloky (ssget "X" '((0 . "INSERT") (2 . "RT1"))))
(if (/= ssbloky nil) (progn (setq newdate (strcase (getstring "\nNovy datum: <2008-07-01> "))) (setq i 0) (repeat (sslength ssbloky) (setq blok (entget (ssname ssbloky i))) (setq ent blok) (while (= (cdr (assoc 0 (setq ent (entget (entnext (cdr (assoc -1 ent))))))) "ATTRIB") (if (= "DATUM" (cdr (assoc 2 ent))) (progn (setq ent (subst (cons 1 newdate) (assoc 1 ent) ent)) (entmod ent) (entupd (cdr (assoc -1 ent))) ) ) ) (setq i (1+ i)) ) ) (alert "Ve výkrese se blok RT1 nevyskytuje.") ) teda doufám :-)
jinak ten zázračný příkaz jak bylo hned na začítku poptáváno je entnext....
ono totiž attributy a vertexy od křivek nelze nikde jen tak jednoduše vyhledat, ale je vždy pravidlem že když vytvoříte blok s atributama nebo křivku, tak první entita je vždy ten blok, a zaním jsou přiřazené entity - atributy popř. body na křivce, a jsou tak dlouho dokud to není uzavřené SEQEND, pak následují další entity....
takže získat jméno entity bloku = BLOKJM a
následující atribut je
ATT1 (entnext BLOKJM)
ATT2 (entnext ATT1)
ATT3 (entnext ATT2)
...
...
...
a to tak dlouho dokud to nebude SEQEND
taktéž i se křivkou, a můžete tím měnit i jednotlivé body :-)
Snad jsem pomohl. |
|
|
Ing. Martin Chlebovský
www.kde-je-auto.cz GPS monitoring provozu vozidel a osob. WebDeveloper. Programátor aplikací pro Autocad a MS Office. Tvorba WWW aplikací. Modelování domů a staveb.&l |
|
![]() |
|
Ferdinand
TOP uživatel
Přihlášen: 01.říj.2004 Lokalita: ČR (JM) Používám: AutoCAD2004 (EN) na Windows XP Stav: Offline Bodů: 1906 |
Zasláno: 10.čvc.2008 v 11:24 |
|
To Chlebovsky: Hned to jdu vyzkoušet.
To Líkař: OK, pokud to dáváte k použití pro širokou veřejnost, tak si to z iprojectu stáhnu (jaký má název ten soubor?) a vyzkouším.
Děkuji všem!
|
|
|
-FerTh-
|
|
![]() |
|
Luděk Líkař
Diskutér
Přihlášen: 10.čer.2005 Lokalita: ČR (JČ) Používám: AutoCad LT 2018 Stav: Offline Bodů: 41 |
Zasláno: 10.čvc.2008 v 14:28 |
|
Líkař
|
|
![]() |
|
Ferdinand
TOP uživatel
Přihlášen: 01.říj.2004 Lokalita: ČR (JM) Používám: AutoCAD2004 (EN) na Windows XP Stav: Offline Bodů: 1906 |
Zasláno: 12.lis.2008 v 16:09 |
|
Po rozbalení mi antivir hlásí virus.
|
|
|
-FerTh-
|
|
![]() |
|
Ferdinand
TOP uživatel
Přihlášen: 01.říj.2004 Lokalita: ČR (JM) Používám: AutoCAD2004 (EN) na Windows XP Stav: Offline Bodů: 1906 |
Zasláno: 12.lis.2008 v 16:37 |
|
To Chlebovsky: Pochopil jste mne dobře, děkuji, tohle mi chodí bez problému.
|
|
|
-FerTh-
|
|
![]() |
|
Luděk Líkař
Diskutér
Přihlášen: 10.čer.2005 Lokalita: ČR (JČ) Používám: AutoCad LT 2018 Stav: Offline Bodů: 41 |
Zasláno: 13.lis.2008 v 07:17 |
Projel jsem stažený soubor z i-projektu AVG a je čistý, tak netuším jak to, že Vám to hlásí vir. Tohle se mi stalo v září u GGmenu a u CAD standardů, ale soubor jsem nahrával v červenci.
|
|
|
Líkař
|
|
![]() |
|
Ferdinand
TOP uživatel
Přihlášen: 01.říj.2004 Lokalita: ČR (JM) Používám: AutoCAD2004 (EN) na Windows XP Stav: Offline Bodů: 1906 |
Zasláno: 13.lis.2008 v 09:43 |
|
OT: (Nejspíše do fóra Non-acad-sw ... ale zde se to týká uvedeného souboru) Používáme antivirový program VirusScan. Náš specialista IT tvrdí, že každý antivir dělá nějak "jinak", něco "jiného", že se zaměřuje na určitou oblast.
|
|
|
-FerTh-
|
|
![]() |
|
Luděk Líkař
Diskutér
Přihlášen: 10.čer.2005 Lokalita: ČR (JČ) Používám: AutoCad LT 2018 Stav: Offline Bodů: 41 |
Zasláno: 14.lis.2008 v 09:52 |
|
Soubor jsem prověřil také pomocí NOD32 a je čistý. Zkuste použít jiný antivirus. Význam textu v závorce ?? |
|
|
Líkař
|
|
![]() |
|
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,578 sekund.



atributy-pořadí
Možnosti tématu


Ferdinand napsal(a):
