AutoLisp_Dotazove_A_Prikazove

Funkce dotazové a příkazové

(acad_colordlg colornum [flag])

*Argumenty:*
	colornum	- integer - v rozmezí 0-256, reprezentující požadovanou barvu AutoCADu
	flag	- zobrazí (nastaven na různou od nil) nebo schová tlačítka (nastaven na nil) tlačítka BYLAYER a BYBLOCK

*Poznámka:*
	- nastavení colornum na hodnotu 0 přísluší BYBLOCK, a nastavení colornum na hodnotu 256 přísluší BYLAYER

*Popis:*
	- zobrazí dialogový box s nabídkou standardních barev AutoCADu

*Návratové hodnoty:*
	- vybraná barva
	- nil - v případě zrušení výběru

*Příklady:*
	Vyzvání uživatele aby zadal barvu, standardní nastavení je zelená, v případě, že není nic vybráno:
	(acad_colordlg 3)

(acad_helpdlg helpfile topic)
	- zastaralý - nahrazen funkcí help

(command [arguments] ...)

*Argumenty:*
	arguments	- příkaz AutoCADu a jeho volby
		- může být řetězec, real, integer, bod
		- řetězec ("") odpovídá stisknutí ENTRu
		- nejsou-li argumenty uvedeny odpovídá příkaz zmáčknutí ESC

*Popis:*
	- spustí příkaz AutoCADu

*Návratové hodnoty:*
	- nil

*Příklady:*
	Nastavení dvou bodů a nakreslení čáry mezi nimi:
	(setq pt1 '(1 1) pt2 '(1 5))
		vrací (1 5)
	(command "line" pt1 pt2 "")
		vrací line From point:
		vrací To point:
		vrací To point:
		vrací Command: nil

Podívejte se na funkci vl_cmdf.

(getcfg cfgname)

*Argumenty:*
	cfgname	- řetězec (max 496 znaků) - jméno sekce a hodnoty parametru
		- forma řetězce: "AppData/application_name/section_name/ .../param_name"

*Popis:*
	- získá data aplikace z AppData sekce souboru acad.cfg

*Návratové hodnoty:*
	- data aplikace - proběhlo-li vše v pořádku
	- nil - v případě, že cfgname není platný

*Příklady:*
	Získání parametru WallThk ze sekce AppData/ArchStuff:
	(getcfg "AppData/ArchStuff/WallThk")
		vrací "8"

(getcname cname)

*Argumenty:*
	cname	- lokalizovaný nebo anglický příkaz AutoCADu (max. délka 64 znaků)

*Popis:*
	- získání lokalizovaného nebo anglického příkazu AutoCADu

*Návratové hodnoty:*
	- lokalizované jméno příkazu - je-li zadáno anglické jméno
	- anglické jméno příkazu - je-li zadáno lokalizované jméno příkazu

*Příklady:*
	Česká verze AutoCADu:
	(getcname "ČÁRA")
		vrací "_STRETCH"
	(getcname "_STRETCH")
		vrací "ČÁRA"

(getenv variable-name)

*Argumenty:*
	variable-name	- řetězec - jméno systémové proměnné prostředí

*Popis:*
	- získání řetězce přiřazeného systémové proměnné prostředí

*Návratové hodnoty:*
	- řetězec - reprezentující hodnotu systémové proměnné prostředí
	- nil - proměnná v systému neexistuje

*Příklady:*
	Získání cesty k souborům AutoCADu:
	(getenv "ACAD")
		vrací "/acad/support"
	Získání cesty k souborům AutoCADu:
	(getenv "neexistujici")
		vrací nil

(getvar varname)

*Argumenty:*
	varname	- řetězec - jméno systémové proměnné

*Popis:*
	- získání hodnoty systémové proměnné AutoCADu

*Návratové hodnoty:*
	- hodnota systémové proměnné
	- nil - varname není jméno systémové proměnné

