摘要:
Delphi子菜单的加法其实和普通菜单的差不多,只是在要添加子项的TMenuItem的Items里添加新的TMenuItem即可例如procedure TForm1.FormCreate(Sender: TObject);var menu, menusub1, menusub2: TMenuItem;begin mainmenu1.Items.Clear; menu := TMenuItem.Cr... 阅读全文
摘要:
Delphi子菜单的加法其实和普通菜单的差不多,只是在要添加子项的TMenuItem的Items里添加新的TMenuItem即可例如procedure TForm1.FormCreate(Sender: TObject);var menu, menusub1, menusub2: TMenuItem;begin mainmenu1.Items.Clear; menu := TMenuItem.Cr... 阅读全文
|