是不是在窗体creatre时做了什么不该做的东东,比如调用还没有创建的自己?
解决方案 »
- excel单元格位置转换函数怎么写?
- 简单问题,webBrowser打开网页是否无法实现自动滚屏?
- StringGrid中的数据转换到SQL Server 2000出现错误
- 请问大家有谁用过Delphi7自带的工具ModelMaker?
- 请教:运行一个DELPHI工程时,程序是不是先要将所有的FORM.CREATE都要运行一便。
- 如何用BDE数据集组件连接SQLSERVER和ACCESS?请详细告之,100分敬上!
- 请问在Delphi中怎么使用连接池?
- very easy
- 问个关于比较编辑框的值的问题
- 请问在打印报表是如何自动生成记录号?
- 一个非常奇怪的问题,希望大家有兴趣赐教!
- 如何实现随机从记录集中抽取若干条记录,但是已经被抽取的记录不会被再次收取?
begin
form1:=tform1.create(application);
form1.showmodal;
if form1.modalresult=1 then
begin
form15:=tform15.create(application);
form15.show;
form15.update;
Application.Initialize;
Application.CreateForm(TForm2, Form2);
Application.CreateForm(TAboutBox, AboutBox);
Application.CreateForm(TForm5, Form5);
Application.CreateForm(TForm3, Form3);
Application.CreateForm(TForm8, Form8);
Application.CreateForm(TForm11, Form11);
Application.CreateForm(TForm14, Form14);
Application.CreateForm(TForm12, Form12);
Application.CreateForm(TForm13, Form13);
Application.CreateForm(TForm9, Form9);
Application.CreateForm(TForm10, Form10);
Application.CreateForm(TForm4, Form4);
Application.CreateForm(TForm7, Form7);
Application.CreateForm(TForm17, Form17);
Application.CreateForm(TForm18, Form18);
Application.CreateForm(TForm15, Form15);
form15.hide;
form15.free;
Application.Run;
end;
END;
end.
其中form15是序幕窗体,form1是登陆窗体,谢谢回复!!