Two TMainMenu on the main form .. is it possible??

Hello,
I am developing an application where there is a main form. This main form has a TMainMenu with all the necessary drop down menu items. Now I have a MDI child window which changes according to the menu item selected from TMainMenu. Depending on which MDIchild window I am opening, I need one more Menubar on the main form which is similar to the main TMainMenu. I tried using another TMainMenu on the main form. But during run time it is not displayed. Can anyone help me with this .Any other suggested solution will be appreciated.

Thanx
Mahendra Ghuge

From memory, you may only have one Mainmenu component. Do you need the second menu on the MDI child form, or on the main form along with the other menu?

Have you looked at the Toolbar component under the Win32 tab of Delphi? You can use this to create some good looking menu options. If you still need the drop down functionality, one way would be to create the menu buttons yourself (i.e. Filem Edi, Search) and whenever the user clicks on the button, have a popupmenu appear directly underneath the button. This gives the effect of a main menu. You can set the location of the popup menus relative to the buttons position on your form.

Unless somebody else out there know how to make the system accept two main menus...?

Okay,

First off, the Toolbar itself has a property in the Object Inspector entitled ShowCaptions. Set this to True to be able to see the captions on the buttons.

Secondly, set an Onclick action to the button and in there enter the code to manually execute the popupmenu.

PopupMenu1.Popup(X,Y);

X is the Horizontal axis (integer) and Y is the vertical value. You should be able to work out these values based on the buttons position on the form.

HTH

To invoke the pop-up menu with a left-click, simply add an OnClick handler, check for a left-click and invoke the pop-up.

Hi,
Thanks for your reply. I am trying different way to solve this issue. One I found was to use TToolButton and in the Object Manager set the style to tbsDropDown. Now this looks fine to me as far as the functionality is concerned but not the appearance. I have a small problem here though . I tried to assign a name to tis TToolbutton through caption on the object manager, but doesnt seem to display anything. Any idea why???
I am trying the solution that you provided to me here too. Yes I need the 2nd menu item on the Main form not the child form.
Thanks again for your response

hi again,
i tried using popup menu option as per your instruction, but the the pop menu is displayed only on right click not the left click which I need. Any suggestion??

Hello,
I know this is a silly question.. but cant really get around with this.. may be i am too tired to think .. Please do help me.. I am using OnClikc handler and then using
PopupMenu1->Popup(100,500);
This is just a one line code:

void __fastcall TMainForm::Button1Click(TObject *Sender)
{
PopupMenu1->Popup(100,500);
}

This is giving me a weird error:
[Linker Error] Unresolved external '__fastcall TMainForm::Popup(System::TObject *)' referenced from C:\PROJECT\DATABASE\MAIN.OBJ

Can i get some help eith this please..
thanks in advance
Mahendra Ghuge

Hello,
I got it working. Works fine now. Thanks alot Angel and Wes for all your help appreciate it