我新建一个frame为conFrame;conFrame放了一个label,设置了label1.caption的属性.我又建了一个窗体为Form1,现在Form1中把conFrame拉到Form1上面,先设置form1上面的conFrame1.visible:=false;然后在form1的onActivate输入如下代码:
datamodule1.ADOConn.Connected:=false;
datamodule1.ADOConn.Connected:=true;
conFrame1.Show;
sleep(3000);
conframe1.Update;
conFrame1.Hide;
conframe1.Free;
意思是说如果数据库能正常连接的话,让conFrame1显示三秒后再关闭conFrame1(呵呵,conFrame1其实就是显示说'正在连接数据库...',想做一个假效果,真实效果不懂怎么做呀.),但不懂为什么,那个conFrame1上label上的字不会显示,只会显示空的form,这是为什么呀,我不是先conFrame1.Show后,再停止3秒后,最事才关闭conFrame1的吗?可为什么看不到conFrame1.Show??
datamodule1.ADOConn.Connected:=false;
datamodule1.ADOConn.Connected:=true;
conFrame1.Show;
sleep(3000);
conframe1.Update;
conFrame1.Hide;
conframe1.Free;
意思是说如果数据库能正常连接的话,让conFrame1显示三秒后再关闭conFrame1(呵呵,conFrame1其实就是显示说'正在连接数据库...',想做一个假效果,真实效果不懂怎么做呀.),但不懂为什么,那个conFrame1上label上的字不会显示,只会显示空的form,这是为什么呀,我不是先conFrame1.Show后,再停止3秒后,最事才关闭conFrame1的吗?可为什么看不到conFrame1.Show??
解决方案 »
- delphi中如何显示tif格式图片
- 如何将几张图片以流的方式写入到一个文件中
- 三层结构,连接都是用的IP地址,如果用动态域名,好像不支持?难道我每次都手动先将域名转成IP?
- 紧急求救,关于线程里面的canvas.draw的问题
- 下面的语句有问题吗?
- 句柄获取后的问题?请教各位大侠赐教100分>郁闷中
- 一个很简单的DLL 调用,请帮我看一下吧!
- 请问为什么我给Toobar中的按钮加的caption赋了值怎么看不到呢?
- DBGrid的显示问题
- 为什么对象树中对象前有个问号 怎样解决
- Delphi 开发AutoCAD
- 现在的问题就是两个'0011010101' 这样的字符串如何用SQL做逻辑与运算
application.ProcessMessages;
sleep(3000);