全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1599
推到 Plurk!
推到 Facebook!

關於使用TTCPServer的問題

答題得分者是:ko
ESCAPE
一般會員


發表:37
回覆:47
積分:16
註冊:2005-02-15

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-05-04 15:07:14 IP:61.219.xxx.xxx 未訂閱
請問各位有經驗的前輩。我現在使用TTCPServer開發一個Server端的接收程式。可是一定要Client端關閉傳送程式,Server端才會一次出現所有傳送的資料,由於我的需求必須要看到Client端即時傳送的資料,所以煩請有經驗的前輩能不吝指教,謝謝您。
ko
資深會員


發表:28
回覆:785
積分:444
註冊:2002-08-14

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-05-04 18:43:57 IP:220.132.xxx.xxx 未訂閱
ESCAPE 你好: 在接收資料的那一段code中加入 Application.ProcessMessages;
------
======================
昏睡~
不昏睡~
不由昏睡~
ESCAPE
一般會員


發表:37
回覆:47
積分:16
註冊:2005-02-15

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-05-05 09:20:48 IP:61.219.xxx.xxx 未訂閱
引言: ESCAPE 你好: 在接收資料的那一段code中加入 Application.ProcessMessages;
您好,很感謝您的回覆,但我按照您的方式加入那段指令還是無法即時收到資料,如果我使用Delphi6的SocketServer元件就可以即時收到Client端的資料。我將程式碼Post上來,煩請您予以指正,謝謝您。 procedure TfrmMain.tsReceiverAccept(Sender: TObject; ClientSocket: TCustomIpClient); Var wS:String; begin tsReceiver.Receiveln(wS); Application.ProcessMessages; mmoGPS.Lines.Add(ClientSocket.Receiveln(wS)); If Not (wS=' ') Then mmoGPS.Lines.Add(wS); end;
mustapha.wang
資深會員


發表:89
回覆:409
積分:274
註冊:2002-03-13

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-05-05 20:10:56 IP:210.22.xxx.xxx 未訂閱
看起来是Client没有真正送出全部资料,是不是Client发送有FlushBuffer或EndSend之类的函数?     久病成良医--多试 千人之诺诺,不如一士之谔谔--兼听
------
江上何人初见月,江月何年初照人
ko
資深會員


發表:28
回覆:785
積分:444
註冊:2002-08-14

發送簡訊給我
#5 引用回覆 回覆 發表時間:2005-05-06 16:37:21 IP:220.132.xxx.xxx 未訂閱
ESCAPE 你好: 根據你的說法與mustapha.wang的判讀, 是否可以請你在client送出資料的code中加入結束碼 如:字串的結尾為。就將連線折斷並顯示字串如此可知是否是client的資料未完成傳送的動作
------
======================
昏睡~
不昏睡~
不由昏睡~
系統時間:2024-05-14 16:26:36
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!