Solved

Word-style menus

Posted on 2000-03-01
7
129 Views
Last Modified: 2010-04-04
Hello

I would like to know the best way to create the new Word style menus. I refer to the ones that have toolbars with buttons containing menu captions. When the menu caption is pressed, a popup menu appears below it with the menu items. When you scroll your mouse across the other options, the popups all appear below.

I ask this question because I want to ensure that there is not a control requiring a few distinct property settings to accomplish this behaviour, before I write my own component to do this.

Cheers,
Edo
0
Comment
Question by:Edo082297
  • 3
  • 3
7 Comments
 
LVL 10

Expert Comment

by:Lischke
ID: 2572082
Hi Edo,

fortunately there's already all in Delphi you need for this kind of menu (it is actually the same as the IDE uses, right?). The only thing you won't get is the menu animation, but all other is easy:

1) place a TMainMenu on the form and fill it with items
2) place a toolbar on the same form and create a few buttons
3) select each button and set its MenuItem property to an item of your choice
4) mark each item as grouped to allow for automatic open and close of the submenus when moving the mouse over different main items


Ciao, Mike
0
 
LVL 12

Expert Comment

by:rwilson032697
ID: 2574194
Listening
0
 
LVL 1

Author Comment

by:Edo082297
ID: 2591277
Hi Mike

Thanks. Do you have any suggestions as to how I could now make the buttons flat (TSpeedButton)? Will I have to write my own TToolButton?

Post as answer, you have met the requirements.

Cheers,
Edo
0
Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

 
LVL 10

Accepted Solution

by:
Lischke earned 50 total points
ID: 2591296
Hi Edo,

use property TToolbar.Flat to make flat buttons.

Ciao, Mike
0
 
LVL 1

Author Comment

by:Edo082297
ID: 2591318
I just found it, one just has to set the Flat property to true of the containing toolbar.

I'm not terribly happy with the all or nothing sizes of the buttons, however. Anyway, it's a pretty moot point.

Cheers,
Edo
0
 
LVL 1

Author Comment

by:Edo082297
ID: 2591321
Ha-ha, our answers crossed.
0
 
LVL 10

Expert Comment

by:Lischke
ID: 2591341
:-)
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
Delphi XE2 application frozen on Windows 10 10 277
indy Tmemory stream non latin charcter issue 2 98
Delphi inherited method 6 63
RESTRequest Parameter 4 14
Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
Introduction Raise your hands if you were as upset with FireMonkey as I was when I discovered that there was no TListview.  I use TListView in almost all of my applications I've written, and I was not going to compromise by resorting to TStringGrid…
This tutorial gives a high-level tour of the interface of Marketo (a marketing automation tool to help businesses track and engage prospective customers and drive them to purchase). You will see the main areas including Marketing Activities, Design …
In this video I am going to show you how to back up and restore Office 365 mailboxes using CodeTwo Backup for Office 365. Learn more about the tool used in this video here: http://www.codetwo.com/backup-for-office-365/ (http://www.codetwo.com/ba…

895 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

11 Experts available now in Live!

Get 1:1 Help Now