Delphi的Socket編程要分幾步？

---

2008-12-20 02:03:24 標(biāo)簽：Delphi Socket 編程　　　[推送到技術(shù)圈]

ClientSocket 和ServerSocket 幾個重要的屬性:??? 1.client和server都有port屬性，需要一致才能互相通信??? 2.client有Address屬性,使用時填寫對方(server)的IP地址??? ???? 幾個重要的事件:??? ??? client:??? OnRead事件，當(dāng)client受到?jīng)_擊消息時在OnRead事件中可以獲得server發(fā)送過來消息。??? ??? Server:???? OnClientRead事件，與上述client的作用相同??? ???? 發(fā)送信息：??? ??? clien使用SocketClient1.Socket.SendBuf(char類型的數(shù)組,信息長度);??? ??? server使用SocketServer1.Socket.Connection[0].SendBuf(char類型的數(shù)組,信息長度);??? ???? 接收信息??? ???? clien使用SocketClient1.Socket.ReceiveBuf(char類型的數(shù)組,信息長度);??? ???? server使用SocketServer1.Socket.Connection[0].ReceiveBuf(char類型的數(shù)組,信息長度);??? ???? 使用sockets ???????? Socket 控件讓你建立一個利用TCP/IP和有關(guān)的協(xié)議與其他系統(tǒng)進(jìn)行通信的應(yīng)用。使用Sockets，你能夠讀和寫通過它連接的其他機(jī)器，而不用擔(dān)心實(shí)際的網(wǎng)絡(luò)軟件的相關(guān)細(xì)節(jié)。Sockets提供基于TCP/IP協(xié)議的連接。除此以外還能很好的工作，在其他相關(guān)的協(xié)議。??? ???????? Delphi 提供你寫網(wǎng)絡(luò)服務(wù)器或客戶應(yīng)用程序去讀和寫其他的系統(tǒng)。一個服務(wù)或客戶程序通常專注于一個單一的服務(wù)如超文本傳送協(xié)議（HTTP)或文件傳輸協(xié)議 (FTP)。使用server?????????? sockets,一個應(yīng)用程序可以提供這些服務(wù)中的一個去連接一個希望使用服務(wù)的客戶程序。Client?????????? sockets允許一個應(yīng)用使用這些服務(wù)中的一個去連接提供這個服務(wù)的服務(wù)應(yīng)用。??? ??????? 使用sockets去寫應(yīng)用程序，你必須理解下面這些知識：??? ??? 一、服務(wù)工具??? ???? 當(dāng)你需要寫網(wǎng)絡(luò)服務(wù)或客戶應(yīng)用時，Sockets提供一種接合。對于許多服務(wù)，象HTTP 或??? FTP，第三方服務(wù)商提供這些服務(wù)已經(jīng)相當(dāng)有效。有些甚至隨著操作系統(tǒng)捆綁而來，以便不用你自己寫。然而，當(dāng)你想更多的控制服務(wù)的實(shí)現(xiàn)，如想讓你的應(yīng)用程序與網(wǎng)絡(luò)通信更加緊密，或當(dāng)沒有一個服務(wù)能提供你特殊需要的服務(wù)時，你可能想建立你自己的服務(wù)或客戶應(yīng)用。例如，工作在分布式 data??????????? sets時，你可能想為數(shù)據(jù)庫寫一層與其他系統(tǒng)通信的應(yīng)用。想使用Sockets實(shí)現(xiàn)一個服務(wù)，你必須理解：??? ???? ????? 1.服務(wù)協(xié)議??? ???? 在你寫一個網(wǎng)絡(luò)服務(wù)或客戶程序前，你必須明白你的應(yīng)用將提供或使用什么服務(wù)。你的網(wǎng)絡(luò)應(yīng)用必須支持許多服務(wù)的標(biāo)準(zhǔn)協(xié)議。如果你為標(biāo)準(zhǔn)的服務(wù)例如 HTTP,FTP寫網(wǎng)絡(luò)應(yīng)用，你必須先理解與其他系統(tǒng)通信所使用的協(xié)議。特殊服務(wù)細(xì)節(jié)你必須看提供的或使用的文檔。??? ???????? 如果你的應(yīng)用程序提供一個新的服務(wù)與其他系統(tǒng)通信，第一步是為這個服務(wù)的服務(wù)端和客戶端設(shè)計通信協(xié)議。什么信息將發(fā)送？如何整理這些信息？如何對這些信息進(jìn)行編碼？??? ???? ????? 應(yīng)用程序通信??? ?????? 經(jīng)常的，你的網(wǎng)絡(luò)服務(wù)端或客戶端應(yīng)用程序要提供一層在網(wǎng)絡(luò)軟件和一個應(yīng)用之間使用的服務(wù)。例如，一個HTTP服務(wù)站點(diǎn)在INternet與一個Web 服務(wù)應(yīng)用之間為HTTP請求信息提供內(nèi)容和應(yīng)答。??? ?????????? 在你的網(wǎng)絡(luò)應(yīng)用（或客戶應(yīng)用）和網(wǎng)絡(luò)軟件之間Sockets 提供一個接口。你必須提供一個接口，在你的應(yīng)用程序與應(yīng)用間使用。你可以拷貝第三方服務(wù)商提供的標(biāo)準(zhǔn)API(例如ISAPI），或你可以設(shè)計和發(fā)布你自己的API.??? ???? ????? 2.理解服務(wù)和端口??? ????? 許多標(biāo)準(zhǔn)服務(wù)都有關(guān)聯(lián)的、指定的端口號。當(dāng)執(zhí)行服務(wù)時，你可以為服務(wù)考慮一個端口號。如果你實(shí)現(xiàn)一個標(biāo)準(zhǔn)服務(wù)，Windows??? socket???? objects??? 提供一些方法讓你為服務(wù)尋找端口號。如果提供一個新的服務(wù)，在基于Windows 95??? 或 NT機(jī)器上，你能夠在文件Services中為你的服務(wù)指定一個相關(guān)聯(lián)的端口號。設(shè)置Services文件的更多信息請看微軟的Windows??? Sockets文檔。??? ???? ????? 二、Socket連接的類型??? ????? Socket連接可以分成三個基本的類型，它們反映了如何開始連接和本地Socket 連接是什么。這三個類型是：??? ???? ???? 1.客戶端連接??? ?????? 客戶端連接是一個本地系統(tǒng)的客戶端socket與一個遠(yuǎn)程系統(tǒng)上的服務(wù)端Socket連接?？蛻舳诉B接由客戶端Socket開始。首先，客戶端 Socket必須描述它想連接到的服務(wù)端Socket. 接著客戶端socket查找服務(wù)端socket，當(dāng)找到服務(wù)器時，就要求連接。服務(wù)端socket可能不能完成正確的連接。服務(wù)器sockets維持一個客戶端請求隊列，在他們有時間時完成連接。當(dāng)服務(wù)端socket接受客戶端連接，服務(wù)端socket將向它想連接的客戶socket發(fā)送一個完整的描述，客戶端的連接完成。??? ???? ???????? 2.傾聽連接??? ???????? 服務(wù)器 socket不會去定位客戶端，代替的，他們形成被動的，"半連接"狀態(tài)，傾聽來自客戶端的請求。服務(wù)器?????????? sockets形成一個隊列，存放它們聽到的連接請求。這個隊列記錄著客戶端連接請求就象他們已連接進(jìn)來一樣。當(dāng)服務(wù)器sockets同意客戶連接請求時，它形成一個新的socket去連接客戶端，因此這個傾聽連接能保持開放狀態(tài)允許其他客戶端請求。??? ???? ???????? 3.服務(wù)端連接??? ???????? 當(dāng)傾聽socket同意一個客戶端請求時，服務(wù)器端socket形成一個服務(wù)器連接。當(dāng)服務(wù)器端同意連接時，向客戶端發(fā)送一個服務(wù)端socket描述以完成連接，當(dāng)客戶端socket收到這個描述時這個連接得到確認(rèn)，連接完成。一但連接到客戶端的Socket完成，服務(wù)端連接就不能識別從一個客戶端來的連接。末端雙方有同樣的能力去接收同樣的事件類型。只有傾聽（listening)連接是根本不同的，它只有一個單一的末端。??? 三、sockets描述??? ???????? Sockets讓你的網(wǎng)絡(luò)應(yīng)用軟件通過網(wǎng)絡(luò)與其他系統(tǒng)進(jìn)行通信。在網(wǎng)絡(luò)連接中每個socket可以看成一個終端點(diǎn)。它有一個指定的地址。??? ???? ????????? *這個系統(tǒng)正在運(yùn)行??? ????????? *它理解的接口類型??? ????????? *用來連接的端口??? ????????? 一個完整的socket連接描述，你必須提供sockets?????????? 在連接兩端的地址。在你開始一個socket連接前，你必須完整的描述你想得到的連接。有些信息可以從你的應(yīng)用軟件運(yùn)行的系統(tǒng)平臺上得到。例如，你不需要描述一個客戶端socket的本地IP地址--這個信息可以從操作系統(tǒng)上獲得。你必須提供你工作所依靠的socket的類型的信息?？蛻舳藄ocket必須描述他們想連接的服務(wù)器。偵聽服務(wù)器sockets必須描述他們提供反應(yīng)的服務(wù)器的端口。一個socket?????????? 連接終端的完整描述包括兩部分：??? ???? ???1.IP地址??? ??????? 主機(jī)是這樣一個系統(tǒng)，它運(yùn)行著包含有socket的應(yīng)用程序。你必須描述主機(jī)給socket，通過給出主機(jī)的IP地址來完成這個描述。IP地址是一個有四個數(shù)字（byte)值的，在標(biāo)準(zhǔn)internet點(diǎn)付內(nèi)的字符串。??? ??????? 例如123.197.1.2??? ??????? 一個簡單的系統(tǒng)可以支持多于一個的IP地址。IP地址通常難于記憶并且容易打錯。一個可供選擇的方法是使用主機(jī)名。主機(jī)名就是IP地址的別名，它就是你?？吹降慕y(tǒng)一資源定位（URLs)。它是一個字符串，包括了域名和服務(wù)。??? ??????? 例如??????? [url]http://www.wsite.com???[/url] ??????? 許多內(nèi)部網(wǎng)提供給主機(jī)的名字對應(yīng)的系統(tǒng)IP地址是internetIP地址。在windows95?????? 和NT機(jī)器上，如果一個主機(jī)名不能用，你可以在HOSTS文件中為你的本地IP地址（這個本地IP地址應(yīng)該是指你想連接的主機(jī)IP地址--zyqsj)建立一個進(jìn)入的名字。??? ??????? 關(guān)于HOSTS文件的更多信息請看WINDOWS??? SOCKETS的文檔。??? ??????? 服務(wù)器sockets不需要指定主機(jī)。本地IP地址可以從系統(tǒng)中讀到。如果本地系統(tǒng)支持多于一個的IP地址，服務(wù)器sockets將同時在所有的IP地址上偵聽客戶端請求。當(dāng)一個服務(wù)器socket同意一個連接，客戶端提供一個遠(yuǎn)程IP地址。客戶sockets必須指定遠(yuǎn)程主機(jī)通過提供主機(jī)名或者IP地址。??? ???? ???????? 在主機(jī)名和IP地址間作一個選擇??? ???????? 許多應(yīng)用軟件使用一個主機(jī)名去指定一個系統(tǒng)。主機(jī)名容易記住和容易檢查排版錯誤。進(jìn)一步講，服務(wù)器能改變系統(tǒng)或與IP地址關(guān)聯(lián)的特殊的主機(jī)名。使用一個主機(jī)名，能夠允許客戶端通過主機(jī)名描述找到抽象的站點(diǎn)，即使主機(jī)使用一個新的IP地址。??? ????????? 如果主機(jī)名是未知的，客戶socket必須指定服務(wù)器系統(tǒng)使用的IP地址。通過給一個IP地址來指定服務(wù)器將更快。當(dāng)你提供主機(jī)名時，socket在定位服務(wù)器系統(tǒng)前，必須搜尋與這個主機(jī)名相關(guān)的IP地址。??? ???? ????2.端口號??? ???????? 雖然IP得地址提供了足夠的信息去找到socket連接中位于另一端的系統(tǒng)，你通常還需要指定那個系統(tǒng)的端口號。沒有端口號，一個系統(tǒng)在同一時間只能進(jìn)行一個單一的連接。端口號是唯一標(biāo)識那允許一個獨(dú)立系統(tǒng)連接到支持同時多個連接的主機(jī)，每個連接都必須指定一個端口號。??? ???????? 在網(wǎng)絡(luò)應(yīng)用中，對于服務(wù)器工具來說端口號是一個數(shù)字代碼。有一個習(xí)慣就是偵聽服務(wù)連接到他們自己固定的端口號上，以便他們能找到客戶端sockets.服務(wù)器socket監(jiān)聽為他們提供服務(wù)的相關(guān)端口號。當(dāng)他們允許給予一個客戶端socket連接時，他們創(chuàng)建一個獨(dú)立的socket連接，使用不同的專用的端口號。通過這個方法，能持續(xù)的監(jiān)聽相關(guān)服務(wù)的端口號。??? ???????? 客戶端socket使用一個專用的本地端口號，就不用其他的socket去尋找它們。他們指定他們想連接的服務(wù)器端socket的端口號，這樣他們就能找到服務(wù)器應(yīng)用程序。常常的，這個端口號是通過命名想連接的服務(wù)來間接指定的。??? ???????? 四、使用socket控件??? ???????? Delphi提供兩個socket控件，客戶端sockets和服務(wù)器sockets.他們允許你的網(wǎng)絡(luò)應(yīng)用構(gòu)成連接其他的機(jī)器和允許你通過這個連接來讀寫信息。與每個socket控件相關(guān)聯(lián)的是windows????????? socket對象，它們在終端的的作用是一個實(shí)際的socket連接。socket控件使用windows????????? socket對象去封裝windows??? socket???? API???? 調(diào)用，所以你的應(yīng)用不用去關(guān)心連接建立的細(xì)節(jié)或管理socket信息。??? ???????? 如果你想利用windows???? socket??? API調(diào)用或自定義連接細(xì)節(jié)，socket控件提供了便利，你可以使用windows??? socket對象的properies,events和方法。??? ???? ??????? 1.使用客戶端sockets??? ???????? 添加一個客戶端socket控件（TClientSocket)到你的form或data???? module??? 使你的應(yīng)用成為一個TCP/IP客戶?？蛻魋ockets允許你指定你想連接的服務(wù)器socket和你希望服務(wù)器提供的服務(wù)。一但你描述你想得到的連接，你可以使用客戶socket控件去完成連接服務(wù)。??? ???????? 每個客戶socket控件使用獨(dú)立的客戶windows???? socket對象(TClientWinSocket)去應(yīng)答連接中的客戶終端。使用客戶sockets去：??? ???? ???????? A.指定想得到的服務(wù)??? ???????? 客戶socket控件有一個數(shù)字properties,允許你指定想連接的服務(wù)器系統(tǒng)和端口。你可以通過主機(jī)名來指定服務(wù)器系統(tǒng)，使用Host????????? property。??? ???????? 如果你不知道主機(jī)名，或者你關(guān)心找到服務(wù)器的速度，你可以指定服務(wù)器系統(tǒng)的IP地址，通過使用 Address??? property。你必須指定IP地址和主機(jī)名中的一個。??? ???????? 如果你兩個都指定，客戶socket控件將使用主機(jī)名。除服務(wù)器系統(tǒng)外，你必須指定你的客戶socket將連接的在服務(wù)器系統(tǒng)上的端口。你能夠直接使用 Port????????? property來指定服務(wù)端口號。或者直接在Service???? property使用想得到的服務(wù)的名字。如果你指定端口號和服務(wù)名，客戶socket控件將使用服務(wù)名。??? ???? ???????? B.建立連接??? ???????? 一旦你在客戶socket控件中完成了設(shè)置描述你想連接的服務(wù)器的屬性，你就可以進(jìn)行連接，通過調(diào)用Open方法。如果你想你的應(yīng)用啟動時自動建立連接，在設(shè)計時設(shè)置Active??????? property為true，通過使用Object????????? Inspector來設(shè)置。??? ???? ???????? C.取得關(guān)于連接的信息??? ???????? 完成連接到服務(wù)器socket后，你可以使用與你的客戶socket控件相關(guān)的客戶windows??? socket??? object去取得關(guān)于連接的信息。使用Socket??? property去訪問client??? windows??? socket???? object。 windows??? socket??? object 有一個properties,它能讓你確定在連接的兩端客戶和服務(wù)器使用的地址和端口號。??? ???????? 當(dāng)使用一個windows??? socket??? API 調(diào)用時，你可以使用SocketHandle??? property區(qū)獲得socket連接使用的handle。你可以使用Handle??? property去訪問windows,以便接收來自socket連接的信息。????? ???????? AsyncStyles????? property決定哪種信息類型是windows??? handle要接收的。??? ???? ???????? D.關(guān)閉連接??? ???????? 當(dāng)你完成通訊想關(guān)閉socket 連接時，你能夠通過調(diào)用Close方法來關(guān)閉連接。連接可能要由服務(wù)器端來關(guān)閉。如果是這種情況，你將收到一個OnDisconnect??? 事件的通知。??? ???? ???? 2.使用服務(wù)器sockets??? ????? 添加一個服務(wù)端socket控件ServerSocket 到你的form或data??? module使你的應(yīng)用成為一個TCP/IP服務(wù)器。服務(wù)器sockets允許你指定你想提供的服務(wù)或你想用來監(jiān)聽客戶請求時使用的端口。你可以使用服務(wù)器socket控件去監(jiān)聽和允許客戶連接請求。每個服務(wù)器socket控件使用一個單一的服務(wù)器windows??? socket??? Object(TServerWinSocket)去應(yīng)答在服務(wù)器端監(jiān)聽到的連接。它通常使用一個服務(wù)器客戶winodws??? socket??? Object(TServerClientWinSocket)應(yīng)答在服務(wù)器端每個活動的，連接著得到允許服務(wù)的客戶socket。使用服務(wù)器 sockets去：??? ???? ?????? A.指定端口??? ?????? 在你的服務(wù)器socket能夠監(jiān)聽客戶請求之前，你必須指定一個端口給你的監(jiān)聽服務(wù)。你可以使用Port???? property來指定這個端口。如果你的服務(wù)器應(yīng)用提供一個標(biāo)準(zhǔn)的服務(wù)，這個服務(wù)使用一個習(xí)慣使用的相關(guān)聯(lián)的端口。你能夠使用Service???? property直接指定端口號。使用Service???? property是一個好的主意，能夠減少設(shè)置端口號時的錯誤。如果你既指定了Port????????? property,又指定了Service???? property,服務(wù)socket將使用服務(wù)名。??? ???? ????? B.監(jiān)聽客戶請求??? ?????? 一旦你在server???? socket控件上設(shè)置好你的端口號，你就能夠通過在運(yùn)行時通過調(diào)用Open方法來監(jiān)聽一個連接。如果你希望你的應(yīng)用程序能夠在啟動的時候自動監(jiān)聽連接，在設(shè)計的時候通過使用Object???? Inspector設(shè)置Active 屬性為true。??? ???? ????? C.連接到客戶端。??? ?????? 當(dāng)監(jiān)聽服務(wù)socket控件接收到一個客戶端連接請求時他們將自動接受這個請求。當(dāng)你沒次收到通知時，OnClientConnetc事件將發(fā)生。??? ???? ????? D.取得關(guān)于連接的信息??? ????? 一但你的服務(wù)器socket打開了監(jiān)聽連接，你能夠使用與你服務(wù)器socket控件相關(guān)聯(lián)的服務(wù)器windows??? socket???? object來取得關(guān)于連接的信息。使用Socket???? property去訪問server???? windows???? socket???? object。windows??? socket??? object有一個屬性能夠讓你找到關(guān)于所有活動的客戶socket連接這些客戶socket是你通過服務(wù)器socket控件允許連接的。使用Handle屬性去存取windows通過socket連接收到的信息。??? ????? 每個活動的，連接到客戶應(yīng)用是通過服務(wù)、客戶windows?? socket?? bject??? (TServerClientWinSocket)封裝的。你能夠通過server??? windows?? socket?? object的連接屬性來訪問所有的這些。這些server??? client?? windows??? socket??? object有些屬性讓你能夠決定哪些地址和端口號給連接的兩端--客戶和服務(wù)器socket使用。當(dāng)你使用windows?? socket?? API調(diào)用時，可以使用SocketHandle屬性去獲得socket連接使用的handle。你能夠使用Handle屬性去訪問windows從 socket連接處得來的信息。AsyncStyles屬性決定windows??? handle將接收哪種類型的信息。??? ???? ????? E.關(guān)閉連接??? ????? 當(dāng)你決定關(guān)閉監(jiān)聽連接時，調(diào)用Close方法。這將關(guān)閉所有打開著的，連接到客戶應(yīng)用的連接，取消任何尚未同意的連接，接著關(guān)閉監(jiān)聽連接以便你的服務(wù) socket控件不在接受任何新的連接。當(dāng)客戶端關(guān)閉他們自己獨(dú)立的連接到你的server????????? socket的連接時，你可以在OnClientDisconnect事件中得到訊息。??? ???? ????五、socket事件的應(yīng)答??? ????? 當(dāng)使用sockets寫應(yīng)用程序時，大多數(shù)工作發(fā)生在socket控件的handler事件中。當(dāng)通過socket連接開始讀或?qū)憰r,OnRead和 OnWrite事件在non-blocking??? client??? sockets中發(fā)生從而通知sockets.同樣的,服務(wù)器sockets(blocking??? or??? non-blocking)收到OnClientRead和OnClientWrite事件.??? ???? 當(dāng)服務(wù)器結(jié)束一個連接時,客戶scokets收到一個OnDisconnect事件.當(dāng)客戶端結(jié)束一個連接時,服務(wù)器socket收到一個OnClientDisconnect事件.??? ???? 另外,客戶端Sockets和服務(wù)器端socket從連接中收到一個錯誤信息時,都將產(chǎn)生有個錯誤事件.??? ???? ???? 錯誤事件:客戶sockets和服務(wù)器sockets通常會產(chǎn)生一個OnError事件,當(dāng)他們從連接中收到一個錯誤信息的時候.你能夠?qū)懸粋€ OnError事件處理去響應(yīng)這些錯誤信息.這個OnError事件處理提供傳送關(guān)于socket試圖做什么的時候這個錯誤發(fā)生的信息,以及錯誤信息提供的錯誤代碼.你可以在OnError事件處理中對這個錯誤作出響應(yīng),并且把錯誤代碼改為0,以避免socket產(chǎn)生一個例外.??? ???? ???? 當(dāng)開始和完成發(fā)生時,socket控件通常會收到一個事件號(number??????? of??????? events).如果你的應(yīng)用程序需要改變socket開始操作的處理過程或通過連接開始讀或?qū)懖僮鲿r,你將寫事件handlers去應(yīng)答這些 client???? events和server??? events.??? ???? ?????? A.client???? events??? ?????? 當(dāng)一個客戶socket打開一個連接時,以下事件發(fā)生:??? ?????? 1.一個OnLookup事件最先發(fā)生,它試圖去定位server??????? socket.在這里你不能改變Host,Address,Port,Service屬性去改變你想定位的服務(wù)器.你能夠使用Socket屬性去訪問 client??????? windows??????? socket??????? object,并且使用它的SocketHandle屬性去調(diào)用windows?????? API,以便改變socket的客戶屬性.例如,如果你想在客戶應(yīng)用軟件中設(shè)置端口號,你必須在server?????? client連接前做這件事.??? ?????? 2.windows??? socket設(shè)置和初始化事件通知.??? ?????? 3.當(dāng)找到server?????? socket 一個OnConnecting事件發(fā)生.在這事件中,windows??????? Socket??????? object可以利用的是通過socket屬性提供關(guān)于連接的另一端的服務(wù)socket的一些信息.這是獲得實(shí)際使用來連接的端口和IP地址的第一個機(jī)會,它可能不同于從監(jiān)聽socket處同意連接時得到的端口或IP地址.??? ?????? 4.服務(wù)器同意連接請求,客戶端socket完成連接.??? ?????? 5.當(dāng)一個連接得到確定后,一個OnConnect事件發(fā)生.如果你的socket立即開始通過連接讀或?qū)?就應(yīng)寫一個OnConnect事件Handler去作這件事.??? ???? ?????? B.服務(wù)器端事件(server??????? events)??? ?????? 服務(wù)器socket控件通過兩中方式連接:監(jiān)聽連接和連接到客戶應(yīng)用.服務(wù)器socket收到這兩個連接的所有事件.??? ???? ?????? 監(jiān)聽時事件??? ?????? 當(dāng)構(gòu)成監(jiān)聽連接前,OnListen事件發(fā)生.在這個時候你能夠通過socket屬性獲得server??????? windows??????? socket??????? object.你能夠使用它的SocketHandle屬性去改變socket,在socket打開監(jiān)聽之前.例如,如果你想限定監(jiān)聽服務(wù)使用的IP地址,你可以在這個OnListen事件Handler中做.??? ???? ?????? 與客戶端連接的事件 ?????? 當(dāng)一個服務(wù)器socket同意一個客戶連接請求時,接下來的事件發(fā)生:??? ?????? 1.服務(wù)器socket產(chǎn)生一個OnGetSocket事件,通過windows?? socket??? handle傳送給連接的另一端的socket.如果你想提供自己定義的TServerClientWinSocket?? of?? descendant,你可以在OnGetSocket??????? 事件 handler中建立,將被用來替代TServerClientWinSocket.??? 2.一個OnAccept事件發(fā)生,傳送新的TServerClientWinSocket對象給事件句柄.這是第一個要點(diǎn),當(dāng)你使用TServerClientWinSocket的屬性去獲得被連接中服務(wù)的那端的客戶的信息時.??? 3.如果服務(wù)類型是stThreadBlocking,一個OnGetThread事件發(fā)生。如果你想提供自己定義的TServerClientThread子類,你可以在OnGetThread事件句柄中建立一個,它將替代TServerClientThread.??? ?????? 4.如果服務(wù)類型是stThreadBlocking,一個ONThreadStart事件發(fā)生。當(dāng)這個線程(thread)開始執(zhí)行時.如果你想執(zhí)行任何初始化這個線程,或調(diào)用一些windows?? socket??? API在這線程開始通過連接讀和寫之前,應(yīng)該使用OnThreadStart事件句柄. 5.當(dāng)客戶端完成一個連接時,一個OnClientConnect事件發(fā)生.如果是non-blocking服務(wù),你可能想開始通過socket連接在這端進(jìn)行讀或?qū)懖僮???? ???? ????六、通過Socket 連接進(jìn)行讀和寫??? ??????? 通過socket連接到其他機(jī)器的原因是想通過這些連接來讀和寫信息.什么信息是你要讀和寫的,或者當(dāng)你想讀和寫時是依靠哪些socket連接的相關(guān)服務(wù)的.??? ??????? 通過sockets進(jìn)行讀和寫可以是異步的,所以在你的網(wǎng)絡(luò)應(yīng)用中不需要阻塞其他代碼的執(zhí)行。這是調(diào)用non-blocking?????? connection.你也同樣可以通過blocking?????? connection,這時你的下一行代碼的執(zhí)行必須等到讀或?qū)懖僮魍瓿???? ???? ????? A.Non-blocking ????? 連接,讀和寫是異步的,?? 所以在你的網(wǎng)絡(luò)應(yīng)用中不需要阻塞其他代碼的執(zhí)行.建立一個Non-blocking連接:??? ????? 1.在客戶socket中設(shè)置ClientType屬性為ctNonBlocking.??? ????? 2.在服務(wù)器socket中設(shè)置ServerType屬性為stNonBlocking.??? ????? 當(dāng)連接是non-blocking時,連接的另一端企圖讀或?qū)憰r讀和寫事件將把這個信息通知你的socket.??? ???? ????? 讀和寫操作事件??? ?????? Non-blocking?? sockets想通過連接讀或?qū)憰r,它會產(chǎn)生一個讀和寫操作事件通知你的socket.在客戶端sockets,你可以在OnRead或OnWrite事件句柄中對這些事件做出反應(yīng).在服務(wù)器端Scokets,可以在OnClientRead或OnClientWrite事件句柄中對這些事件做出反應(yīng).與 socket連接相關(guān)聯(lián)的windows?????? socket?????? object在事件句柄的讀或?qū)懼斜划?dāng)作一個參數(shù).Windows?? socket?? object提供一個方法號(number?? of?? methods)以允許你通過連接讀或?qū)???? 通過socket連接讀,使用ReceiveBuf或ReceiveText方法.在使用ReceiveBuf方法前,使用Receivelength方法去確定在連接的另一端socket準(zhǔn)備發(fā)送的字節(jié)數(shù)(number?????? of?????? bytes).??? ????? 通過socket連接寫,使用SendBuf,SendStream,或SendText方法.如果你通過socket發(fā)送信息后不在需要socket連接,你可以使用SendStreamThenDrop方法.?? SendStreamThenDrop在寫完所有的信息后將關(guān)閉Socket連接,它能夠從stream讀信息.如果你使用SendStream或 SendStreamThenDrop方法,不要釋放Stream?? object,?? socket在連接結(jié)束后會自動釋放這個Stream.??? ????? 注意:SendStreamThenDrop將關(guān)閉一個獨(dú)立的客戶連接服務(wù),而不是監(jiān)聽連接.??? ???? ????? B.Blocking?????? connections??? ????? 當(dāng)你使用的連接是Blocking時,你的Socket必須通過連接發(fā)起讀或?qū)懖僮?勝過被動的等待從socket連接發(fā)來的通知.?????? 當(dāng)你的連接末端的讀和寫操作發(fā)生改變時 ????? 使用Blocking??? socket.對于客戶端sockets,設(shè)置ClientType屬性為ctBlocking 以便構(gòu)成一個blocing?????? connection.根據(jù)你的客戶端應(yīng)用想完成什么,你可能想建立一個執(zhí)行線程去完成讀或?qū)懖僮?以便你的應(yīng)用能夠繼續(xù)執(zhí)行其他的線程,當(dāng)它在等待通過連接讀或?qū)懖僮鞯耐瓿???? ??????對于服務(wù)器sockets,設(shè)置ServerType屬性為stThreadBlocking 以便構(gòu)成一個blocking connection.因?yàn)閎locking????? connections在等待通過連接讀或?qū)懶畔⑼瓿蓵r掛起了其他代碼的執(zhí)行,服務(wù)器socket控件通常產(chǎn)生一個新的執(zhí)行線程給每一個客戶連接,當(dāng) ServerType設(shè)置為stThreadBlocking時.許多使用Blocking連接的應(yīng)用都寫使用線程(using?????? threads.甚至如果你不使用線程,你可能也想使用 TWinSocketStream 去讀和寫.??? ????? 1)using?????? threads??? ????? 當(dāng)使用一個blocking?????? connection進(jìn)行讀或?qū)懖僮鲿r,客戶sockets不會自動產(chǎn)生一個新線程.如果你的客戶應(yīng)用程序沒有什么事做,直到讀或?qū)懶畔⑼瓿?那么這正是你想要的.如果你的應(yīng)用包括了一個用戶界面,它還需要響應(yīng)用戶的操作,那么,你可能想產(chǎn)生一個獨(dú)立的線程去讀寫.當(dāng)服務(wù)器sockets形成一個 blocking連接時,他們常常產(chǎn)生獨(dú)立的線程給每一個客戶連接,所以沒有客戶需要等待直到其他客戶完成通過連接讀或?qū)懖僮?在默認(rèn)情況下,服務(wù)器 sockets使用TServerClientThread對象去實(shí)現(xiàn)為每個連接執(zhí)行不同的線程.??? ????? TServerClientThread對象模擬發(fā)生在non-blocking連接中的OnClientRead和OnClientWrite事件.可是,這些事件發(fā)生在監(jiān)聽socket上時,不是本地線程(thread-local).如果客戶請求頻繁,你將想建立你自己的 TServerClientThread子類去提供一個安全線程(Thread-Safe)去完成讀和寫操作.??? ????? 當(dāng)寫客戶線程或?qū)懛?wù)器線程時,你能夠使用TwinSocketStream去做實(shí)際的讀寫操作.??? ????? A)寫客戶端線程??? ????? 為客戶端連接寫一個線程,定義一個新線程對象,使用新線程對象對話框.你的新線程對象Execute方法的句柄的通過線程連接進(jìn)行讀寫操作的細(xì)節(jié),可以建立一個TWinSocketStream對象,然后使用它來讀或?qū)???? ????? 使用你自己的線程,在OnConnect事件句柄中建立它.關(guān)于建立和運(yùn)行線程的更多信息,請看Executing?????? thread?????? objects.??? ???? ??? B)寫服務(wù)器線程??? ????? 服務(wù)器連接線程由TServerClientThread派生.因?yàn)檫@個,不能使用新線程對象對話框替代的. ???? ???? 注意你將用重載ClientExcute方法替代Execute方法.執(zhí)行ClientExecute方法必須為客戶端連接寫一個同樣的Execute方法線程.然而,當(dāng)你從控件欄上放一個客戶socket控件到你的應(yīng)用上時來替代這個方法時.監(jiān)聽服務(wù)socket同意一個連接時,服務(wù)客戶線程必須使用 TServerClientWinSocket對象來建立.這可以利用共公共的CientSocket屬性.另外,你能夠使用 HandleException這個protected性的方法,勝過??? ??? 你自己寫你的thread-safe例外操作.??? ???? ??? 警告:Server?? sockets會緩存他們使用到的線程.確信ClientExecute方法執(zhí)行一些必要的初始化操作,以便它們在最后執(zhí)行時不致于產(chǎn)生不利的結(jié)果.??? ???? ??? 當(dāng)你使用你的線程時,在OnGetThread事件句柄中建立它.當(dāng)建立線程,設(shè)置CreateSuspended參數(shù)為false.??? ???? ????? C.使用TwinSocketStream??? ????? 當(dāng)為一個blocking連接實(shí)現(xiàn)一個線程時,你必須確定在連接的另一端的socket是準(zhǔn)備寫還是讀.Blocking連接不會通知socket當(dāng)它準(zhǔn)備好寫或讀操作的時候.想看看連接是否準(zhǔn)備好,使用TWinSocketStream對象.TWinSocketStream提供一個方法去幫助調(diào)整讀或?qū)懖僮鲿r間的選擇.調(diào)用WaitForData方法去等待,直到socket另一端的準(zhǔn)備好寫操作.當(dāng)讀寫操作使用TWinSocketStream時, 如果讀或?qū)懖僮髟谥付ǖ臅r間期限內(nèi)未能完成,Stream將發(fā)生超時.這個超時被當(dāng)作一個結(jié)果,socket應(yīng)用不會暫停,而是不斷的通過一個 dropped???? connection試圖讀或?qū)???? ???? ??? 注意:你不能在non-blocking連接中使用TWinSocketStream 本文出自 51CTO.COM技術(shù)博客

總結(jié)

以上是生活随笔為你收集整理的Delphi的Socket编程要分几步？的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。