博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

2011年4月19日

摘要: 1 unit Unit1;2 3 interface4 5 uses6 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,7 Dialogs, StdCtrls, Menus;8 9 type10 TForm1 =class(TForm)11 ButtonAddMenu: TButton;12 ButtonResetMenu: TButton;13 ButtonDeleteMenu: TButton;14 procedure ButtonAddMenuClick(Sender: TObject); 阅读全文

posted @ 2011-04-19 16:51 wlmbz 阅读(330) 评论(0) 推荐(0) 编辑