$CLASSNAME$
	UIMenu
$SUMMARY$
	Class UIMenu
$LANG_RU$
	 UIMenu
$ABOUT$
	Class of menu bar.
$LANG_RU$
	  .
$SYNTAX$
	UIMenu()	--> UIMenu object
$LANG_RU$
	UIMenu()	-->  UIMenu
$ATTRIBUTES$
	<className>	- Class name. Value should be "UIMenu".
	<elem>		- Array of menu items.
$LANG_RU$
	<className>	-  . : "UIMenu".
	<elem>		-   .

$METHODNAME$
	UIMenu()
$SUMMARY$
	Constructor. Create horizontal menubar.
$LANG_RU$
	.   .
$SYNTAX$
	UIMenu() --> UIMenu object
$ENDMETHOD$

$METHODNAME$
	add()
$SUMMARY$
	Add menu item.
$LANG_RU$
	  .
$SYNTAX$
	add([<pic>],<name>,<action>,[<isEnabled>])	--> <nItem>
$ARGUMENTS$
	<pic>		- Object <link linkend="classuiimage">UIImage</link>. Icon of menu item.
	<name>		- String. Menu item label. You can define accel key for widget activation. Just place symbol "&" before accel letter. This letter will be underlined and widget will be activated with key Alt-letter.
	<action>	- Code block or <link linkend="classuipopupmenu">UIPopupMenu</link> object. Executed code block or sub-menu.
	<isEnabled>	- Boolean. Flag of activity menu item.
$LANG_RU$
	<pic>		-  <link linkend="classuiimage">UIImage</link>.   .
	<name>		- .   .         ,   "&"   .    ޣ        Alt-.
	<action>	-     <link linkend="classuipopupmenu">UIPopupMenu</link>.     .
	<isEnabled>	-  .    .
$RETURNS$
	Index of added object <link linkend="classuimenuitem">UIMenuItem</link> in array <elem>.
$LANG_RU$
	   <link linkend="classuimenuitem">UIMenuItem</link>   <elem>.
$DESCRIPTION$
	In this method the object <link linkend="classuimenuitem">UIMenuItem</link> is placed in the <elem> array. Method returns index of added object in this array.
$LANG_RU$
	      <elem>   <link linkend="classuimenuitem">UIMenuItem</link>.        .
$ENDMETHOD$

$METHODNAME$
	enable()
$SUMMARY$
	Make menu item active.
$LANG_RU$
	   .
$SYNTAX$
	enable(<pos>)
$ARGUMENTS$
	<pos>		- Number. Index of menu item.
$LANG_RU$
	<pos>		- .   .
$ENDMETHOD$

$METHODNAME$
	disable()
$SUMMARY$
	Disable menu item.
$LANG_RU$
	   .
$SYNTAX$
	disable(<pos>)
$ARGUMENTS$
	<pos>		- Number. Index of menu item.
$LANG_RU$
	<pos>		- .   .
$ENDMETHOD$

$METHODNAME$
	remove()
$SUMMARY$
	Delete item from menu.
$LANG_RU$
	  .
$SYNTAX$
	remove(<pos>)
$ARGUMENTS$
	<pos>		- Number. Index of menu item.
$LANG_RU$
	<pos>		- .   .
$ENDMETHOD$

$METHODNAME$
	clear()
$SUMMARY$
	Clear menu.
$LANG_RU$
	 .
$SYNTAX$
	clear()
$ENDMETHOD$

$METHODNAME$
	getElement()
$SUMMARY$
	Get object of menu item by its index.
$LANG_RU$
	   .
$SYNTAX$
	getElement(<pos>)	--> <oItem>
$ARGUMENTS$
	<pos>		- Number. Index of menu item.
$LANG_RU$
	<pos>		- .   .
$RETURNS$
	<link linkend="classuimenuitem">UIMenuItem</link> or <link linkend="classuipopupmenu">UIPopupMenu</link> object. Menu item object.
$LANG_RU$
	 <link linkend="classuimenuitem">UIMenuItem</link>  <link linkend="classuipopupmenu">UIPopupMenu</link>.   .
$ENDMETHOD$

$METHODNAME$
	isEnabled()
$SUMMARY$
	Get flag of activity of menu item.
$LANG_RU$
	    .
$SYNTAX$
	isEnabled(<pos>)	--> <bEnabled>
$ARGUMENTS$
	<pos>		- Number. Index of menu item.
$LANG_RU$
	<pos>		- .   .
$RETURNS$
	Flag of activity of menu item.
$LANG_RU$
	   .
$ENDMETHOD$

$METHODNAME$
	setKey()
$SUMMARY$
	Set menu item activation by shortcut.
$LANG_RU$
	      .
$SYNTAX$
	setKeyEvent(<pos>,<cKey>)
$ARGUMENTS$
	<pos>		- Number. Index of menu item.
	<cKey>		- String. Shortcut definition. For example, "F5" or "Alt+M".
$LANG_RU$
	<pos>		- .   .
	<cKey>		- .   . , "F5"  "Alt+M".
$ENDMETHOD$

$METHODNAME$
	unSetKey()
$SUMMARY$
	Unset menu item activation from shortcut.
$LANG_RU$
	      .
$SYNTAX$
	unSetKey(<pos>,<cKey>)
$ARGUMENTS$
	<pos>		- Number. Index of menu item.
	<cKey>		- String. Shortcut definition. For example, "F5" or "Alt+M".
$LANG_RU$
	<pos>		- .   .
	<cKey>		- .   . , "F5"  "Alt+M".
$ENDMETHOD$

$EXAMPLES$
	menu := UIMenu()
	window_menu := UIPopupMenu()

	menu:add(,"&Window", window_menu)
	window_menu:add(,"&Close", {|| win:childClose() } )
	window_menu:add(,"Close &all", {|| win:childCloseAll() } )

$PLATFORMS$
	No dependies of platform.
$LANG_RU$
	   .
$SEEALSO$
$AUTHOR$
	Andrey Cherepanov <skull@eas.lrn.ru>
$LANG_RU$
	  <skull@eas.lrn.ru>
$LASTDATE$
