我刚学dephi  我想在应用程序中加入一个窗体 显示一个图片 然后图片消失 进入程序 
可是怎么写呢 请高手指点一下

解决方案 »

  1.   

    给你一个源代码看看.
    Splasher:=TSplasher.Create(Application);//Splasher 就是你的显示图片的窗体.
    Splasher.Show;
    Splasher.Update;
    Application.Initialize;
    Splasher.Update;
    Application.Title := 'Richsoft MRP';
    Application.CreateForm(TMainform, Mainform); //Mainform为你的主窗体
    Splasher.Update;
    Splasher.Free;
    Application.Run;
      

  2.   

    方法一:调用Showmodal函数来实现。Showmodal方式使一个窗口为激活窗口, 和Show相似,
    但它令窗口模式化。现举一例说明:     8.1开始一个新工程。给表格起名为MainForm,MainForm的单元起名为Main, 工程文件起名为
    Test。   8.2在MainForm中插入一个Button部件,将其Caption属性设为“关闭”,为该部件的OnClick
    事件创建一个过程,并在过程的begin和end之间插入Close语句。   8.3在应用程序添加一个表格,将这个表格起名为MoveForm,MoveForm 的单元起名为Move。   8.4为便于演示,在MoveForm中插入一个Label部件,设置其Caption 属性为“欢迎进入本系
    统”。   8.5建立两个表格之间的关联。在Unit Main的 implementation 中加入语句 uses move;   再为MainForm创建OnActivate事件。     procedure TMainForm.FormActivate(sender:TObject);   begin   MoveForm.Showmodal;   end;   8.6从Component模板的System类别中选择一个计时器(Timer),添加入 MoveForm表格中,
    设置其Interval属性为3000(可根据需要自定义),再为其OnTimer事件添加语句close;加入一
    个Timer部件目的是用以控制闪现窗口显示时间。在此, MoveForm显示了3秒钟后关闭,主窗口
    MainForm自动被激活。   8.7编译、运行程序,就能得到延迟为3秒的闪现窗口。