高分求助，NT SERVER 服务型的应用服务程序的问题？ ( 积分: 300 )

我按李维写的分布式多层应用系统篇中“开发Service型态的应用程序服务器”做了一个Service型态的应用程序服务器。客户端能运行，但在服务器端总是跳出一个“COM SERVER WARNING”的警报，全文如下“There are still actice COM objects this application. One or mare clients may have references to these bjects,so manually closing this application may cause those client application(s) to fail. Are you sure you want to close this application?”服务器关闭警告？？我的服务器程序没加入任何其他代码，客户端也只是socketconnection.connectioned:=True连接上服务器没有执行任何其他操作，因此可以排除服务器程序出错导致的。请大侠们帮帮我，详细说明这是什么原因导致以及怎么解决。分不够可以再加。
我在网站找到一个相关的帖子“一个关于NT SERVER 服务型的应用服务程序的问题http://www.delphibbs.com/delphibbs/dispq.asp?lid=701910”不过里面没有详细的说明不太明白。

我按李维写的分布式多层应用系统篇中“开发Service型态的应用程序服务器”做了一个Service型态的应用程序服务器。客户端能运行，但在服务器端总是跳出一个“COM SERVER WARNING”的警报，全文如下“There are still actice COM objects this application. One or mare clients may have references to these bjects,so manually closing this application may cause those client application(s) to fail. Are you sure you want to close this application?”服务器关闭警告？？我的服务器程序没加入任何其他代码，客户端也只是socketconnection.connectioned:=True连接上服务器没有执行任何其他操作，因此可以排除服务器程序出错导致的。请大侠们帮帮我，详细说明这是什么原因导致以及怎么解决。分不够可以再加。
我在网站找到一个相关的帖子“一个关于NT SERVER 服务型的应用服务程序的问题http://www.delphibbs.com/delphibbs/dispq.asp?lid=701910”不过里面没有详细的说明不太明白。

没人知道这个问题吗？？

这个错误是 DCOM服务关闭的时候，依然存在客户端连接出来的。
关闭服务前先关闭客户端程序就好了。

to loco：我知道出现那个警告是因为关闭服务器时还有客户端的连接。但这不是我人为关闭服务器而是系统自己会去关闭服务器，所以出现上面那个警告。如果应用服务程序不是做成NT Server型态的，则不会出现这个警告。

－－－－－－－－－－－－－－－－－－－转自网络
http://www.delphibbs.com/delphibbs/dispq.asp?lid=685496
我一个字一个字得对，也没发现这是另外一个对话框呀，你把两个对话框拷屏后，发给我
看看。j_shen2000@sina.com.cn
另外，你这个错误肯定是服务器端不正常中断造成的，你检查一下：
1、你用了SOCKET方式，那么是否将BORLAND SOCKET SERVER也设置为SERVICE服务。
2、检查代码，看看是否有不当的错误处理，比如中断服务，关闭端口，断开连接等异常处理。
3、通常情况下，对于NT服务来说，一旦该NT服务发生了严重的异常，并且自身没有处理
机制时，会STOP SERVICE，然后将控制权交给系统。
4、SERVICE方式是没有问题的，我开发的很多三层项目都是这种模式。

1、BORLAND SOCKET SERVER在SOCKET方式下，如果要用SERVICE形态，最好也设置为系统服务，
方法一样，-install/-uninstall。
2、没有看到你的代码，实在不好说你的问题出在哪，你作一个最简单的SERVICE例子，会
不会遇到问题。