请各位高手指点一下，我实在是不知道怎么办了，可能水平太差了吧。。。>''

好失望啊，等了3个小时一个回复都没，难道没人会吗？唉。。。怎么办啊。。。 發表人 - jackalan 於 2004/03/18 20:54:26

jackalan 你好:
(1)TIdTCPClient 這個元件的確是沒有 OnExecute 事件所對應的 event
   procedure
(2)所以，建議你反過來設計，讓 Client 端週期性 (例如: 每隔 10 秒) 的向
   Server 端發送訊息，然後 Server 端在 OnExecute 事件所對應的 event
   procedure 裡面回應 Client 一個 ACK，讓彼此都知道尚未不正常斷線!!
(3)所以你在 Server 端要做一個計數器，記錄所有連上來的 Client 已經多久
   沒有發送訊息，當超過一定的秒數 (例如: 20 秒) 沒有收到某個 Client 的
   訊息的話，就判定該 Client 已經不正常斷線!!

-- Enjoy Researching & Developing -- 發表人 - RaynorPao 於 2004/03/18 22:43:22

------
-- 若您已經得到滿意的答覆，請適時結案!! --
-- 欲知前世因，今生受者是；欲知來世果，今生做者是 --
-- 一切有為法，如夢幻泡影，如露亦如電，應作如是觀 --

版主您好！ 我现在的确是这样做的，但我的问题并不在这里，由于在客户端我需要实时接受服务端的命令，所以只好不断读取READLN('',1)，来判断有无命令过来，但运行大约4到5分钟客户端就非法操作了，我怀疑是不是多次不断的READLN会出问题，开始我用线程做的过后改用TIMER作，接受的时间改成100MS还是出错，请版主帮忙看看，应该怎么做？

引言: 版主您好！ 我现在的确是这样做的，但我的问题并不在这里，由于在客户端我需要实时接受服务端的命令，所以只好不断读取READLN('',1)，来判断有无命令过来，但运行大约4到5分钟客户端就非法操作了，我怀疑是不是多次不断的READLN会出问题，开始我用线程做的过后改用TIMER作，接受的时间改成100MS还是出错，请版主帮忙看看，应该怎么做？

jackalan 你好: 那...要不要先試試 TIdUDPServer 元件的做法？ src="http://delphi.ktop.com.tw/loadfile.php?TOPICID=10003806&CC=223734"> -- Enjoy Researching & Developing --

谢谢版主，我去看过了，但是目前是要改元件会很麻烦，因为已经写了很多代码了，这个问题是在测试时运行时间长了才发现的。不知道INDYTCPCLIENT这个控件在一直读READLN时会不会占用什么资源？为什么运行短时间很正常长了就不行了，因为程序可能要24小时运行所以没办法。 请问一个其它问题，INDY控件的WRITELN发送STRING有无长度限制？谢谢！

我试了一下WRITELN发送STRING应该有长度限制的，后来改用STRING流发送就不会出错。。。

或許換個方向思考 在IdTCPServer的OnExecute事件裡，可以得知目前是哪個Client端正在觸發 所以在這個 Event 裡，可以得知有哪個 Client端 有多久沒有送資料上來 若超過自己設定的time out時間，server可以關閉此連線，或者送訊息給該 Client端，等對方的ack。 而Client端部份，可以試著將polling timer設長(1秒或3秒)，甚至可以在on timer 裡用thread的方式，執行IdTCPClient.ReadLn。

robert1014,谢谢你的回答，但如果TIMER设定为1秒会不会有消息漏掉？请指点，有没有什么辅助的元件或API可以帮助CLIENT判断是否有服务器消息，真的想不通INDY的TCPCLIENT怎么会不设定类似OnExecute事件？？？？是忘记了还是觉得大家都用不到？？？或者 >< >< >，。。。。。。晕

其實IdTCPClient內部都會有暫存的buffer 至於要多久Polling一次，則應該視Server端送出資料 是否頻繁、資料是否相當大等等 如果說，一定要有Event來做的話，是可以試試其他的元件

谢谢大家的帮忙，我自己搞定了，问题有两个，说出来给大家参考，避免以后出我同样的问题，1、出在WRITELN数据过长，虽然STRING发送没有限制但如果过长还是会没有响应的，应该把过长的STRING分几次发送就可以了。2、服务器接受命令后用LISTBOX存储的，然后由线程慢慢消化，但LISTBOX.ITEM.ADD对长度是有限制的，这个你可以试试就知道了，改成LISTVIEW后解决了这个问题，那个断线的问题就是因为LISTBOX超过长度导致一个异常引起的，呵呵，谢谢大家的帮忙！尤其谢谢版主！

提問者您好:


以上回應是否已得到滿意的答覆？


若已得到滿意的答覆，請在一週內結案，否則請在一週內回覆還有什麼未盡事宜，不然，
將由版主(尚無版主之區域將由副站長或站長)採自由心證,選擇較合適之解答予以結案處理，
被選上之答題者同樣會有加分獎勵，同時發問者將受到扣 1 分的處分。不便之處，請見諒。


有問有答有結案，才能有良性的互動，良好的討論環境需要大家共同維護，感謝您的配合。

------
我是機器人,我不接受簡訊.