請教一個關於 Indy Server 的問題 我在 Indy 所附的 Demo 中看到一段程式碼不了解, 請各位大大解釋一下, 謝謝 type PClient = ^TClient; TClient = record ..... end; procedure TForm1.ServerConnect(AThred : TIdPeerThread); var NewClient : PClient; begin .......... AThread.Data := TObject(NewClient); -----> 請教這一行的作用 .......... end;

哈哈 我的回答 : 記錄Client 資料 Q SIR 的建議: 建議貼出完整範例或是指出是Indy的那一個範例 否則＝不可考

------
︿︿

引言: 哈哈 我的回答 : 記錄Client 資料 Q SIR 的建議: 建議貼出完整範例或是指出是Indy的那一個範例 否則＝不可考

^^ , 這個範例是http://www.indyproject.org/indy/demodownloads/I9D6_Demos_24Nov02.zip的壓縮檔中所附的IdTCPDemo範例, 我是擷取Server端的部分程式碼出來, 對於上一篇所指出的那一行, 不了解他的實際用途

1.TIdPeerThread說明：    TIdPeerThread is a thread that is created for every connection made to the TIdTCPServer. Every client connection runs in it's own thread on the TIdTCPServer. SERVER端會為每一個client連接建立一個TIdPeerThread物件，並通過這個物件完成網路操作，包括發送資料。 Requests for TIdPeerThreads are created by a TIdListenerThread, and are delegated to the TIdThreadMgr for the TCP server. 2.AThread.Data (TIdPeerThread.Data):為被一個執行緒使用的資料儲存擴充槽. 3.該行主要是跟cmf 大大說的一樣：記錄Client 資料. 發表是最好的記憶! 發表人 - qoo1234 於 2003/05/20 16:00:11

補充一下 TIdPeerThread的Data是TObject型別 範例程式的NewClient是PClient的變數 PClient是自訂的Record結構 所以就是說可以在每一個連接的Thread當中紀錄個別的資料 至於紀錄什麼呢? 就是要靠自己來定義了