DELPHI里面有没有快闪窗口

Question

就是程序一启动就有个事先安排好的窗口出现一下，然后消失了（如同广告一样的功能）

Answer 1

有的,,以下代码就是program MStore;uses
  Forms,
  main in 'main.pas' {frmmain},
  login in 'login.pas' {frmlogin},
  conn in 'conn.pas' {CData: TDataModule},{$R *.res}begin
  Application.Initialize;
  frmFlash:=TfrmFlash.Create(Application);
  frmFlash.Show;
  frmFlash.Update;
  
  Application.Title := 'Ok ';
  Application.CreateForm(TCData, CData);
  Application.CreateForm(Tfrmmain, frmmain);
  Application.CreateForm(Tfrmlogin, frmlogin);
  frmFlash.Free;
  frmmain.Visible:=True;
  frmlogin.ShowModal;
  Application.Run;
end.

Answer 2

{$R *.res}
var
    FrmFlash:TFrmFlash;
begin  Application.Initialize;
  MainDir:=ExtractFilePath(Application.Exename);
  if copy(MainDir,length(MainDir),1)<>'\'
        then MainDir:=MainDir+'\';
  FrmFlash:=TFrmFlash.Create(Application);  FrmFlash.Show;
  FrmFlash.Update;  FrmFlash.Free;
  Application.Run;
end.

Answer 3

呵呵 我想可以认为没有吧，一般是自己创建一个窗体，然后在适当的时候用适当的方法显示出来。不像VC那样选一下就OK，其实相差无几。

Answer 4

我像有点问题呀!!
不认识TFrmFlash ,怎么回事呀?!

Answer 5

不要用
Application.CreateForm(TfrmFlash, frmFlash);
用这个
frmFlash:=TfrmFlash.Create(Application);
不会不认识 你看看pas文件的上边有frmFlash的声明吗