制作闪屏的问题,大家帮忙看看

Question

制作闪屏看书上写procedure tform2.timer1timer(sender:tobject)
begin
 form2.timer1.enabled:=false;
end;procedure tform2.formclosequery(sender:tobject;var canclose:boolean);  
//这里formclosequery怎么理解?
begin
canclose:=not form2.timer1.enabled;
end;begin
try
form2:=tform2.create(application) //怎么解释
form2.show;
form2.update;
form2.close;//这里的show update close 怎么解释
finally
form2.free;
end;
application.run; //applicatin到底怎么理解?能直接run初次学delphi,大家帮帮

Answer 1

show窗体显示
update 使窗体重画
close关闭窗体

Answer 2

begin
try
form2:=tform2.create(application) //创建窗体
form2.show;
form2.update;
form2.close;//这里的show update close 怎么解释//分别为显示，重绘，关闭
finally
form2.free;
end;
application.run; //applicatin到底怎么理解?能直接run//这是一个对象，指的是你的应用程序。