Vytisknout stránku | Zavřít okno

progn

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=6617
Datum vytištění: 12.kvě.2026 v 08:06


Téma: progn
Odeslal: Ferdinand
Předmět: progn
Datum odeslání: 12.čer.2008 v 08:36
Lze uvnitř skupiny progn aplikovat další "vnořenou" skupinu progn? Něco jako
...
(if (/= XXX YYY)
  (progn
    (command "_...")
    (command "_...")
    (setq DS (getvar "dimscale"))
    (progn
      (princ (strcat "\n bylo nalezeno " (strcase XXX) "prvků"))
      (setq POOP (getint "\npočet opakování: "))
      (command "_...")
    )
  )
  (progn
    (princ "\nbez výsledku")
    (setq DS 1)
  )
)
...
 


-------------
-FerTh-


Odpovědi:
Odeslal: Seiner
Datum odeslání: 12.čer.2008 v 08:53
lze

-------------
Vítězslav Seiner

Chrudim

Odeslal: Vladimír Michl
Datum odeslání: 12.čer.2008 v 10:10
V tom vašem příkladu k tomu (progn) není důvod, ale jinak se vnořené podmínky a další programové bloky (kde je progn potřeba) používají běžně.

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


Vytisknout stránku | Zavřít okno