Menu.CloneMenu(Menu) 方法
定义
重要
一些信息与预发行产品相关,相应产品在发行之前可能会进行重大修改。 对于此处提供的信息,Microsoft 不作任何明示或暗示的担保。
protected:
void CloneMenu(System::Windows::Forms::Menu ^ menuSrc);
protected public:
void CloneMenu(System::Windows::Forms::Menu ^ menuSrc);
protected void CloneMenu (System.Windows.Forms.Menu menuSrc);
protected internal void CloneMenu (System.Windows.Forms.Menu menuSrc);
member this.CloneMenu : System.Windows.Forms.Menu -> unit
Protected Sub CloneMenu (menuSrc As Menu)
Protected Friend Sub CloneMenu (menuSrc As Menu)
参数
示例
此示例创建一个主菜单,mainMenu1
其中包含三个菜单项:File
和Edit``View
。 然后,CloneMenu它使用该方法复制到mainMenu1``mainMenu2
其中。 然后,克隆的菜单将分配给窗体并显示。 此程序要求你已创建一个 Form 命名 Form1
的 。
void CloneMyMainMenu()
{
// Create the main menu.
MainMenu^ mainMenu1 = gcnew MainMenu;
// Create the menu items to add.
MenuItem^ menuItem1 = gcnew MenuItem;
MenuItem^ menuItem2 = gcnew MenuItem;
MenuItem^ menuItem3 = gcnew MenuItem;
// Set the caption for the menu items.
menuItem1->Text = "File";
menuItem2->Text = "Edit";
menuItem3->Text = "View";
// Add the menu item to mainMenu1.
mainMenu1->MenuItems->Add( menuItem1 );
mainMenu1->MenuItems->Add( menuItem2 );
mainMenu1->MenuItems->Add( menuItem3 );
// Clone the mainMenu1 and name it mainMenu2.
MainMenu^ mainMenu2 = mainMenu1->CloneMenu();
// Assign mainMenu2 to the form.
Menu = mainMenu2;
}
private void CloneMyMainMenu()
{
// Create the main menu.
MainMenu mainMenu1 = new MainMenu();
// Create the menu items to add.
MenuItem menuItem1 = new MenuItem();
MenuItem menuItem2 = new MenuItem();
MenuItem menuItem3 = new MenuItem();
// Set the caption for the menu items.
menuItem1.Text = "File";
menuItem2.Text = "Edit";
menuItem3.Text = "View";
// Add the menu item to mainMenu1.
mainMenu1.MenuItems.Add(menuItem1);
mainMenu1.MenuItems.Add(menuItem2);
mainMenu1.MenuItems.Add(menuItem3);
// Clone the mainMenu1 and name it mainMenu2.
MainMenu mainMenu2 = mainMenu1.CloneMenu();
// Assign mainMenu2 to the form.
Menu = mainMenu2;
}
Private Sub CloneMyMainMenu()
' Create the main menu.
Dim mainMenu1 As New MainMenu()
' Create the menu items to add.
Dim menuItem1 As New MenuItem()
Dim menuItem2 As New MenuItem()
Dim menuItem3 As New MenuItem()
' Set the caption for the menu items.
menuItem1.Text = "File"
menuItem2.Text = "Edit"
menuItem3.Text = "View"
' Add the menu item to mainMenu1.
mainMenu1.MenuItems.Add(menuItem1)
mainMenu1.MenuItems.Add(menuItem2)
mainMenu1.MenuItems.Add(menuItem3)
' Clone the mainMenu1 and name it mainMenu2.
Dim mainMenu2 As MainMenu = mainMenu1.CloneMenu()
' Assign mainMenu2 to the form.
Menu = mainMenu2
End Sub
注解
此方法将传入menuSrc
的 (中存储Menu的整个对象列表MenuItem复制到当前菜单中) 。 可以在派生类中使用此方法克隆 MenuItem 对象。 然后,其他派生 Menu类(例如 MainMenu, ContextMenu和 MenuItem)可以重复使用它们。