while........
.....
try
Application.CreateForm(TForm3,form3);
form3.ShowModal;
finally
form3.Free;
Application.Terminate;
end;
......
当我form3用form3.close关闭,返回程序运行到Application.Terminate;时候程序并不结束,也没有跳出循环,急啊,这是为什么啊~~~~~~~~~~~~~~~~~
.....
try
Application.CreateForm(TForm3,form3);
form3.ShowModal;
finally
form3.Free;
Application.Terminate;
end;
......
当我form3用form3.close关闭,返回程序运行到Application.Terminate;时候程序并不结束,也没有跳出循环,急啊,这是为什么啊~~~~~~~~~~~~~~~~~
加上
Application.ProcessMessages;
Application.Terminate;
Break;//可选
再不行的用Halt保证能关闭