{ }
(*
	ARMenuToolBar V1.0 by Albert Research 98

	Legal Notice:

	Distribution

	This component is freeware. As such, Albert Research gives no warranty to its accuracy, fitness for any particular use, effects of use, or reliability.
	This component may not be distributed as a part of another component package without Albert Research written consent. It may be freely distributed,
	although it must be distributed with all original files in their original format intact. If you use this component in your software, please include an acknow-
	ledgment that portions are copyrighted by Albert Research. Please contact the author, Albert, at one of the below address with questions, comments, bug-reports
	 or any updates you make to the component.

	 Albert Research:

	 e-mail: albertrs@redestb.es
	 Web: http://personal.redestb.es/albertrs



								 ``     ```''MM'``
										``A##NNN````
								   `` ``''#UUMMMNN```
								 ``  'MMAAHRRMMMHHNN```
								   ``R@@##@##MMHHHMMN````
								 ``HHR@@@@@##MMMHHNNNNN``
							  ```AAHH#@@@@@@@MMNNNMMMHHNN`           `
				  ``       `````H##@@H####@##MMMMMHHMHHHHH```` ````
						 `` ''###@@##HHHHHR##MMNNNMMNHHHHNNN`````  ``
				  ```      `UU###@@HH@##RR#RRMMMHHNNNNNMMHHHNN`````  `
						 ``#####@##@@@@@##@##MMMMMNNNHHNNNNNNNN````
					   ````RHH##H#####@@@@@##NNNNNMMMNNNNNNNHHHNN  ``
					   `````''~~~::UU@##RR#RRMMMMMNNMMMMM'''```````
					`##HHHH@HH@@HHHHHHHHNNH@@NNHHH@@HHHHH@##HH#@@##HH`
      `````        ````'####@@###@@H@@HHH@@HHHHHHH@HH@@@@@@@@@@NNMNNHHHHH``
		``     ```##@@@@@##@@@##@@@@@@####@##MMMMMMMNMMMMNMMHHMHHNNNNHNN```
		  `  ```''RR#HH@@@@HRR##@@@@@@@@@@@##MMMNNMMNNNNNNHHMMNNNMMHHNNNHH```  `
		  `    `HHAA@####@@@@@@@H@@@@@@@#####MMNNNMMNNNNNMNNHHNMMNNMMHNNNN'       ``
	  ``   ``  ```''~MM####@HH##@@@@@@@@##@##MMNNNMMNNNNNNNNHHMNNNNMM'''`````  `
	 `    ```##HHH@@@HHHHHHHNNHHHHH@@@@@#####MMMMMMMNNNNN@HH@@@HHHH##H##HHRHHHH```
	  ````M##@@@@@@@@@@@@HHHHHHHHHHHHHHHHHHHH@@H@@@@HHHHHHHH@@@HHNNNNMHHMMNNNHHH````
	  ``''#@@@@@HH@@@@@@@@@@@@@@@HHHHHHHHHHHH@@HHHHHH@@HH@HHNNMMMNNNNHMMHHNNNNNNMM```
      ```MMRR@##@@@@@@@@@@@@HHHHH@@@@@@@@@@@@HHHHH@@@NNMNNMMMMMNNNNNMMMMNMMMMHNNNNMNNNN`
      ''~AA##@##@@H@@@@@@@@@@@@@@@@@@@@@@@@@@@##MMMNNMMNNNMMNNNMMMNNNNNNNNNMMNNNMMNNNNNH
      ~~A@@RRRHHHH#@@@@@@@@@@@@@@@@@@@@@@@@###RRMMMNNHHHNNMMNNNNNNMMMMNNHNNNNNMMHHMNNNNN@@
      ``'@@##@RR##H@@@@@@@####@##@@@@@@@@@@###@@MMMMMMMNNNHHNNNNNNNNNNNNNNNMMHNNNNHMMHH```
		  ```''M####@##HH##H@@HH#@@HH@HHHH#@@NNNNNNNNNNNNMMMNNNMMNNMMNHHNNN`````  ``
		   ```````MMRRRRR@@#HH@@@##HHH@@HHRRRMMMNNNNMNNNNNMMNNNMMNNHHHNN`````
      ```    ```       `````''R####A@@###HH@@@##MMNMMNNMNNHHNHHNNN``````     `
		   ``               ```````##R@@@@@@@HHMNNNNHNN```       ``
	  ``                         ``'''MMAA#RRMMNHHMM`````          ``   ``
										   ``''     `

*)
{ }

{V1.0... Initial Release}

[To see Correctly select a monotype Font]

		Hello Mates ! Again me ! With a new component ! Well why did I do this comp ?.. Very easy.. I had to make an APP with much menu option ('bout 50) and no toolbar I saw
		suited my needs.. so I decided to do something different (well no so much different).... and THIS came to live. ! I wish you enjoy it !


		Explanation:

		Installation:

		Copy ARMenuToolBar.pas and ARMenuToolBar.dcr to your library directory and install it to any package ! Be aware that this object was designed with D4 I don't know if you
		have to do some changes to bring it up to work with older delphies...



		Object:

		This object was descended from a TPanel.. I first did it from TCustomControl but many usefull things are loosed if you do this.. anyway.. descent it for whatever you like !

		So.. adminiting that is descended from TPanel many properties are from this.. properties I won't describe.. I will describe you the own ones.. and they are following;


		Author: Someone out there , metallica lover, mozart lover, ASM lover, coffee lover, Z80 lover... #;.DDDD
		ButtonAreaColor: The Color of each MenuButton.
		DefMenuViewStyle: The default Listview mode when the Menu is opened.
		ImageList: The ImageList for the MenuButtons.
		MenuAnimation: If you want to see the menu opened and closed animated (glups.. do you like the animation ? NO? any Ideas are very wellcome!).
		MenuAnimationClosedStep: The speed of the Animation when it closes.
		MenuAnimationOpendStep: The Speed of the Animation when it opens.
		MenuAreaHeightOpened,MenuAreaWidthOpened: The MenuArea containing the listview bounds.
		MenuItemSortToogle: If you like the user to Toogle the sorting og the Items in the Listview when it clicks the Column.
		MenuItemSort:What kind of Sorting you want at the MenuItem ListView.
		MenuLargeImages,MenuSmallImages,MenuStateImages: The tipical Listview properties.
		MenuViewStyleAction: If you want the Menu to remember its last Style (Icon,Report,List,SmallIcon) or Just leave one style fixed allways when the menu opens.
		MenuPages : Described below.
		MenuPopUpPosition: The PopUp position of the menu. (Topmost., leftmost.. etc)
		ToolCaption..[]: Typical TPanel Properties.
		TooImage..[*]: Typical TImage Properties.


		MenuPages:
		Cursor: the Cursor you want to see when the user aproaches the button.
		Enabled: glups ?
		ImageIndex: ImageIndex from the ImageList of the button.
		MenuCaption: The Caption of the menu #;.D
		MenuCaptionBeginColor,MenuCaptionEndColor,MenuGradientWidth: Caption Gradient properties.
		MenuColor: Color that affects the menu listview.
		MenuFont: Font that afects the button and the menu listview
		MenuItems: described below.
		MenuStripColor: Color of the button.
		MenuStripHeight: height of the button.
		PageButton..[*]: Typical TSpeedButtons properties.

		MenuItems:
		CloseMenuOnAction: IF you want the menu to close when the user triggers the event associated to the menuitem.
		ImageIndex: The ImageIndex token from SmallImages,LargeImages.
		ItemCaption: The MenuItemText that appears at the Menu ListView.
		ItemEnabled: glups ?
		StateIndex: State Index token from StateImages.



	That's all ! As you see I don't like to write doc's... #;.DD Well.. surely you didn't read this till here... #;.dD or maybe yes ! #;.D... see ya..

	any comments to

	albertrs@redestb.es




