100分，如何在以dcom建立的三层结构中的服务器程序关闭，而客户端仍连接时，不出现对话框而自动断掉客户连接？(100分)

C

chen___ye

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-05-15

• #1

此问题困扰我很长时间了，答对便给分

 

W

wolaixue

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-05-15

• #2

ComServer.UIInteractive := False;

 

夜

夜黑风高

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-05-15

• #3

服务器都光闭了你想不断都不行了
不出现对话框?你的意思是不让人知道服务器已经关了,还让人家继续使用咯??

 

C

chen___ye

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-05-15

• #4

谢了！能多介绍其中的原因么？

 

畅

畅雨

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-05-15

• #5

在你的RDM的主连接的事件中如下试一试
procedure DCOMConnection1BeforeDisconnect(Sender: TObject);
var
i:integer;
begin
for i:=0 to DCOMConnection1.DataSetCount-1do
DCOMConnection1.DataSets.close;
end;

 

W

wolaixue

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-05-15

• #6

看看ComServ.pas里
AddTerminateProc(@AutomationTerminateProc);
function AutomationTerminateProc: Boolean;
你就会明白!

 

F

foresail

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-05-16

• #7

兩種情況：
1.服務端正常關閉,關閉前先通知一下客戶端嘍
2.服務端非正常關閉,客戶端捕獲錯誤嘍

 

C

chen___ye

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-05-23

• #8

多人接受答案了。