向窗体的 系统菜单 添加菜单项 using System; using System.Drawing; using System.Collections; using System.ComponentModel; using System.Windows.Forms; using System.Data;
Delphi 向窗体的系统菜单添加菜单项,也就是在系统默认的菜单项中,添加自定义的菜单项,我记得有不少类似的例子,这个是书中的例子,也是挺简单的,高手请绕行。 有多少个菜单项,都会用循环逐项显示出来, AppendMenu(GetSystemMenu (Handle, FALSE), MF_SEPARATOR, 0, ); with MainMenu1 do begin for I := 0 to Items.Count - 1 do AppendMenu(Ge