Diskuzní fórum a databáze tipů a utilit pro AutoCAD, Inventor, Revit a další produkty Autodesk - od firmy Arkance Systems [www.cadforum.cz]
CZ | SK | EN | DE
Přihlášení
či registrace
   právě nás čte: 7278 
Dopravní značení - knihovna pro AutoCAD
RSS kanál - CAD tipy RSS tipy
RSS diskuze

Diskuze Diskuzní fórum, poradna

 

NápovědaCAD diskuze, rady, výměna zkušeností

 
CAD Fórum - Homepage 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
  FAQ FAQ  Prohledat fórum   Události   Registrovat Registrovat  Přihlásit Přihlásit

Téma uzavřenozjištění dat bloku v rozvrženích

 Odpovědět Odpovědět Stránka  12> archiv
Autor
pavelstyl Zobrazit panel
Zasloužilý člen
Zasloužilý člen

Přihlášen: 06.říj.2004
Lokalita: Czech Republic
Používám:
AutoCAD Mech 2023, SolidEdgeE 2023
Stav: Offline
Bodů: 223
Přímý odkaz na tuto zprávu Téma: zjištění dat bloku v rozvrženích
    Zasláno: 15.čvc.2009 v 11:42
No nemělo by tam být u toho while místo sslength pouze length ?
 
Pavel Štyl
Zpět nahoru
Vladimír Michl Zobrazit panel
Moderátor
Moderátor
Avatar
Arkance Systems

