VisualLisp_Fce_Pro_Spravu

Funkce pro správu objektů

(vlax-create-object prog-id)

*Argumenty:*
	prog-id	- řetězec - programový identifikátor požadovaného ActiveX objektu. Formát:
			<Vendor>.<Component>. <Version>
			Příklad: AutoCAD.Drawing.15

*Popis:*
	- vytvoří novou instanci objektu aplikace

*Návratová hodnota:*
	- objekt aplikace (VLA - objekt)

*Příklady:*
	Vytvoření instance Excelu:
	_$ (vlax-create-object "Excel.Application")
		vrací #<VLA-OBJECT _Application 0017b894>

(vlax-dump-object obj [T])

*Argumenty:*
	obj	- VLA objekt
	T	- je-li specifikován vlax-dump-object vypíše všechny metody aplikované na obj

*Popis:*
	- vypíše vlastnosti objektu a volitelně metody aplikované na objekt

*Návratové hodnoty:*
	- T - vše proběhlo v pořádku
	- chybovou zprávu - špatné jméno objektu

*Příklady:*
	_$ (setq aa (vlax-get-acad-object))
		vrací #<VLA-OBJECT IAcadApplication 00b3b91c>

	_$ (vlax-dump-object aa)
	; IAcadApplication: AutoCAD Application Interface
	; Property values:
	; ActiveDocument (RO) = #
	; Application (RO) = #
	; Caption (RO) = "AutoCAD - [Drawing.dwg]"
	.
	T

	_$ (vlax-dump-object aa T)
	; IAcadApplication: AutoCAD Application Interface
	; Property values:
	; ActiveDocument (RO) = #<VLA-OBJECT IAcadDocument 01b52fac>
	; Application (RO) = #<VLA-OBJECT IAcadApplication 00b3b91c>
	; Caption (RO) = "AutoCAD - [Drawing.dwg]"
	.
	; Methods supported:
	; EndUndoMark ()
	; Eval (1)
	; GetInterfaceObject (1)
	; ListAds ()
	; ListArx ()
	.
	T

(vlax-get-acad-object)

*Popis:*
	- získá nejvrchnější level objektu aplikace AutoCADu pro aktuální relaci AutoCADu

*Návratová hodnota:*
	- VLA objekt

*Příklady:*
	_$ (setq aa (vlax-get-acad-object))
		vrací #<VLA-OBJECT IAcadApplication 00b3b91c>

(vlax-get-object prog-id)

*Argumenty:*
	prog-id	- řetězec identifikující požadovaný objekt aplikace. Formát:
			appname.objecttype
		kde	appname - jméno aplikace
		kde	objecttype - objekt aplikace

*Popis:*
	- vrátí běžící instanci objektu aplikace

*Návratové hodnoty:*
	- objekt aplikace
	- nil - nejsou žádné běžící instance specifikovaného objektu

*Příklady:*
	Získání objektu aplikace pro Excel:
	_$ (vlax-get-object "Excel.Application")
		vrací #<VLA-OBJECT _Application 0017bb5c>

(vlax-import-type-library :tlb-filename filename [ :methods-prefix mprefix :properties-prefix pprefix :constants-prefix cprefix])

*Argumenty:*
	filename	- jméno souboru knihovny typů i s cestou
	mprefix	- prefix používaný pro metody
	pprefix	- prefix používaný pro vlastnosti
	cprefix	- prefix používaný pro konstanty

*Popis:*
	- importuje informace z typové knihovny

*Návratová hodnota:*
	- T - vše proběhlo v pořádku

*Příklady:*
	Importování Microsoft Word typovou knihovny:
	$ (vlax-import-type-library :tlb-filename "c:/program files/microsoft office/msword8.olb" :methods-prefix "msw-" :properties-prefix "msw-" :constants-prefix "mswc-")
		vrací T

(vlax-method-applicable-p obj method)

*Argumenty:*
	obj	- VLA objekt
	method	- symbol nebo řetězec - jméno ověřované metody

*Popis:*
	- zjistí zda objekt podporuje speciální metody

*Návratové hodnoty:*
	- T - objekt podporuje metodu
	- nil - v opačném případě

*Příklady:*
	Následující příkazy jsou přítomny u objektu LightweightPolyline:
	_$ (vlax-method-applicable-p WhatsMyLine 'copy)
		vrací T
	_$ (vlax-method-applicable-p WhatsMyLine 'AddBox)
		vrací nil

(vlax-object-released-p obj)

*Argumenty:*
	obj	- VLA objekt

*Popis:*
	- zjistí zda byl objekt uvolněný

*Návratové hodnoty:*
	- T - objekt byl uvolněn (žádný kreslící objekt AutoCADu není připojený na obj)
	- nil - objekt nebyl uvolněn

*Příklady:*
	Připojení aplikace Excel k aktuálnímu výkresu AutoCADu:
	_$ (setq excelobj (vlax-get-object "Excel.Application"))
		vrací #<VLA-OBJECT _Application 00168a54>

	Uvolnění objektu Excelu:
	_$ (vlax-release-object excelobj)
		vrací 1

	Zjištění zda je objekt uvolněn:
	_$ (vlax-object-released-p excelobj)
		vrací T

(vlax-read-enabled-p obj)

*Argumenty:*
	obj	- VLA objekt

*Popis:*
	- zjistí zda může být objekt čten

*Návratové hodnoty:*
	- T - objekt je možné číst
	- nil - v opačném případě

(vlax-typeinfo-available-p obj)

*Argumenty:*
	obj	- VLA objekt

*Popis:*
	- zjistí kdy jsou přítomny informace z TypeLib pro specifikovaný objekt

*Návratové hodnoty:*
	- T - TypeLib informace jsou čitelné
	- nil - v opačném případě

(vlax-write-enabled-p obj)

*Argumenty:*
	obj	- VLA objekt nebo entita AutoLISPu (ename)

*Popis:*
	- zjistí zda může být modifikován objekt výkresu AutoCADu

*Návratové hodnoty:*
	- T - objekt výkresu AutoCADu může být modifikován
	- nil - objekt nemůže být modifikován