如何做一个 ‘正在处理，请稍候。。’那样的一个对话框，等数据处理完毕自动停掉

adoquery处理数据时，需要一点时间3-5秒，希望能够出现这样一个提示框，数据处理完成以后自动关闭。我试着做了一个panel，由timer控制，但是由于时间短，所以没等出现就关闭了，效果不好，是不是多线程能实现？

解决方案 »

  1.   

    根本不需要time控件，方法是这样：
    1、运行adoquery处理数据之前，打开form，这个form显示“正在处理，请稍候....”
    2、运行adoquery处理数据
    3、运行完时，把这个form显示“正在处理，请稍候....”，close这样就行了。
      

  2.   

    用Timer控件的思路是错误的做一个Form，
    处理数据前 show
    ......处理数据的代码
    处理结束 close或hide
      

  3.   

    Panel.Visible := True;
    Panel.Refresh;
    ......
    处理数据
    ......
    Panel.Visible := False;
      

  4.   

    静态的用panel.visible属性就可以
    动态的用多线程