while........
..... 
 try
    Application.CreateForm(TForm3,form3);
    form3.ShowModal;
  finally
    form3.Free;
    Application.Terminate;
 end;
......
当我form3用form3.close关闭,返回程序运行到Application.Terminate;时候程序并不结束,也没有跳出循环,急啊,这是为什么啊~~~~~~~~~~~~~~~~~