Registrujte se na 22. ročník konference CADfórum 2025 - 30.9. Zámek Valeč.
Přes 119.000 registrovaných u nás, celkem 1.097.000 registrovaných (CZ+EN), přes 53.000 CAD/BIM bloků.
Vyzkoušejte nový přesný Inženýrský kalkulátor a aktualizovaný Generátor čarových kódů.
Diskuzní fórum, poradna
?CAD diskuze, rady, výměna zkušeností

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 ![]() |
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: 14.úno.2007 v 16:41 |
Záměr: Chci vytvořit lispem blok v hl. 0 z entit nacházejících se původně v hl. OEZ_OBV a/nebo OEZ_1OBV a/nebo OEZ_2OBV a uložit ho do samostatného výkresu.
... (setq DWG (getvar "dwgname")) (setq LL (strlen DWG)) (setq NPF (substr DWG 1 (- LL 4))) (setq NPF_C (strcat NPF "_C")) (if (tblobjname "layer" "OEZ_*OBV") (progn (setvar "expert" 1) (setq QVYBER5 (ssget "X" '(8 . "OEZ_*OBV"))) (command "_chprop" QVYBER5 "" "_C" 6 "_LT" "center" "_LA" 0 "") ;obrys Ltype=Center, LAyer=0 (command "_-block" NPF_C "0,0" QVYBER5 "") ;vytvori blok obrysu-v hl. 0 (command "_-wblock" NPF_C "=") (setvar "expert" 0) ) ) Hlásí, že ; error: bad point argument a nic se neprovede... Pokud to zkusím bez filtru (setq QVYBER5 (ssget "X" '(8 . "OEZ_OBV"))) tak to stejné...nevybere nic...nil |
|
-FerTh-
|
|
![]() |
|
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 Přihlášen: 09.zář.2004 Lokalita: ČR (JČ) Používám: Implementujeme řešení Autodesk Stav: Offline Bodů: 21952 |
![]() |
aniž bych to zkoumal do detailů:
|
|
![]() |
|
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 |
![]() |
Zajímavé na tom je, že formulaci bez toho podtržítka používám v jiných lispech a tam je to bez problémů... Každopádně děkuji, vyzkouším.
Command: (setq QVYBER1 (ssget "_X" '(8 . "OEZ_OBV"))) ; error: bad point argument Pozn.: Hladina OEZ_OBV ve výkrese existuje Upravil Ferdinand - 16.úno.2007 v 09:58 |
|
-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 |
![]() |
Pomohla "rozepsaná" forma syntaxu
(setq QVYBER1 (ssget "X" (list (cons 8 "OEZ_*OBV")))) Upravil Ferdinand - 16.úno.2007 v 14:06 |
|
-FerTh-
|
|
![]() |
|
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 Přihlášen: 09.zář.2004 Lokalita: ČR (JČ) Používám: Implementujeme řešení Autodesk Stav: Offline Bodů: 21952 |
![]() |
Rozepisovat to nemusíte a ani nejde o to podtržítko (to je tam pro sichr) - ale neměl jste dobře počet závorek.
|
|
![]() |
|
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 |
![]() |
![]() ![]() ![]() |
|
-FerTh-
|
|
![]() |
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,139 sekund.