project1.~dpr

kaijidejiandanhuamian ,dajiacankaoyixia ,duoduozhijiao

program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1},
  Unit2 in 'Unit2.pas' {Form2};

{$R *.res}

begin
  Application.Initialize;
  form2:=tform2.Create(form2);
  form2.Show ;
  form2.Update ;
  Application.CreateForm(TForm1, Form1);
  sleep(3000);
  form2.Hide ;
  form2.Free ;
  Application.Run;
end.