řadit podle: nejnovější | nejčtenější | nejkomentovanější

Nové OpenDCL

Kategorie » téma: LISP

02.04.2009 12.30 | Jan Panoch | Komentáře: 0 komentářů | Přečteno: 10298x

ODCLLogo

19. března bylo uvolněno nové OpenDCL. OpenDCL nahrazuje a výrazně rozšiřuje možnosti programovacího jazyku DCL pro vytváření dialogů v AutoCADu. Zatímco v klasickém DCL je nutno dialogy “napsat” OpenDCL disponuje samostatným programem (OpenDCL Studio), pro vizuální vytváření dialogů. Studio pomůže i se syntaxí kódu pro jednotlivé ovládací prvky dialogu. OpenDCL je určeno především pro ty, kteří se nechtějí rozloučit s psaním kódu v AutoLISPu nebo VisualLISPu a přitom cítí omezení psaní dialogových panelů v jazyku DCL. Více informací najdete na http://opendcl.com/

Jan Panoch

Přístup k objektům pomocí VisualLISPu

Kategorie » téma: LISP

02.08.2010 11.01 | Jan Panoch | Komentáře: 0 komentářů | Přečteno: 10291x

V předchozím příspěvku “Nástroj pro rychlé zjištění informací o entitě” jsme si vytvořily nástroj, který do příkazové řádky vypíše vlastnosti vybraného objektu. Protože jsme v tomto příspěvku již mírně zasáhli do oblasti VisualLISPu ukážeme si v dalším volném pokračování princip práce s vlastnostmi objektu právě pomocí tohoto programovacího jazyka.

VisualLISP nahrazuje a rozšiřuje původní AutoLISP, přitom ale umí pracovat se staršími programy napsanými v AutoLISPu a i s jeho funkcemi. Hlavní přínos VisualLISPu je umožnění přístupu k objektům AutoCADu a ostatních aplikací na AutoCADu založených pomocí rozhraní ActiveX (což tedy z pohledu roku 2010 není zas taková bomba). Pro uživatele to prakticky přináší mimo jiné daleko pohodlnější přístup k objektům a jejich vlastnostem.

Na začátek vytvoříme ve VisualLispu jednoduchou funkci, která bude podobná nástroji z předchozího příspěvku. Příkazem VLIDE nebo VLISP zobrazíme editor kódu VisualLISPu. Pomocí ikony, přes File / New File nebo pomocí Ctrl+N založíme a uložíme nový soubor, který pojmenujeme třeba VlastnostiEntiy.lsp

Kód prvního programu bude vypadat následovně:

(defun c:info  ()
    (vl-load-com)

    (setq  entity1           (entsel "\nVyberte  objekt: ")
           entity2           (car entity1)
           vla-entity        (vlax-ename->vla-object entity2)
    )
)

K tomu uveďme pár základních informací.

Příklad vytvoření dialogu v OpenDCL Studiu

Kategorie » téma: LISP

06.09.2010 08.16 | Jan Panoch | Komentáře: 0 komentářů | Přečteno: 9531x

< 1 2 3 Stránka 4 >