一个窗口显示问题？

Question

我现在有两个窗口，form1和form2,在form1有个按钮，事件为
form2.showmodal;
form i:=1 to 5000 do
......
现在的问题：
当form2出现时，按钮中下面的程序就不执行了，直到form2关闭，
我的问题是，怎么样既要让form2显示出来，而且是form2.showmodal
或者是有这个效果（不能被其它窗口覆盖），又要让程序不暂停，要继
续往下执行呢？

Answer 1

用form2.show.把form2的formstyle属性设置为:fsStayOnTop

Answer 2

form2用showmodal将不能与form1交互,此时的焦点给了form1,两语句交换位置,就可以了.

Answer 3

to wycg_cnh20(伤心郁闷中) 
我用这句话意图是因为for 这个循环时间有点长，我用form2来告诉用户现在计算机正在做什么？
你交换的话就不能起到这个作用了呀!

Answer 4

把form2的formstyle属性设置为:fsStayOnTopform2.show;
form2.refresh;
for i:=1 to 5000 do
......