【正文】 但 系統(tǒng)構(gòu)架和代碼設(shè)計還需要進一步優(yōu)化，以提高系統(tǒng)的運行效率，降低所耗的系統(tǒng)資源，為用戶提供更好的服務(wù)。 （ 6） 看服務(wù)器的系統(tǒng)信息欄是否記錄了客戶端的連接，用戶的注冊、登錄、下線等信息。 （ 2） 運行客戶端，輸入服務(wù)器的 ip 地址 ，測試 看能否連接到服務(wù)器。字符串表示注冊信息 ； 當有 39。%^)39。 //從用戶列表中去除下線的用戶 dec(counter)。 for i:=0 to counter1 do [i].SendText(tmptext+39。+tmptext+39。%^)39。*^amp。)。]注冊成功！ 39。) else //注冊時進行用戶名驗證 begin insertrecord([member,chattext])。usename39。,tmptext)。,tmptext)0 then //當有 39。 end。*%^39。*%^39。 39。 (39。 (check+39。usename39。表示有登陸信息 begin tmptext := copy(tmptext,1,length(tmptext)6)。 用戶注冊登錄下線 模塊功能代碼 if pos(39。%amp。 //對所有人發(fā) 送信息 end。 break。,tmptext)+2)。 usename:=copy(tmptext,pos(39。 chattext:= copy(tmptext,1,signpos1)。amp。%amp。39。 if pos(39。監(jiān)聽狀態(tài) ...39。 //點擊監(jiān)聽按鈕時服務(wù)器開始監(jiān)聽請求 begin clientip:= end。 //狀態(tài)欄顯示服務(wù)器當前時間狀態(tài) 第 14頁 共 22頁 end else showmessage(39。服務(wù)器連接！ [39。示意圖如圖 圖 圖 10： 第 12頁 共 22頁 圖 8 客戶端界面設(shè)計 圖 9 注冊欄設(shè)計 圖 10 關(guān)于對話框設(shè)計 服務(wù) 器界面設(shè)計 客戶端的界面應(yīng)該包括 以 下內(nèi)容： 服務(wù)器監(jiān)聽狀態(tài)控制欄、在線用戶列表欄、系統(tǒng)信息欄 和關(guān)于對話框，如圖 11 所示： 第 13頁 共 22頁 局 域 網(wǎng) 聊 天 程 序 服 務(wù) 器幫 助 信 息用 戶 列 表服 務(wù) 器 監(jiān) 聽 狀 態(tài) 控 制 欄用 戶 注 冊 欄 圖 11 服務(wù)器功能圖 整體界面的設(shè)計 同樣為上下分開布局，下欄為服務(wù)器監(jiān)聽狀態(tài)控制欄， 通過點擊 右邊用戶列表欄的用戶來完成用戶的選擇。每個在線用戶都和服務(wù)器建立了一個獨立的連接，如果其中一個用戶 A 向用戶 B 發(fā)送消息 a，工作原理是：用戶先把消息 a 發(fā)給服務(wù)器，服務(wù)器在把此消息發(fā)給用戶 B；如果用戶 A 向所有在線用戶發(fā)送消息 b，工作 原理是：用戶先把消 息 b 發(fā)給服務(wù)器，服務(wù)器再把此消息發(fā)給所有在線用戶。 服務(wù)器運行時要能對監(jiān)聽狀態(tài)進行控制，可以在不退出程序的情況下關(guān)閉服務(wù)器。 連接到服務(wù)器后，進行注冊，登錄時系統(tǒng)要能 根據(jù)用戶輸入的用戶名和密碼 判斷該用戶是否為合法用戶；如果用戶輸入的用戶名或密碼錯誤，系統(tǒng)將給出相應(yīng)的提示，并要求用戶進行注冊或重新登錄；如果用戶輸入的用戶名和密碼正確， 可進行聊天操作 。用戶基本信息表如表 1： 表 1 用戶基本信息表： DB_USER 中文名稱 字段名 類型 長度 是否允許空 備注 用戶名 username nvarchar 10 not null PK 密碼 password nvarchar 100 not null 客戶端服務(wù)器功能 設(shè)計 客戶端主要功能 有用戶注冊、用戶登錄、在線用戶列表、 消息收發(fā)模塊。 數(shù)據(jù)庫設(shè)計 局域網(wǎng)聊天程序 的 數(shù)據(jù)庫設(shè)計 (Database Design)把系統(tǒng)中大量的數(shù)據(jù)按一定的模型組織起來，提供存儲、維護、檢索數(shù)據(jù)的功能，使信息系統(tǒng)可以方便、及時、準確地從數(shù)據(jù)庫中獲得所需的信息。對于廣大的程序開發(fā)人員來講 ,使用 Delphi 開發(fā)應(yīng)用 軟件 ,無疑會大大地提高編程效率 ,而且隨著應(yīng)用的深入 ,您將會發(fā)現(xiàn)編程不再是枯燥無味的工作 ——Delphi 的每一個設(shè)計細節(jié) ,都將帶給您一份欣喜 。 ? 選擇特定用戶并與其交談 ，還可以向在所有在線的用戶發(fā)送消息 。最 終的 程序 應(yīng)具有如下功能 : ? 客戶端 使用 簡便 ， 服務(wù)器端運行穩(wěn)定。 完成一個基于服務(wù)器和客戶端的局域網(wǎng) 通訊軟件， 類似于聊天室，可進行注冊、登錄、 系第 6頁 共 22頁 統(tǒng)信息記錄、 聊天 等功能 。 首先在服務(wù)器方，利用 socket()函數(shù)建立流式套接字，返回套接字號 s,接著利用 bind()函數(shù)將套接字 s 與本地地址綁定，緊接著利用 listen()函數(shù)通知 TCP,監(jiān)聽客戶方，服務(wù)器準備接收連接，沒有連接的話，服務(wù)器方通過 closesocket()關(guān)閉套接字 s,服務(wù)結(jié)束。 Listen()開始監(jiān)聽網(wǎng)絡(luò)， Accept()用于接受連接，其返回值是保持同客戶機聯(lián)系的 Socket。 第 4頁 共 22頁 Client 方相對簡單： Socket()－－ Connect()[通過一定的 port 連接特定的服務(wù)器，這是與服務(wù)器建立連接 ]－－ Write()－－ Read()?？蛻魴C /服務(wù)器模式在操作過程中采 取的是主動請求服務(wù)響應(yīng)的方式 ,如 圖 1 所示：客 戶 端 A客 戶 端 B服 務(wù) 器 : 監(jiān) 聽局 域 網(wǎng)請求A請求B響應(yīng)B響應(yīng)A請 求 A響應(yīng)A響應(yīng)B請求B 圖 1 客戶端服務(wù)器模式 Socket 介紹 Socket 是建立 在傳輸層協(xié)議 (主要是 TCP 和 UDP)上的一種套接字規(guī)范，最初是由美國加州 Berkley 大學(xué)提出，它定義兩臺計算機間進行通信的規(guī)范（也是一種編程規(guī)范），如果說兩臺計算機是利用一個 “通道” 進行通信，那么這個 “ 通道 ” 的兩端就是兩個套接字。 （ 2） 服務(wù)進程一般是先于客戶請求啟動的。 （ 2） 向服務(wù)器發(fā)出服務(wù)請求報文，等待并接收應(yīng)答；繼續(xù)提出請求。新進程處理此客戶請求，并不需要對其他請求做出應(yīng)答。 首先服務(wù)器方要啟動，并根據(jù)請求提供相應(yīng)服務(wù) ： （ 1） 打開一通信通道并告知本地主機，它 在某一公認地址端口上 (如 為80)接受客戶請求。 客戶機 /服務(wù)器模式 C/S 結(jié)構(gòu)（ Client/Server 結(jié)構(gòu)）是大家熟知的客戶機和服務(wù)器結(jié)構(gòu)。 TCP 是面向連接的，通信雙方保持一條通路，好比目前的電話線，使用 tel 登陸 BBS，第 2頁 共 22頁 用的就是 TCP 協(xié)議； UDP 是無連接的，通信雙方都不保持對方的狀態(tài)，瀏覽器訪問 Inter 時使用的 HTTP 協(xié)議就是基于 UDP 協(xié)議的。 基于 Socket 的局域網(wǎng)聊天室是局域網(wǎng)通信軟件的具體實例之一，它很好地詮釋了 Socket 通信的原理，并且在 局域網(wǎng) 部通信、教學(xué)、討論等應(yīng)用中都具有一定的實用價值。這些在 原有局域網(wǎng)設(shè)計之初未曾考慮到的新情況的出現(xiàn)使得局域網(wǎng)不堪重負， 容易發(fā)生信息阻塞，此時，局域網(wǎng)不但不能提高生產(chǎn)效率，反而成為 工作效率 的瓶頸。 隨著全球信息化進程的不斷發(fā)展，網(wǎng)絡(luò)也在飛速發(fā)展。無論近在咫尺，還是遠隔重洋，也只是在鍵盤和鼠標之間就可以解決問題 。 參考文獻 .........................................................