这个小功能怎么实现最好??

xiaoming122 2004-10-12 09:07:47
就是一个查询数据库时等待返回结果的提示条,
动态静态的都可以
查询完毕时将其关闭
我用了form的onshow事件和datasource的ondatachange事件调用一个窗体
但是窗体能显示,里面的内容却都显示不出来,就一个空白的form
请教各位还有什么好办法?
...全文
113 13 打赏 收藏 转发到动态 举报
写回复
用AI写文章
13 条回复
切换为时间正序
请发表友善的回复…
发表回复
victor_yang 2004-10-12
  • 打赏
  • 举报
回复
Application.Processmessage;
Tensionli 2004-10-12
  • 打赏
  • 举报
回复
TAnimate控件
PoolD 2004-10-12
  • 打赏
  • 举报
回复
TAnimate控件没有用的。程序的主线程被查询占用了,不会有时间去处理其它的东西。
软件钢琴师 2004-10-12
  • 打赏
  • 举报
回复
假定你当前用的是form1,要调出的是form2
form1.edit1.text:=table1.FieldByName('a).asstring;
form1.edit2.text:=table1.FieldByName('b).asstring;
form1.edit3.text:=table1.FieldByName('c).asstring;
在form2上选的记录就带过来
如在form1上查询在弹出的form2上显示
要保证你的数据源连接的一致,关键是弄清楚组件所属关系
myy 2004-10-12
  • 打赏
  • 举报
回复
推荐TAnimate控件,简单。
PoolD 2004-10-12
  • 打赏
  • 举报
回复
把查询代码放在线程里。
jinjazz 2004-10-12
  • 打赏
  • 举报
回复
用win32页面下的TAnimate控件吧
liuqifeiyu 2004-10-12
  • 打赏
  • 举报
回复
改变鼠标形状不就可以了吗
xiaoming122 2004-10-12
  • 打赏
  • 举报
回复
单步调试时,adostoreproc.open的时候,
整个程序进入等待状态,等待sql存储过程返回结果
为什么在按钮点击事件完成后才能显示等待窗体内的所有内容?
而不是form2.show的时候就显示出来
PoolD 2004-10-12
  • 打赏
  • 举报
回复
Application.Processmessage在循环体内是没问题,但是在查询的时候就没有用武之地了。
noahfz 2004-10-12
  • 打赏
  • 举报
回复
Application.Processmessage;
PoolD 2004-10-12
  • 打赏
  • 举报
回复
to myy:

但是程序窗体变成空白、不能接受输入的问题还是无法解决,光有一个TAnimate在那里动有什么意义?
myy 2004-10-12
  • 打赏
  • 举报
回复
to PoolD(池龙) :

你用过TAnimate吗?

即使程序的主线程被查询占用了,TAnimate的动画是不受影响的。

2,497

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