2008 年 4月 28 日随笔档案 - 万一

2008年4月28日

摘要：本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Menus; type TForm1 = class(TForm) MainMenu1: TMainMenu; OpenDia... 阅读全文

posted @ 2008-04-28 21:52 万一阅读(2680) 评论(3) 推荐(1)

给系统菜单添加菜单项

摘要：本例效果图: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) procedure FormCreate(Sender: TObject); ... 阅读全文

posted @ 2008-04-28 21:43 万一阅读(3152) 评论(3) 推荐(0)