Vytisknout stránku | Zavřít okno

Ukončení lisp programu

Vytištěno z: CAD Fórum
Kategorie: Autodesk - stavebnictví, strojírenství, CAD/GIS
Název fóra: CAD programování
Popis fóra: Otázky programování - nadstavby a utility pro CAD a GIS aplikace Autodesk (VBA, AutoLISP, ARX/C++, .Net, JavaScript, Python, MEL...)
URL: https://www.cadforum.cz/forum/forum_posts.asp?TID=10171
Datum vytištění: 15.čer.2026 v 11:41


Téma: Ukončení lisp programu
Odeslal: zchmela
Předmět: Ukončení lisp programu
Datum odeslání: 15.led.2010 v 09:06

Dobrý den, mám tento problém, potřebuji testovat, zda-li je ve výkresu přítomna jistá hladina, napsal jsem si jednoduchý lisp program, pokud ve výkresu není daná hladina, tak se lisp program náhle ukončí, aniž by doběhl dokonce.

(defun C:LAQ()
( command "clayer" "hladina" "")
(if (= (getvar "clayer") "hladina")
( command "_-layer" "D" "hladina2" "" ""))

.......
)

Nelze nějak ošetřit, aby program doběhl za každé situace. 


Odpovědi:
Odeslal: Vladimír Michl
Datum odeslání: 15.led.2010 v 09:32
Jednodušší bude: 
(tblsearch "LAYER" "hladina2")


-------------
Vladimír Michl (moderátor)
ARKANCE CZ - https://arkance.world - arkance.world
(podpora viz emea.support.arkance.world)

Odeslal: alfred
Datum odeslání: 15.led.2010 v 10:13
Dobehnuti lispu a ukonceni funkce i v pripade chyby (napriklad navrat zmenenych hodnot systemovych promennych apod.) se resi pomoci funkce
*error*. V zakladnim zneni v napovede je:

(defun *error* (msg)
 (princ "error: ")
 (princ msg)
 (princ)
)

Doporucuji si napovedu prostudovat a nebo cerpat z rucnych jinych utilit.


Vytisknout stránku | Zavřít okno