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: 01.bře.2007 v 09:01 |
(if QS5
(command "_qsave") (exit) ) Proč neprovede (exit) když neexistuje ve výkr. blok, který je definován jako (setq DWG (getvar "dwgname")) (setq LL (strlen DWG)) (setq NPF (substr DWG 1 (- LL 4))) (setq NPF_C (strcat NPF "_C")) přičemž blok NPF_C byl/nebyl vytvořen jako (setq QS5 (ssget "X" (list (cons 8 "OEZ_*OBV")))) (if QS5 (progn (command "_chprop" QS5 "" "_C" 6 "_LT" "center" "_LA" 0 "") (command "_-block" NPF_C "0,0" QS5 "") (command "_-wblock" NPF_C "=") (command "_-insert" NPF_C "0,0" 1 1 0) ) ) ? Opačně mi to taky nechce brát (if (= QS5 nil) (exit) (command "_qsave") ) Píše mi na p.ř. hlášku ; error: quit / exit abort Lze snad namísto exit použít nějaký jiný příkaz? Jde o hromadné zpracování hodně výkresů pomocí lispu a nechci, aby to úplně ukončilo AutoCAD, nýbrž aby ten výkres, ve kterém ten blok není, nechal být (tj. bez uložení, přesto že v lispu se něco provádělo) a otevřel další výkres pro zpracování. |
|
-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 |
![]() |
(exit) je funkce LISPu - ukončení zpracování kódu
takže "exit abort" je ta správná reakce
|
|
![]() |
|
Seiner ![]() 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 |
![]() |
IMHO exit je ladící funkce a při jejím použití to vždy hlásí chybu.
Prostě musíte požívat "strukturovaný" kód a důsledně používat konstrukce typu (If <jestliže_ano> <jestliže_ne>)
|
|
Vítězslav Seiner
Chrudim |
|
![]() |
|
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 |
![]() |
Děkuji za objasnění. Asi se budu vyhýbat jeho použití...
|
|
-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,150 sekund.