I create a little project to realize a menu that is hidden when no item
is clicked and the mouse leaves the menu. Not much code needed.

http://www.beckersoft-online.de/demos/menutest.html

Uli

Uli,

<< I create a little project to realize a menu that is hidden when no item is clicked and the mouse leaves the menu. Not much code needed.

http://www.beckersoft-online.de/demos/menutest.html >>

Beautiful.  I especially like the animation on the mouse-over.

Tim Young
Elevate Software
www.elevatesoft.com

Uli Becker wrote:

> I create a little project to realize a menu that is hidden when no
> item is clicked and the mouse leaves the menu. Not much code needed.

Me want! 8-)

--

Matthew Jones

Matthew,

> Me want! 8-)

Here it is.

Uli

Uli Becker wrote:

> Here it is.

You are a gentleman sir. Thank you.

--

Matthew Jones

On 11/9/2015 10:27 AM, Uli Becker wrote:
> I create a little project to realize a menu that is hidden when no item
> is clicked and the mouse leaves the menu. Not much code needed.


Nicely done - this looks great!

And thanks for posting the code.

Raul

Uli Becker wrote:

> I create a little project to realize a menu that is hidden when no
> item is clicked and the mouse leaves the menu. Not much code needed.
>
> http://www.beckersoft-online.de/demos/menutest.html

I've now had a chance to look into this, and it is nicely done.
Changing the line in FormCreate to:
     Background.Fill.Color := clRed; // clTransparent;
allows you to see how it is all done (the smoke and mirrors are
visible). You also don't seem to do anything with VisibleUnderline.
That seems to have been replaced by the HideMenus and that allows more
than one to be shrinking at the same time.

But very nice, and easily adaptable I think - it would be good to be
able to keep the menus on a different form and re-parent them, but then
the events would be in the wrong place. I think this could also easily
be made more generic, so that it doesn't need a set number of menus,
but can try MenuCaption1, 2, etc, and when it gets to no component of
that name, it stops. Basically it works it out.

But really impressed at the result - nice stuff. (Also EWB2 of course,
which provides the animations and the like.)

--

Matthew Jones

Matthew,

> But really impressed at the result - nice stuff. (Also EWB2 of course,
> which provides the animations and the like.)

Thank you very much - glad you like it. And YES: EWB2 makes it possible!

> You also don't seem to do anything with VisibleUnderline.

Yes, I forgot to take it out.

In my first approaches I tried to use the MouseMove events to check if
the cursor has left the currently visible menu, but too many hassles
with storing the bounds of the active menu, getting the "ClientToScreen"
coordinates etc.... And much too much code.

It took me some time to realize that a transparent panel as parent for
the menus would do the trick. Off course the necessary code can be
improved and nearly everything can be created at runtime.

Uli

Just saw this... Very nice!

Hi Uli

Just seen it.

Great work.


Kamran