Application.CreateForm(TForm2, Form2);
End
else if (randomnum>4)and (randomnum<=8)then//如果随机数在４到８之间
Begin
Application.CreateForm(TForm3, Form3);
End
Else //如果随机数在８到10之间
Begin
Application.CreateForm(TForm1, Form1);
End;
Application.Run;
end.
实现以上代码后，Form1，Form2，Form3不用写任何处理代码，不用修改任何属性，就能解决我们的问题，我们可能要慨叹了，为什么一开始没想到这样做。
三．
文章整理：西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!
