简单问题,模式窗体创建时的问题 找用友软件销售
库存管理软件版1楼: 我的程序,要显示一个模式窗体,但模式窗体在创建的时候,要对数据进行大量的分析,如果我用
form.showmodal;
这个窗体出来很慢,请问我用什么办法可以让窗体先显示出来,然后在逐步显示数据..
谢谢
form.showmodal;
这个窗体出来很慢,请问我用什么办法可以让窗体先显示出来,然后在逐步显示数据..
谢谢
2楼: 模式窗体创建后,在form的FormCreate或FormShow事件中写代码啊!试试看。 如用友软件销售
3楼: FORM.SHOW
FORM.VISIBLE:=FALSE;
....
FORM.HIDE;
FORM.SHOWMODAL;
4楼: 在“对数据进行大量的分析”的过程中插入:
Application.ProcessMessages;
5楼: 嘎嘎﹐加一個timer﹐等窗口顯示出來后在延遲一段時間再將table open就可以了
6楼: 帮顶!
╭=========================================╮
80G海量源代码,控件,书籍全免费狂下不停!
http://www.source520.com
╰=========================================╯
库存管理软件版7楼: 在模式窗口的onshow事件中加update;
在对数据进行大量的分析的过程中插入update;
8楼: 我写了一个测试代码,发现以上的方法,,除了用timer 以外,基本上行不通..
{ TForm2 }
//模拟大量分析
procedure TForm2.Cal;
var
i: integer;
begin
for i := 0 to 100 do
begin
self.Update;
sleep(100);
end;
end;
procedure TForm2.FormShow(Sender: TObject);
begin
self.Update;
Cal;
end;