很菜的问题，如何做系统登陆界面，后是软件的封面，再接着是软件的主界面？

[home]

别笑话我本人刚从别的语言转为使用DELPHI，现在不懂得用DELPHI做这个东西，而在VB PB 里面却是很容易做的，麻烦大家，告诉我如何实现。

[chenjiong]

给个地址，我给你一个demo。

[home]

[e-mail]

[angshuangxi]

最好的方法是在打开dpr工程文件，
在Application.Run前面添加

Application.CreateForm(TFlashForm, Flashform); //假定闪现的界面名称为Flashform
FlashForm.Show;
延时
FlashForm.close;
最后
Application.Run
就可以了

[home]

不行如果FLASHFORM为第一个创建的话变为了程序的主窗口，而且上面的只是程序的闪现窗口，还有点错误还要加 flash.update flashform.hide

[lastshrill]

同意楼上

[home]

在DELPHI中到底能实现吗？

[sandAhrow]

要用splashform:=tsplashform.create(nil)，用application是绝对不行的，你可以在splashform加入Ttimer控件,可以延时，要用到application.processmessage

[cobi]

Application.Initialize;

Application.CreateForm(TFFlash, FFlash);{封面窗体}
FFlash.Show;
FFlash.Repaint;
sleep(1000);
Application.CreateForm(Tdm1, dm1);{数据模块}
FFlash.hide;
FFlash.free;

Application.CreateForm(TFlogIn,FlogIn);{登陆窗体}
FLogIn.ShowModal;
if FLogIn.ModalResult = mrcancel then Halt;
FLogIn.Hide;
FLogIn.Free;

Application.CreateForm(TForm1,Form1);{主窗体}
Application.Run;
end.

[home]

谢谢你啦，问题解决了，Tform1不是启动的主窗体应该没关系吧！！！我测试倒是没问题！