怎么建立启动画面?

解决方案 »

  1.   

    建一个启动封面窗体,假设为 Form2,先设置好 BorderIcons、BorderStyle、FormStyle、Position,接着在窗体上加入图片框、文本框,设置好后在菜单里选 Project 里的 Options,把 Form2 从Auto-create forms 里转到 Available forms。再接着就是按Ctrl+F12键,选 Project1,出现工程单元,其内容如下
    ...
        Application.CreateForm(TForm1, Form1);
        Application.Run;
    ..
    在Application.CreateForm(TForm1, Form1); 前加入如下语句:
        form2:=tform2.create(application);
        form2.Show;
        form2.Update;
    然后在Application.Run;前面加入如下语句:
        form2.hide;
        form2.free; 
     
      

  2.   

    谢谢了,可以是可以 就是没有时延 我用了now可是它说没有申明!
      

  3.   

    gz
    http://expert.csdn.net/Expert/topic/2487/2487267.xml?temp=.5867273
      

  4.   

    长短无所谓
    sleep用之前需要申明什么吗 它又报错了
      

  5.   

    begin
      application.initialize;
      splashform:=tsplashform.create(application);
      splashform.show;
      splashform.update;  while splashform.tmmaintimer.enabled do
      appliaction.processmessages;
      application.createform(tmainform,mainform);
      slashform.hide;
      splashform.free;
      application.run;end.窗体上有一个TTimer组件,它的Interva属性设为3000,当ONTIMER事件发生时,就拆行下面代吗:
    tmaintimer.enabled:=false;