【正文】 yinfobuf))。,[39。 _ToIp:=[1]。提 示 39。 begin tempItem:=。 for i:=0 to do begin if [i].CaptionRECVNAME then inc(j,1)。 minfo:string。 end。 recvworkgroup:=copy(msg,headlen+namelen+1,workglen)。then Begin // (39。 recvp2pdata(recvip,recvname,recvworkgroup,recvport)。 RECVNAME:=COPY(msg,headlen+1,namelen)。HAND39。 chatinfobuf:array[0..2030]of char。 下面是發(fā)送按鈕的代碼部分： procedure (Sender: TObject)。 recvip:=copy(msg,headlen+portlen+1,iplen)。then begin // (39。 handdata(recvip,myname,myworkgroup,recvport)。+recvip+inttostr(recvport))。 then begin recvip:=。 //(msg)。 f:textfile。ABinding: TIdSocketHandle)。 。 //關(guān)閉一次列舉 if Res NO_ERROR then break。//取得一個(gè)工作組的名稱 Inc(P)。 //申請內(nèi)存，用于獲取工作組信息 //獲取一個(gè)網(wǎng)絡(luò)類型的文件資源信息 Res := WNetEnumResource(lphEnum, Count, Pointer(Buf), BufSize)。 if Res NO_ERROR then break。i,j : SmallInt。 Buf : Pointer。//執(zhí)行失敗 Result := True。 end。 Delete(tmpstr,1,2)。 If Res = ERROR_NO_MORE_ITEMS then break。 //執(zhí)行失敗 While True Do//列舉指定工作組的網(wǎng)絡(luò)資源 Begin Count := $FFFFFFFF。//類型為服務(wù)器（工作組） := RESOURCEUSAGE_CONTAINER。 第 11 頁 共 25 頁 Begin Result := False。 lphEnum: THandle。 type TNetResourceArray = ^TNetResource。當(dāng)有用戶打開本系統(tǒng)的時(shí)候?qū)?huì)向局域網(wǎng)中的所有用戶發(fā)送一個(gè)握手信息來獲取網(wǎng)絡(luò)中的在線用戶信息并添加到列表中顯示出來，同時(shí)也把自己的網(wǎng)絡(luò)資源 信息發(fā)送給對方，使自己被添加到其他用戶的列表中。 其中我為 IP地址和端口號的設(shè)置分別為 和 9000。為連接到 UDP 服務(wù)器，需要一個(gè) TIdUDPClient 組件。 TCP 用于確保點(diǎn)對點(diǎn)的連接，而 UDP 并不保證發(fā)送的數(shù)據(jù)一定到達(dá)，也不表明數(shù)據(jù)報(bào)的傳輸成功或失敗。 系統(tǒng)主界面 （服務(wù)器 /客戶） 單 播 發(fā) 送 廣 播 發(fā) 送 接 收 信 息 顯示用戶信息 信 息 寫 入 查看歷史記錄 工 作 組 IP 地 址 用 戶 名 第 8 頁 共 25 頁 圖 5 主界面 當(dāng)有信息傳過來時(shí)將自動(dòng)彈出一個(gè)信息接收的窗體，窗體包括查看按鈕和關(guān)閉按鈕還有一個(gè)顯示對方用戶的區(qū)域，他們分別是用來打開并查看信息或是不想查看而關(guān)閉的作用。 4 系統(tǒng)設(shè)計(jì) 系統(tǒng)總體架構(gòu) 本系統(tǒng)主要是采用 C/S 結(jié)構(gòu)，并且每個(gè)客戶端也是作為服務(wù)器端的，當(dāng)系統(tǒng)發(fā)送信息給局域網(wǎng)的用戶，主要由單播模塊和廣播模塊來實(shí)現(xiàn)，而其中的單播模塊和用戶信息模塊是具有依賴性的，在接收信息的時(shí)候又 有兩個(gè)模塊來完成，一是信息接收的模塊，另一個(gè)是信息查看的模塊。為企業(yè)中的信息交流帶來了很大的安全性問題。同屬于消息類的業(yè)務(wù)還有短信、彩信等，他們之間都存在一定程度的替代性，同時(shí)又各有長短。 圖 3 廣播 物理結(jié)構(gòu)圖 3 需求分析 現(xiàn)行業(yè)務(wù)系統(tǒng)描述 隨著計(jì)算機(jī)網(wǎng)絡(luò)日新月異的發(fā)展，人們的交流方式越來越多，傳統(tǒng)的交流方式如：信件、電報(bào)、電話等已經(jīng)難以滿足人們的交流要求，在互聯(lián)網(wǎng)上即時(shí)的和好友取得聯(lián)系，已經(jīng)成為當(dāng)今社會(huì)人們主流的聯(lián) 系方式。任何設(shè)備都將打開尋址到廣播地址的信息，并將它們傳送 到下一個(gè)工作站。因此，共享以太網(wǎng)中的所有節(jié)點(diǎn)都屬于同一廣播域。 網(wǎng)絡(luò)廣播中涉及以下重要概念： 廣播域（ Broadcast Domain）：這是一個(gè)限定區(qū)域，其中的所有設(shè)備都可以共享信息。 IPv6 支持單播（ Unicast）、組播（ Multicast）以及任意 播（ Anycast）三種類型， IPv6 中沒有關(guān)于廣播（ Broadcast）的具體劃分，而是作為組播的一個(gè)典型。 IPv6 中沒有關(guān)于廣播（ Broadcast）的具體劃分，而是作為組播的一個(gè)典型類型。所有 LANs（如以太網(wǎng)）和 IP 網(wǎng)絡(luò)都支持單播傳輸模式，并且大多數(shù)用戶都了解標(biāo)準(zhǔn)單播應(yīng)用程序，如： 、 第 4 頁 共 25 頁 smtp、 ftp 和 tel ― 都作為 TCP 傳輸協(xié)議。單播方式下，只有一個(gè)發(fā)送方和一個(gè)接收方。由于 UDP 比較簡單， UDP 頭包含很少的字節(jié)，比 TCP 負(fù)載消耗少 ，所以 UDP 適用于不需要 TCP 可靠機(jī)制的情形，比如，當(dāng)高層協(xié)議或應(yīng)用程序提供錯(cuò)誤和流控制功能的時(shí)候。 由于大多數(shù)網(wǎng)絡(luò)應(yīng)用程序都在同一臺(tái)機(jī)器上運(yùn)行，計(jì)算機(jī)上必須能夠確保目的地機(jī)器上的軟件程序能從源地址機(jī)器處獲得數(shù)據(jù)包，以及源計(jì)算機(jī)能收到正確的回復(fù)。由于沒能提供用戶真正期望的開放環(huán)境， C/S結(jié)構(gòu)的軟件需要針對不同的操作系統(tǒng)系統(tǒng)開發(fā)不同版本的軟件，加之產(chǎn)品的更新?lián)Q代十分快，已經(jīng)很難適應(yīng)百臺(tái)電腦以上局域網(wǎng)用戶同時(shí)使用。它是軟件系統(tǒng)體系結(jié)構(gòu)，通過它可以充分利用兩端硬件環(huán)境的優(yōu)勢，將任務(wù)合理分配到Client 端和 Server 端來實(shí)現(xiàn)，降低了系統(tǒng)的通訊開銷。 本課題研究的意義 隨著現(xiàn)代通訊技術(shù)不斷的發(fā)展，即時(shí)通訊技術(shù)也有飛速的發(fā)展，它是一種使人們能在網(wǎng)上識別在線用戶并與他們實(shí)時(shí)交換消息的技術(shù)，被很多人稱為電子郵件發(fā)明以來最酷的在線通訊方式?？梢?說跨網(wǎng)即時(shí)通訊應(yīng)用的萌芽、雛形以及誕生，都貫穿著整個(gè)行業(yè)的發(fā)展。因此，這個(gè)軟件是極具適應(yīng)性和實(shí)用性的即時(shí)通訊軟件。目前，用于實(shí)現(xiàn)單一的即時(shí)通訊、文件共享的軟件實(shí)在太少，而且它們中大部分都對遠(yuǎn)程服務(wù)器有非常大的依賴性，沒有徹 底實(shí)現(xiàn)點(diǎn)對點(diǎn)的交流。 Broadcast。 fifth is the implementation and the test situation。s munication, needs to develop one based on the local area work information receiving and dispatching system instant message facilities, realizes carries on the information in the internal work the exchange. This topic design mainly aims at the local area work munication to develop the design, uses is the C/S structure, realizes the unicast, the broadcast as well as the online user demonstration and the examination historic record function using the Delphi programming tool, and drew support from some work munication module, the success realization on the local area work instant message. The present paper altogether divides into six parts. The first part is the topic background and the research significance。本課題設(shè)計(jì)主要針對局域網(wǎng)通訊而開發(fā)設(shè)計(jì)的，采用的是 C/S 構(gòu)架，利用 Delphi 編程工具來實(shí)現(xiàn)單播、廣播以及在線用戶顯示和查看歷史記錄的功能 ，并借 助一些網(wǎng)絡(luò)通訊組件，成功的實(shí)現(xiàn)了在局域網(wǎng)上的即時(shí)通訊。由于互連網(wǎng)上的網(wǎng)絡(luò)通訊工具給企業(yè)內(nèi)部信息交流帶來了不便，所以為了方便 內(nèi)部網(wǎng)絡(luò)的用戶之間的溝通 ，需要開發(fā)一個(gè)基于局域網(wǎng)的信息收發(fā)系統(tǒng)的即時(shí)通訊工具，實(shí)現(xiàn)在 內(nèi)部網(wǎng)絡(luò) 中進(jìn)行信息的交流。 關(guān)鍵詞 ： 即時(shí)通訊； C/S 構(gòu)架；單播；廣播；歷史記錄 The Design and Implementation of Receiving and Sending Information System Based On LAN Abstract The work munication in already did not calculate the new things now, but the majority work munication all needed to draw support from on Inter the server, this gave these to have the largescale internal work user to create many problems, like waste work resources, bitter experience to work attack, dissemination virus, destruction defense system and so on. Because on the interconnection work munication facilities the interior munication have brought inconveniently for the