Přihlášen: 09.zář.2004
Lokalita: ČR (JČ)
Používám:
Dodáváme produkty Autodesk
Stav: Offline
Bodů: 21532
Přímý odkaz na tuto zprávu Zasláno: 15.čvc.2009 v 11:34
Ta druhá konstrukce by měla fungovat - pro jistotu si vypisujte hodnotu LAYT1 - jestli je to opravdu string.
Vladimír Michl (moderátor)
Arkance Systems s.r.o. - www.arkance-systems.cz
(podpora viz hd.cads.cz)
Zpět nahoru
Ferdinand Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 01.říj.2004
Lokalita: ČR (JM)
Používám:
AutoCAD2004 (EN) na Windows XP
Stav: Offline
Bodů: 1904
Přímý odkaz na tuto zprávu Zasláno: 15.čvc.2009 v 11:07
Pořád to není OK...
...
(setq LAYTL (layoutlist))
(setq i 0)
(while (< i (sslength LAYTL))
  (command "_layout" "_S" (nth i LAYTL))
  (setq LAYT1 (nth i LAYTL))
  (setq RT1 (ssget "_X" '((-4 . "<AND") (0 . "INSERT") (2 . "RAZ--T1*") (410 . LAYT1) (-4 . "AND>")))) ;error: bad SSGET list value
  (if (/= RT1 nil)
    (progn
      (setq E (ssname RT1 0))
...
    )
  )
...
)
...
A to i v případě, když to napíšu jako
(setq RT1 (ssget "_X" (list (cons -4 "<AND") (cons 0 "INSERT") (cons 2 "RAZ--T1*") (cons 410 LAYT1) (cons -4 "AND>")))) ;error: bad SSGET list value
-FerTh-
Zpět nahoru
Ferdinand Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 01.říj.2004
Lokalita: ČR (JM)
Používám:
AutoCAD2004 (EN) na Windows XP
Stav: Offline
Bodů: 1904
Přímý odkaz na tuto zprávu Zasláno: 09.čvc.2009 v 15:12
Děkuji, mezitím jsem našel tuhle odpověď i v jiném tématu... omlouvám se.
-FerTh-
Zpět nahoru
Martin Bielina Zobrazit panel
Zasloužilý člen
Zasloužilý člen

Přihlášen: 04.led.2007
Lokalita: ČR (Pha)
Používám:
AutoCAD True view 2016
Stav: Offline
Bodů: 100
Přímý odkaz na tuto zprávu Zasláno: 07.čvc.2009 v 11:07
neověřeno, nevyzkoušeno (nemám momentálně na čem), ale zápis zmíněného řádku by měl vypadat spíše takto:
                         
(setq RT1 (ssget "_X" '((-4 . "<AND") (0 . "INSERT") (2 . "RAZ--T1*") (410 . "LAYT1") (-4 . "AND>"))))

Výsledkem pak bude množina všech entit, které splňují všechna uvedená kriteria.

=======
opravil jsem chybu v zápisu. Nesmíte moje příspěvky aplikovat na svůj případ systémem CTRL+C a CTRL+V. Je to jen návod jak na to. "LAYT1" je zase možné upravit dle potřeby a doplnit o znaky *, ? atd.

Původní zápis s LAYT1 (bez uvozovek) by fungoval pokud by se jednalo o načítanou proměnnou. To jen na vysvětlenou, aby byl můj příspěvek co nejkompletnější. Pokud je porovnávaný s podmínkou konkrétní textový řetězec musí být v uvozovkách stejně jako všechny ostatní v podmínce uvedené.

Upravil Martin Bielina - 15.čvc.2009 v 11:36
Zpět nahoru
Ferdinand Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 01.říj.2004
Lokalita: ČR (JM)
Používám:
AutoCAD2004 (EN) na Windows XP
Stav: Offline
Bodů: 1904
Přímý odkaz na tuto zprávu Zasláno: 07.čvc.2009 v 10:47
Po nějaké době opět navážu, nyní mám dotaz na následující:
(setq LAYTL (layoutlist))
(setq LAYT1 (nth i LAYTL))
(setq RT1 (ssget "_X" (list (cons 0 "INSERT") (cons 2 "RAZ--T1*") (cons 410 LAYT1))))
Poslední řádek vrací nil - a to právě nevím, proč? Blok RAZ--T1 má variantu buď RAZ--T1 anebo RAZ--T1_en anebo RAZ--T1_ru a pouze jeden z nich je vždy vložen do rozvržení.
-FerTh-
Zpět nahoru
Ferdinand Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 01.říj.2004
Lokalita: ČR (JM)
Používám:
AutoCAD2004 (EN) na Windows XP
Stav: Offline
Bodů: 1904
Přímý odkaz na tuto zprávu Zasláno: 05.úno.2009 v 15:08
Původně odeslal(a) Seiner Seiner napsal(a):

...V databázi IMHO nejsou kódy, pokud jsou defautní. ...pokud si udělám výpis na jakoukoliv entitu, třeba úsečku, tak pokud má barvu a typ čáry podle hladiny, tak ty kódy 6 a 62 tam nejsou. Jakmite té úsečce nastavím nějakou jinou barvu a/nebo typ čáry, tak se kódy ve výpisu objeví...
Je to tak.
- úsečka nakreslená defaultními hodnotami:
((-1 . <Entity name: 7efeb0a0>) (0 . "LINE") (330 . <Entity name: 7efe5cf8>) (5 . "48C") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (62 . 0) (100 . "AcDbLine") (10 50.0 110.0 0.0) (11 260.0 220.0 0.0) (210 0.0 0.0 1.0))
- po změně color=222, linetype="center", ltscale=0.111 :
((-1 . <Entity name: 7efeb0a0>) (0 . "LINE") (330 . <Entity name: 7efe5cf8>) (5 . "48C") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (62 . 222) (6 . "CENTER") (48 . 0.111) (100 . "AcDbLine") (10 50.0 110.0 0.0) (11 260.0 220.0 0.0) (210 0.0 0.0 1.0))
Původně odeslal(a) Seiner Seiner napsal(a):

...Co je pro blok default, si nejsem tak jistý - asi to bude tedy BYBLOCK a ne BYLAYER....
Závisí na aktuálním nastavení při vytáření bloku (nebo čehokoliv) - já používám color=ByBlock, linetype=ByBlock.
 
Původně odeslal(a) Martin Bielina Martin Bielina napsal(a):

...group code týkající se barvy což je 62 a u některých entit (kóty) pro jejich dílčí subentity pak 70. ...
Je to jiné u bloku, který obsahuje atributy a u bloku bez atributů? Anebo pokud blok obsahuje obyč. text?


Upravil Ferdinand - 05.úno.2009 v 15:18
-FerTh-
Zpět nahoru
Martin Bielina Zobrazit panel
Zasloužilý člen
Zasloužilý člen

Přihlášen: 04.led.2007
Lokalita: ČR (Pha)
Používám:
AutoCAD True view 2016
Stav: Offline
Bodů: 100
Přímý odkaz na tuto zprávu Zasláno: 05.úno.2009 v 11:10
0 = BYBLOCK; 256 = BYLAYER (default) a to platí pro jakoukoliv entitu a group code týkající se barvy což je 62 a u některých entit (kóty) pro jejich dílčí subentity pak 70. S každou další verzí autocadu se ale možnosti stále rozšiřují, takže nejlepší je najít si to v aktuální nápovědě. IMHO default hodnoty autocad zapisuje jako nil a tim šetří místo v databázi, a proto pří nastavení BYLAYER ve výpisu 62 není.
Zpět nahoru
Seiner Zobrazit panel
CAD/BIM manager
CAD/BIM manager

Přihlášen: 01.říj.2004
Lokalita: ČR (PA)
Používám:
Mechanical 2017, Inventor 2017 a starší
Stav: Offline
Bodů: 1662
Přímý odkaz na tuto zprávu Zasláno: 05.úno.2009 v 10:26
...tu hladinu vidím taky...
 
To se právě, i když neobratně, pokuším sdělit. V databázi IMHO nejsou kódy, pokud jsou defautní. Co je pro blok default, si nejsem tak jistý - asi to bude tedy BYBLOCK a ne BYLAYER. Obdobně, pokud si udělám výpis na jakoukoliv entitu, třeba úsečku, tak pokud má barvu a typ čáry podle hladiny, tak ty kódy 6 a 62 tam nejsou. Jakmite té úsečce nastavím nějakou jinou barvu a/nebo typ čáry, tak se kódy ve výpisu objeví.
(DXF asi je ukecanější a dává i redundantní údaje)
Vítězslav Seiner

Chrudim
Zpět nahoru
Ferdinand Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 01.říj.2004
Lokalita: ČR (JM)
Používám:
AutoCAD2004 (EN) na Windows XP
Stav: Offline
Bodů: 1904
Přímý odkaz na tuto zprávu Zasláno: 05.úno.2009 v 08:31
...(8 . "0")...
hladina tam je. Ale není jisté, že barva bloku bude vždy Bylayer - právě proto to chci zjistit. Když se podívám do souboru dxf, tam to je uvedeno { (6 . Byblock) a (62 . 222) } :
...
AcDbBlockEnd
  0
ENDSEC
  0
SECTION
  2
ENTITIES
  0
INSERT
  5
47B
330
1F
100
AcDbEntity
  8
0
  6
ByBlock
 62
   222
100
AcDbBlockReference
 66
     1
  2
...
Chci se ale dopátrat, jak to v lispu napsat.
-FerTh-
Zpět nahoru
Seiner Zobrazit panel
CAD/BIM manager
CAD/BIM manager

Přihlášen: 01.říj.2004
Lokalita: ČR (PA)
Používám:
Mechanical 2017, Inventor 2017 a starší
Stav: Offline
Bodů: 1662
Přímý odkaz na tuto zprávu Zasláno: 04.úno.2009 v 15:48
Myslím, že nejsou uvedeny kódy, který jsou BYLAYER. Takže zjistit hladinu a z ní barvu a typ čáry.
Vítězslav Seiner

Chrudim
Zpět nahoru
Ferdinand Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 01.říj.2004
Lokalita: ČR (JM)
Používám:
AutoCAD2004 (EN) na Windows XP
Stav: Offline
Bodů: 1904
Přímý odkaz na tuto zprávu Zasláno: 04.úno.2009 v 14:51
Zlehka navážu na téma - potřebuji získat v lispu vlastnosti bloku COLOR a LINETYPE. Jak/kde se to dá přečíst, když data bloku vypadají takhle:
((-1 . <Entity name: 7efe6060>) (0 . "INSERT") (330 . <Entity name: 7ef92cf8>)
(5 . "494") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (100 .
"AcDbBlockReference") (2 . "pokus-block#ClosedPolyline_C") (10 0.0 0.0 0.0) (41
. 1.0) (42 . 1.0) (43 . 1.0) (50 . 0.0) (70 . 0) (71 . 0) (44 . 0.0) (45 . 0.0)
(210 0.0 0.0 1.0))
tj. kód 62(=barva) ani 6(=typ čáry) tam není.
-FerTh-
Zpět nahoru
chlebovsky Zobrazit panel
Zasloužilý člen
Zasloužilý člen
Avatar

Přihlášen: 18.čer.2007
Lokalita: ČR (JM)
Používám:
Autocad R9 - 2022
Stav: Offline
Bodů: 112
Přímý odkaz na tuto zprávu Zasláno: 19.pro.2008 v 14:11
Nevím jestli jsem už mimo kvůli svátků, ale pořád mi to nějak nejde :-) Něco dělám špatně ? a mejl s heslem mi taky nedošel, tak nevím :-)
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
Zpět nahoru
Ferdinand Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 01.říj.2004
Lokalita: ČR (JM)
Používám:
AutoCAD2004 (EN) na Windows XP
Stav: Offline
Bodů: 1904
Přímý odkaz na tuto zprávu Zasláno: 19.pro.2008 v 13:43
Aha, no jasně, na to jsem zapomněl - omluva; již napraveno.
-FerTh-
Zpět nahoru
Vladimír Michl Zobrazit panel
Moderátor
Moderátor
Avatar
Arkance Systems

Přihlášen: 09.zář.2004
Lokalita: ČR (JČ)
Používám:
Dodáváme produkty Autodesk
Stav: Offline
Bodů: 21532
Přímý odkaz na tuto zprávu Zasláno: 18.pro.2008 v 15:33
Ochrana účtu při přístupu z jiného počítače je bohužel součástí kódu aplikace fóra. Také bych někdy uvítal zůstat přihlášený z více strojů.
Vladimír Michl (moderátor)
Arkance Systems s.r.o. - www.arkance-systems.cz
(podpora viz hd.cads.cz)
Zpět nahoru
chlebovsky Zobrazit panel
Zasloužilý člen
Zasloužilý člen
Avatar

Přihlášen: 18.čer.2007
Lokalita: ČR (JM)
Používám:
Autocad R9 - 2022
Stav: Offline
Bodů: 112
Přímý odkaz na tuto zprávu Zasláno: 18.pro.2008 v 10:16
Díky, něco takového jsem předpokládal, takže p. Ferdinande, prosím preosím o přístupové údaje, klidně na martin@vchlebovska.eu díky moc.
 
A ještě poprosím p. Michla když ho tady vidím, sice je to mimo tento okruh otázky, ale jestli by mi mohl poradit jak udělat to, že se hlásím do fora ze 2 počítačů, a vždy se musím přihlašovat, když jsem pouze na jednom, hlásí se automaticky, ale jak přejdu na 2 kompl, v jiné firmě, musím se přihlásit znovu
DOMA a v PRACI - lze to nějak udělat ? Diky moc.
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
Zpět nahoru
Vladimír Michl Zobrazit panel
Moderátor
Moderátor
Avatar
Arkance Systems

Přihlášen: 09.zář.2004
Lokalita: ČR (JČ)
Používám:
Dodáváme produkty Autodesk
Stav: Offline
Bodů: 21532
Přímý odkaz na tuto zprávu Zasláno: 18.pro.2008 v 08:44
Aha, pane Ferdinand si vytvořil vlastní projekt - pak vás tedy musí přizvat osobně nebo nastavit oprávnění jeho projektu pro veřejný přístup.
Vladimír Michl (moderátor)
Arkance Systems s.r.o. - www.arkance-systems.cz
(podpora viz hd.cads.cz)
Zpět nahoru
chlebovsky Zobrazit panel
Zasloužilý člen
Zasloužilý člen
Avatar

Přihlášen: 18.čer.2007
Lokalita: ČR (JM)
Používám:
Autocad R9 - 2022
Stav: Offline
Bodů: 112
Přímý odkaz na tuto zprávu Zasláno: 17.pro.2008 v 22:48
To jsem zkoušel, ale nic :-(
 
cadforum / cadforum

Přístup do [application/Files] odepřen.
Příčina:Nejste členem projektu.
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
Zpět nahoru

Pro technickou podporu CAD
kontaktujte Helpdesk

Příbuzné CAD tipy:
Tip 4409:VIPZjištění parametrů a termínů výpůjčky síťové licence FlexLM (přehled výpůjček).
Tip 6817:VIPAutoCAD nereaguje na nastavení jednotek a bloky, xrefy a rozvržení a ctrl+v objekty vkládá zvětšené.
Tip 4379:Úprava atributů bloků v několika rozvrženích.
Tip 10940:Tisk náhodných čar, které nejsou na výkrese.
Tip 12636:VIPZjištění práce v síti VPN (LISP).
Tip 7190:Jak zjistit datum předchozí verze CAD souboru?


 Odpovědět Odpovědět Stránka  12> archiv

Přejít na fórum Oprávnění fóra Zobrazit panel



Stránka byla vygenerována za 1,676 sekund.