*Příklady:*
	Získání hodnoty proměnné FILLETRAD
	(getvar 'FILLETRAD)
		vrací 0.25

(help [helpfile [topic [command]]])

*Argumenty:*
	helpfile	- řetězec - jméno souboru helpu, není-li uvedeno jméno souboru, AutoCAD zobrazí standardní soubor
		- koncovka nemusí být uvedena
	topic	- téma zobrazené při inicializaci
	command	- řetězec - specifikující iniciální stav okna Helpu
		- možné typy:
			HELP_CONTENTS:	- zobrazí první téma v souboru Helpu
			HELP_HELPONHELP:	- zobrazí help o používání helpu
			HELP_PARTIALKEY:	- zobrazí dialog Najít s řetězcem napsaným v parametru topic

*Popis:*
	- zpřístupní prostředky helpu

*Návratové hodnoty:*
	- řetězec z argumentu helpfile - proběhlo-li vše v pořádku
	- nil - v opačném případě

*Poznámky:*
	- při použití příkazu help bez parametrů, vrací help prázdný řetězec (""), je-li vše v pořádku. V případě chyby vrátí funkce nil.

*Příklady:*
	Zobrazení nápovědy o příkazu MYCOMMAND ze souboru helpu achelp.hlp:
	(help "achelp.hlp" "mycommand")

Podívejte se na funkci setfunhelp.

(setcfg cfgname cfgval)

*Argumenty:*
	cfgname	- řetězec (max 496 znaků) - jméno sekce a hodnoty parametru
		- forma řetězce: "AppData/application_name/section_name/ .../param_name"
	cfgval	- řetězec (max 512 znaků)
		- delší řetězce jsou možné, ale nejsou vráceny

*Popis:*
	- zapíše data aplikace do AppData sekce souboru acad.cfg

*Návratové hodnoty:*
	- cfgval - proběhlo-li vše v pořádku
	- nil - v případě, že cfgval není určen

*Příklady:*
	Nastavení WallThk parametru v AppData/ArchStuff sekci na 8:
	(setcfg "AppData/ArchStuff/WallThk" "8")
		vrací "8"

Podívejte se na funkci getcfg.

(setenv varname value)

*Argumenty:*
	varname	- řetězec - jméno systémové proměnné prostředí
	value	- řetězec - specifikující na jakou hodnotu má být proměnná varname nastavena

*Popis:*
	- funkce nastaví systémovou proměnnou prostředí na danou hodnotu

*Návratové hodnoty:*
	- hodnota systémové proměnné

*Poznámky:*
	- některé nastavení se projeví až po novém zpuštění AutoCADu

*Příklady:*
	Nastavení systémové proměnné prostředí MaxArray na 10000:
	(setenv "MaxArray" "10000")
		vrací "10000"

Podívejte se na funkci getenv.

(setfunhelp c:fname [helpfile [topic [command]]])

*Argumenty:*
	c:fname			- řetězec - uživatelem definovaný příkaz, musí se použít c:prefix
	helpfile			- řetězec - jméno souboru helpu, koncovka není nutná
				- v případě neuvedení koncovky se AutoCAD dívá na soubory s koncovkou .hlp, v případě nenalezení souboru s touto koncovkou se hledá soubor s koncovkou .ahp. Není-li ani tento soubor nalezen hledá se soubor bez koncovky.
	topic			- řetězec identifikující ID téma Helpu
	command			- řetězec identifikující typ požadavku na help, toto je parametr fuCommand posílaný do Helpu Windows

*Popis:*
	- definuje uživatelský příkaz, který po zadání spustí přiřazenou nápovědu

*Návratové hodnoty:*
	- řetězec - c:fname, je-li vše v pořádku
	- nil - v opačném případě

*Příklady:*
	Definice jednoduché funkce a nastavení setfunhelp k spojení funkce s nápovědou k příkazu circle:
		(defun c:foo ()
			(getstring "Press F1 for help on the foo command:")
		)
		(setfunhelp "c:foo" "acad.hlp" "circle")
	- po nahrání této funkce příkazem foo a zmáčknutí F1 se zobrazí help k příkazu circle.

(setvar varname value)

*Argumenty:*
	varname	- řetězec - jméno systémové proměnné
	value	- atom nebo výraz - výsledek je zapsán do varname, pro systémovou proměnnou typu integer, musí být hodnota v rozmezí –32,768 a +32,767

*Popis:*
	- nastavení hodnoty systémové proměnné AutoCADu

*Návratové hodnoty:*
	- hodnota value - proběhne-li vše v pořádku
	- nil - argument varname není jméno systémové proměnné

*Příklady:*
	Nastavení hodnoty proměnné FILLETRAD na 0.5:
	(setvar "FILLETRAD" 0.50)
		vrací 0.5

Podívejte se na funkci getvar.

(ver)

*Popis:*
	- zjištění verze AutoLISPu

*Návratové hodnoty:*
	- řetězec - tvaru: "Visual LISP číslo_verze (dva_znaky_kódu_země)"

*Příklady:*
	(ver)	vrací "Visual LISP 2000 (en)"

(vl-cmdf [arguments] ...)

*Argumenty:*
	arguments	- příkaz AutoCADu a jeho volby
		- může být řetězec, real, integer, bod
		- řetězec ("") odpovídá stisknutí ENTRu
		- nejsou-li argumenty uvedeny odpovídá příkaz zmáčknutí ESC

*Popis:*
	- spustí příkaz AutoCADu

*Návratové hodnoty:*
	- T

*Příklady:*
	Ukázky rozdílu použití funkcí command a vl_cmdf:
	(command "line" (getpoint "point?") '(0 0) "")
		line Specify first point: point?
		Specify next point or [Undo]:
		nil
	- prvně je volána funkce LINE a potom funkce getpoint

	(vl-cmdf "line" (getpoint "point?") '(0 0) "")
		point?line Specify first point:
		Specify next point or [Undo]:
		T
	- prvně je volána funkce getpoint a potom funkce LINE

(vlax-remove-cmd global-name)

*Argumenty:*
	global-name	- řetězec - jméno příkazu nebo T
		- je-li uvedena hodnota T, je vymazána příkazová skupina VLC-AppName (např. VLC-VLIDE).

*Popis:*
	- vymaže jeden příkaz nebo příkazovou skupinu

*Návratové hodnoty:*
	- vybranou barvu
	- nil - v případě zrušení výběru

*Příklady:*
	Vymaže příkaz definovaný v vlax-add-cmd:
	_$ (vlax-remove-cmd "hello-AutoCAD")
		vrací T

	- pokus o vymazání neexistujícího příkazu:
	_$ (vlax-remove-cmd "hello-AutoCAD")
		vrací nil, protože příkaz "hello-AutoCAD" neexistuje