创建启动画面时出错了

Question

begin 
Application.Initialize; 
begin 
flash_form:=Tflash_form.create(application); 
flash_form.visible:=true;//请稍候：正在连接数据库 
flash_form.update; 
Application.CreateForm(TnokasytData, nokasytData); 
flash_form.panel1.caption:='请稍候：正在启动'; 
Application.CreateForm(TForm1, Form1); 
end; 
flash_form.free; 
Application.Run; 
end. 

Answer 1

第62行是
flash_form:=Tflash_form.create(application);
根本就到不了下面的行 

Answer 2

try 
begin  <--------------------------------------------- 这个可以不用加
flash_form:=Tflash_form.create(application); 
flash_form.show;//请稍候：正在连接数据库 
flash_form.update; 
Application.CreateForm(TnokasytData, nokasytData); 
flash_form.panel1.caption:='请稍候：正在启动'; 
Application.CreateForm(TForm1, Form1); 
end; <---------------------------------------------
finally 
flash_form.close; 
end; 

Answer 3

才20分，分有点少哦；
begin 
Application.Initialize; 
try 
begin 
flash_form:=Tflash_form.create(application); //你放的太高了，往下放一放；
flash_form.show;//请稍候：正在连接数据库 
flash_form.update; 
Application.CreateForm(TnokasytData, nokasytData); 
flash_form.panel1.caption:='请稍候：正在启动'; 
Application.CreateForm(TForm1, Form1); 
end; 
finally 
flash_form.close; 
end; 
Application.Run; 
end. 
/////////////////////////////////////////////////////////////
如果按你这样去运行的话，那么，你现在再打开
project→option...→forms你可以看一看，你的主窗体是flash_form;
你close时，都close了，能不出错？
往下放；
应该没有问题

Answer 4

flash_form的代码如下：unit flash_form;interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  ExtCtrls;type
  Tflash = class(TForm)
    Panel1: TPanel;
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  flash: Tflash;implementation{$R *.DFM}end.

Answer 5

我晕
begin 
Application.Initialize; 
try 
begin 
flash:=Tflash.create(application); //flash_form
flash.show;//请稍候：正在连接数据库 
flash.update; //flash_form
Application.CreateForm(TnokasytData, nokasytData); 
flash.panel1.caption:='请稍候：正在启动'; 
Application.CreateForm(TForm1, Form1); 
end; 
finally 
flash.close; //flash_form
end; 
Application.Run; 
end. 
大哥，试一试；
把你的flash_form改成flash

Answer 6

你看一看我的解释
你把Unit和Form搞反了，所以就出错了；
你把
Program里的，所有你自己加的flash_form改成flash；
应该没有问题了；

Answer 7

再说一点；
show是不起作用的；
你应该用showmodal来作，然后，再在你的
flash上放timer控件，在它的事件里，进行写panel1.caption；

Answer 8

第62行是 
flash_form:=Tflash_form.create(application); 
是编译的时候出错
根本就到不了下面的行 
 

Answer 9

小小，真的感谢你
到http://www.csdn.net/expert/topic/536/536637.xml?temp=.3546717上去
只要你随便说句话，那里还有100分也给你