Vytisknout stránku | Zavřít okno

Zjištění měřítka v daném bodě

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=20259
Datum vytištění: 15.čer.2026 v 17:36


Téma: Zjištění měřítka v daném bodě
Odeslal: pavelstyl
Předmět: Zjištění měřítka v daném bodě
Datum odeslání: 24.lis.2014 v 07:27
Dobrý den,
 obracím se na vás s dotazem, zda je možné lispem v AutoCADu Mechanical 2014 zjistit měřítko v daném bodě.
V modelovém prostoru máme nadělané různé "scale area". Potřeboval bych programově zjistit, jaké měřítko se nachází v konkrétním bodě. Něco jako příkaz "_AMSCMONITOR".

Momentálně mě nejvíce zajímá parametr "Text scale".

Děkuji
Pavel Štyl


Odpovědi:
Odeslal: Vladimír Michl
Datum odeslání: 24.lis.2014 v 07:55
Přes rámeček oblasti by to mělo jít takto (starý kód, nezkoušeno v aktuálních verzích):
 
(defun c:getareascale (/ bd sc)
    (setq bd (entget (car (entsel "\nSelect scale area border: "))
       '("GENIUS_GENSCREG_15")
      )
   sc (cdr (nth 1 (cadr (assoc -3 bd))))
    )
  (eval sc)
)


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

Odeslal: pavelstyl
Datum odeslání: 24.lis.2014 v 09:06
Děkuji, nějak se s tím poperu.

Pavel Štyl


Vytisknout stránku | Zavřít okno