头都大了，为什么我的窗体上的东西看不见呢？

[pekiee]

我想在程序运行之前，给用户一个正在与数据库连接的提示小窗体，就一个Lable
show了之后看不到东西！

[luoweicaisd]

frmSplash.Show;
frmSplash.Update;

[netlib]

显示用Update刷新表单。

[toto2wang]

同意笑三少的看法

[biggo]

你在这个提示小窗口的OnActivate事件中间加上下面代码就可以了。

self.Refresh;

是不是很简单。

[xzhongjin]

对，刷新一下。要么在其show事件中重载。

[xzhongjin]

对，刷新一下。要么在其show事件中重载。

[pekiee]

为什么要Update 呢，？一般的情况很少用个些方法，

[pekiee]

在线等着你的回音，

[cookieyfeng]

用API 函数，下面是一段例子，自己参照修改一下
if not datamodule1.Database1.Connected then
begin
animatefm.Animate1.CommonAVI:=aviFindComputer;//animatefm为显示动画的窗体
animatefm.Caption:='正在连接数据库...';
animatefm.Show;
animatefm.Animate1.Active:=true;
datamodule1.Database1.Connected:=true;
animatefm.Close;
end;