begin
Application.Initialize;
Application.Title := '契税管理系统';
Application.CreateForm(TfrmMain, frmMain);
Application.CreateForm(TDM, DM);
if isValid=true then
begin
Application.Run;
end
else
close;
end.
...全文
6410打赏收藏
请看以下代码为什么close会出错?
begin Application.Initialize; Application.Title := '契税管理系统'; Application.CreateForm(TfrmMain, frmMain); Application.CreateForm(TDM, DM); if isValid=true then begin Application.Run; end else close; end.