强行中止并关闭程序的问题(50分)

[flashwolf]

现有两个exe文件，用1.exe带参调用2.exe，2.exe文件中加入判断，如果不对则退出中断2.exe的执行，现在的问题是怎么样才能顺便关闭程序?现给出我原来代码的一小段：(dm1.tblmycusts.RecordCount <> 0) then
begin
//others: have no rights
showmessage('对不起！无权限查询该客户信息。');
application.Terminate;
end;
end;
end;
dm1.tblSystem.close;
dm1.tblSystem.open;
glbCustId := Current_custid;


按理说执行到application.Terminate;时应该关闭程序的，但为什么还会继续执行
dm1.tblSystem.close;
dm1.tblSystem.open;
glbCustId := Current_custid;

。。。。。。。。???????

[szchengyu]

GZGZ

[王集鹄]

2.exe加一个消息处理就可以了呀

[王集鹄]

2.exe加一个消息处理就可以了呀

[flashwolf]

怎么加?具体一点好吗?

[leeky]

在application.Terminate;
后紧接一个
exit;
语句看看。应当可以的。
你的问题有点像线程……的特性。

[flashwolf]

不错，可以了.