(*
 *  TAdvMenu component version 0.95
 *  (c) 1997 Brutto Vanni
 *  email     asytnt@protec.it
 *  advmenu page http://www.geocities.com/SiliconValley/Lab/6806/advmenu.htm
 *
 *  Visit also my homepage, here you can find sample, components, and
 *  a lot of Delphi Tips & Tricks
 *  ---> Homepage  http://www.geocities.com/SiliconValley/Lab/6806
 *
 *
 *
 *
 *  All code made by myself
 *
 *  Freeware - compiled under Delphi 3.X
 *
 *  Note that comments are in Italian, my language, if you want
 *  any kind of suggestion please e-mail me!
 *
 *  I suggest you to check new versions to my homepage
 *
 ***************************************************************************
 *  1.   Want to contribute with the development of TAdvMenu?
 *     I'm looking for a way to make an ActiveX (ocx) from this vcl
 *     so also Visual Basic users can enjoy using my components ;-))))))
 *       If you have ANY KIND of information about writing non visual
 *     ActiveX with Delphi with editors at design time send me an
 *     e-mail today.
 *
 *  2.   I need also a way to check if Items property of TMainMenu change.
 *     If you know a way to do it (or you have some ideas) e-mail me.
 ***************************************************************************
 *
 *
 * Dear user!
 * The registration:
 * TAdvMenu i absolutely freeware, however TAdvPopMenu is a limited version
 * if you want to register TAdvPopMenu send me a T-shirt (size XL), 
 * a couple of dollars, a postcard or whatever you think it's worth to:
 *
 *                 Brutto Vanni
 *                 Via Vasche, 36
 *                 35030 Vo' (PADOVA)
 *                 ITALY
 *
 * I collect all sorts of T-shirts (company labels, school labels,
 * football teams, WWW surfing shirts and you name it).
 *
 * Any donation worth $20 or more is entitled to a free update as
 * soon as it's ready (include source code).
 * Be sure to include your email mail address.
 *
 * Sometime (usually at saturday night from 21:00 to 22:30 (first to
 * go to disco :-))) i'm in IRC at "#zzap!" channel under these nicks:
 *                                     asytnt - regedit - asy - tnt
 * Want to ask someone to me in real time? Go to "#zzap!"  !!!!!!
 *
 * Thanks for using AdvMenu, and see you in cyberspace...
 *
 *
 * If you're a web serfer i suggest to visit my homepage, and remember
 * to send my by email any tip that you think usefull for AdvMenu.
 *
 *
 *  Bugs know :
 *
 *    1- When a menu si moved in standard items editor
 *       TAdvancedMenu don't work properly.
 *       bug solved in 0.30 ;-)
 *
 *
 ************************************************************************
 ************************************************************************
 ** HISTORY OF TAdvMenu
 **
 ** VISUAL BASIC VERSIONS :-(((((
 **   1.0     The first and the only one! :-))))
 **           (it was an ocx made with VB5, it wasn't Visual, a every icons
 **           had to assigned to the menu)
 **
 **
 **
 ** DELPHI 2.0 VERSIONS
 **   0.00001 No Visual Component, No Bitmaps, No, No and No! -14/10/1997-
 **   0.81    I've just decide to include also dcu files for
 **           the good old Delphi 2.0 :-))) All version >= 0.81 work
 **           also under this version of Delphi.
 **
 **
 **
 ** DELPHI 3.0 VERSIONS
 **   0.10    Visual Component with RAD Editor. This version used icons
 **           instead of bitmaps (i didn't know how to draw transparently
 **           a bitmap in an hDC).
 **   0.11    Added check/uncheck options
 **   0.20    First DSP uploaded version, now AdvMenu use Bitmaps with
 **           width and height of 14 pixel (0.2X are not
 **           compatible with 0.1X)
 **   0.21    Added Enabled property (don't work fine however)
 **   0.22    Fixed Enabled property, now also bitmaps are grayed
 **   0.30    Now AdvMenu save in dfm a TMenuItem object instead of menu
 **           position. You can so move a menuline with the standard Delphi
 **           editor without re-associate the choosed bitmap -02/06/1998-
 **   0.31    Fixed default (bold menu) bug. Correct a problem with
 **           incorrect deallocation of some pointer.
 **           Added refresh button in design editor -06/06/1998-
 **   0.40    AdvMenu can load in TMenuLine any bound
 **           bitmaps (16x16, 24x24, 32x32, ecc) -07/06/1998-
 **   0.50    Fixed the Visual Effect bugs.
 **           Now turning true Visual Effects property AdvMenu will
 **           become more "cool".
 **           Another effects added: when you select a main menu it
 **           will be drawed "sunken" (more Visual and Office :-))) -08/06/1998-
 **           Note that these options there were also in 0.10 but
 **           only now they are debugged!!!
 **   0.60    Bitmaps editor enhanced! Now you can select if you want to
 **           see visual effect on a menuline!!!!! Rewrite the routine
 **           introduced in 0.31 to draw bold menu.
 **   0.61    Fixed a little bug in the new enhanced editor
 **   0.70    New property! Now you can make more "visual&cool" also
 **           the system menu.
 **           Added the method 'caption' to change a caption at run-time.
 **           Fixed two bugs:
 **           1. precendently when you move a mouse in
 **              a non client area (around a menu) the cursor "blink"
 **           2. Using MDI Forms TAdvMenu didn't work properly
 **              "Fissa il prefisso" -19/06/1998-
 **   0.80    AdvMenu work also under C++ Builder! Enjoy IT! :-)))
 **           (tested under C++ Builder 1.0 beta version -Ebony-, sorry
 **           but i've not so much money to buy C++ Builder :-((( )
 **           -23/06/1998- (Meno uno all'esame di maturit!!!!!)
 **   0.81    Multi compiler version: full support for C++ Builder 1.0 and
 **           Delphi 2.0 dcu added!!!
 **           -25/06/1998- (Ho appena finito il tema di ragioneria
 **                         dell'esame! BASTA, NON VOGLIO PIU' VEDERE
 **                         BILANCI IN VITA MIA!!!!!!!!!!!!!!!!!)
 **   0.90    Yes! AdvMenu can now considered completed!
 **           AdvMenu include also an AdvPopUpMenu that work as PopUpMenu.
 **           Note that i've decided to limited it's work only in the
 **           IDE, yes, AdvMenu is freeware but AdvPopUpMenu...
 **           See the readme for more information!
 **           Note that old method CreatePopUpMenu is not mantained!
 **           Added also an event to assign menu hint at a control
 **           see the sample for more info about it.
 **           -28/06/1998- (Manca poco agli orali il 02/07)
 **   0.91    Fixed a lot of bugs on the TAdvPopMenu editor (C++ version).
 **           Fixed the "Image size invalid" error.
 **           Now you can use AdvMenu also in TWinControl inherited controls
 **           -03/07/1998- Ho finito la maturit!!! YESSSSSSSS!
 **   0.92    System Menu enhanced! Now you can set the Hint showed in
 **           System Menu Items (see sample for more information)
 **           Added Also SysItems property for add new Item on
 **           standard System Menu!!!
 **           Fixed a bug on AppHint Event.
 **           Now TAdvMenu Bitmaps editor look like TAdvPopMenu editor
 **           -08/07/1997-
 **   0.93    Fixed the accelerator key bug -12/07/1998-
 **   0.94    Fixed the indentation bug -10/08/1998-
 **   0.95    Added TVBMenuBar component and TToolBar property in AdvMenu
 **           (this property work with TVBMenuBar component...)
 **           Fixed a bug that occour when adding TMenuItem at run-time...
 **           just use the Add method of AdvMenu (see sample for more info)
 **           -24/08/1998-
 **
 **
 **
 ** DELPHI 4.0 VERSIONS
 **           Very afraid, i don't have enough money to buy the new version of
 **           Delphi :-(((
 **
 **
 **
 ** C++ BUILDER VERSIONS
 **           All versions >= 0.80 can work also under C++ Builder.
 **
 **
 **
 **   1.X     What do you think to contribute me with some money? :-)
 **           The development of AdvMenu spend me a lot of time...
 **
 **
 **
 **
 ** Very special thanks to:
 ** - Fabrice Deville and his fantastic TExplorerButton
 ** - Lee Hae Un and his suggest (multisize bitmap)
 ** - IGA | Igor Tommasetto | http://www.geocities.com/TheTropics/Shores/5823/
 **   (the official computer seller of my town)
 ** - Gerald Holdsworth, official Windows NT tester
 ** - Peo | Andrea Santimaria | http://www.geocities.com/Area51/Dimension/6754/
 **   (Peo, ma quando diavolo ti decidi ad imparare un po' di Delphi ?-)))
 ** - Marco Tamarro that encouraged me to make TAdvMenu better
 **   (he saw the terrible 0.20!)
 ** - Nando Dessena that helped in the usage of DrawFrameControl API
 ** - Thomas Reimann (he use AdvMenu in him wonderfull project)
 ** - George Q. Yu (for him contribution)
 ** - Marijan Mihic for the C++ Builder sample and support.
 **
 ** - All people talking news it.comp.delphi
 **
 **
 **
 *
 *)