导航

2010年8月3日

用一个 Byte 值保存八种状态的实例:

摘要： 准备工作:1、在空白窗体上添加 CheckListBox1;2、添加四个 Button, 并激活 Button1 的 OnClick 事件;3、激活窗体的 OnCreate 事件. 阅读全文

posted @ 2010-08-03 16:06 beeone 阅读(431) 评论(0) 推荐(0) 编辑

ModalResult属性

摘要： 假设你的主窗体为Form1，Form2为动态生成的窗体。Form2上面又两个Button，他们的ModalResult属性分别为：mrOK和mrCancel。这样，通过判断Form2的ModalResult属性就可以知道用户点了哪个Button，你就不用在Form2的ButtonClick事件里面写代码判断了。有时候，你都完全不必在Form2单元中写任何代码。 简单的例子： 阅读全文

posted @ 2010-08-03 14:21 beeone 阅读(1334) 评论(0) 推荐(0) 编辑

如何用弹出窗口显示进度

摘要： unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls, Gauges; type TForm1 = class(TForm) Button1: TButton; ... 阅读全文

posted @ 2010-08-03 13:52 beeone 阅读(251) 评论(0) 推荐(0) 编辑