2013年6月3日
隐藏桌面图标和任务栏
摘要： unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) CheckBox1: TCheckBox; CheckBox2: TCheckBox; procedure FormCreate(Sender: TObject); procedure CheckBox1Click(Sender: TObject); procedure CheckBox2Click(Send 阅读全文
posted @ 2013-06-03 21:43 万大侠 阅读(184) 评论(0) 推荐(0)
如何用弹出窗口显示进度
摘要： 准备工作: 在空白窗体上添加 Button 和 Timer, 并分别激活它们的默认事件.--------------------------------------------------------------------------------unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls;type TForm1 = class(TForm) Button1: TButton; Tim 阅读全文
posted @ 2013-06-03 21:35 万大侠 阅读(165) 评论(0) 推荐(0)