Delphi

本类阅读TOP10

·分布式网络考试系统原型分析及实现
·游戏外挂设计技术探讨①
·使用HOOK随心监视Windows
·Delphi 水晶报表打包解决
·试题库开发中非文本数据的处理
·如何将几个DBGRID里的内容导入同一个EXCEL表中....的问题
·如何使用Delphi设计强大的服务器程序
·工人线程中关闭窗体的实现
·用DLL方式封装MDI子窗体。
·支持XP下托盘栏气球提示的托盘单元

分类导航
VC语言Delphi
VB语言ASP
PerlJava
Script数据库
其他语言游戏开发
文件格式网站制作
软件工程.NET开发
(delphi)程序运行过程中等待对话框的自定义组件源码(包含两个提示,进度条,AVI)

作者:未知 来源:月光软件站 加入时间:2005-2-28 月光软件站

源码下载地址:http://www.csdn.net/cnshare/soft/openfile.asp?kind=1&id=21608

若不能下载请查看:http://blog.csdn.net/luckyjan/archive/2003/06/25/13071.aspx

一个用于Delphi程序设计的等待对话框的源码

主要用于程序运行过程中显示一个等待对话框,其中包含一个AVI(TAnimate),两个提示信息(即TLabel),一个进度条(TGauge);

主要方法:
    FormShow  :  显示等待对话框
    FormHide  :  关闭等待对话框
    ProgressStepIt  :  等待对话框中进度条位置自增一个Step

主要属性:
    Name          :  等待对话框名称
    Caption    :  等待对话框标题Caption
    Message1  :  等待对话框的提示信息1
    Message2  :  等待对话框的提示信息2
    wordWrap  :  Message1,Message2一行显示不完,是否自动转行
    Message1Font  ,    Message2Font  :  Message1,Message2字体
    AVIAcitive      :  等待对话框中AVI动作是否执行
    ProgressMax    :  进度条最大值
    ProgressMin    :  进度条最小值
    Progresspos    :  进度条当前位置
    ProgressStep  :  ProgressStepIt  方法中进度条自增一个Step的量
    
    DialogStyle(=dlgNormal,  dlgStayOnTop):  等待对话框显示时是否始终在最前面
    AviPosition(=aviBottom,aviTop,aviLeft)  :  AVI的位置
    [Options]:
        showMessage1          :是否显示提示信息1
        showMessage2          :是否显示提示信息2
        showAVI                    :是否显示AVI
        showCaption            :是否显示等待对话框Caption
        showProgress          :是否显示进度条
        ShowProgressText  :进度条上是否显示进度百分比



相关文章

相关软件