基于局域網(wǎng)的信息收發(fā)系統(tǒng)的設計與實現(xiàn)計算機專業(yè)畢業(yè)設計畢業(yè)論文-資料下載頁
2025-01-16 13:47本頁面
【正文】 的服務器，不通過遠程服務器來完成實現(xiàn)通訊，避免了和遠程服務器連接時過多的浪費網(wǎng)絡資源。并且避免了服務器忙或與服務器無法連接時浪費過多時間用于和服務器建立連接，同時也為內(nèi)網(wǎng)服務增強了許多的安全性，徹底的將通訊工具從互連網(wǎng)上搬到內(nèi)網(wǎng)中來，這樣一來就不會受到來自互連網(wǎng)的攻擊了。這種系統(tǒng)主要是為了方便了大中型企業(yè)在內(nèi)部即時通訊要求，從而進一步提高工作效率，增加企業(yè)的效益。4 系統(tǒng)設計本系統(tǒng)主要是采用 C/S 結(jié)構(gòu)，并且每個客戶端也是作為服務器端的，當系統(tǒng)發(fā)送信息給局域網(wǎng)的用戶，主要由單播模塊和廣播模塊來實現(xiàn)，而其中的單播模塊和用戶信息模塊是具有依賴性的，在接收信息的時候又有兩個模塊來完成，一是信息接收的模塊，另一個是信息查看的模塊。由此可以看出本系統(tǒng)主要分為兩大部分模塊：發(fā)送模塊和接收模塊。發(fā)送模塊：單播模塊，廣播模塊，用戶信息模塊，信息記錄模塊接收模塊：接收信息模塊，查看信息模塊有了以上的了解了那讓我們來看看系統(tǒng)的架構(gòu)圖：第 7 頁 共 25 頁圖 4 系統(tǒng)架構(gòu)圖為了方便用戶的操作，我采用比較簡單的界面設計，主界面包括廣播按鈕、發(fā)送按鈕、刷新按鈕、在線用戶顯示框、信息輸入窗體。其中廣播按鈕是將信息窗體中的內(nèi)容發(fā)送到所有的用戶；發(fā)送按鈕是將信息窗體中的內(nèi)容發(fā)送到指定的用戶；在線用戶顯示框中選取指定的用戶和查看用戶的信息；刷新是重載用戶列表。系統(tǒng)主界面（服務器/客戶）單 播 發(fā) 送廣 播 發(fā) 送接 收 信 息顯示用戶信息信 息 寫 入查看歷史記錄工 作 組IP 地 址用 戶 名第 8 頁 共 25 頁圖 5 主界面當有信息傳過來時將自動彈出一個信息接收的窗體，窗體包括查看按鈕和關閉按鈕還有一個顯示對方用戶的區(qū)域，他們分別是用來打開并查看信息或是不想查看而關閉的作用。圖 6 信息接收界面如過你在圖 6 中點擊了查看按鈕，那么將會彈到顯示信息查看的窗體上，在文本區(qū)則會顯示對方傳送過來的信息內(nèi)容，在查看了之后有個關閉按鈕，用來結(jié)束對話框，便可以回到圖 5 的界面了。第 9 頁 共 25 頁圖 7 信息查看界面在歷史記錄的窗體中點擊記錄文件按鈕來選擇保存的路徑，將會自動生成一個文本文件來對通訊記錄進行保存。圖 8 歷史記錄 網(wǎng)絡組件UDP 協(xié)議由 TCP 協(xié)議衍生而來。TCP 用于確保點對點的連接，而 UDP 并不保證發(fā)送的數(shù)據(jù)一定到達，也不表明數(shù)據(jù)報的傳輸成功或失敗。本系統(tǒng)設計使用的是 TIdUDPClient 和 TIdUDPServer 兩個用戶數(shù)據(jù)報（UDP）組件，首先創(chuàng)建 Delphi 工程。然后向工程組再添加一個工程。把一個工程作為客戶，另一個作為服務器。為連接到 UDP 服務器，需要一個TIdUDPClient 組件。用來表示服務器的 IP 地址和端口號。由于 UDP 是無連接的，因此在 UDP 的接口方法中不包括 Connect 方法。要使用 Inter Direct實現(xiàn)的組件，只需使用 Send 向給定的 IP 地址和端口號廣播一個命令字符串。其中我為 IP 地址和端口號的設置分別為 和 9000。服務器是作為應用程序?qū)崿F(xiàn)的，它對客戶程序發(fā)出的一個簡單的命令集進行響應。為實現(xiàn)第 10 頁 共 25 頁服務器，程序?qū)⒈O(jiān)聽 DefaultPort 端口上的廣播，并將 設置為 True。下面是我對 TIdUDPClient 和 TIdUDPServer 組件的設置圖：圖 9 TIdUDPClient 組件設置圖 10 TIdUDPServer 組件設置 用戶信息顯示功能為了方便用戶選取單個用戶進行信息發(fā)送和查看在線用戶的信息，所以設計了一個 ListView 來進行顯示如圖 5，在 ListView 中包括了用戶名、工作組、IP 地址。當有用戶打開本系統(tǒng)的時候?qū)蚓钟蚓W(wǎng)中的所有用戶發(fā)送一個握手信息來獲取網(wǎng)絡中的在線用戶信息并添加到列表中顯示出來，同時也把自己的網(wǎng)絡資源信息發(fā)送給對方，使自己被添加到其他用戶的列表中。其中分別要對網(wǎng)絡中的所有的用戶名、工作組、IP 地址進行獲取，下面來看一下對于獲取這些網(wǎng)絡資源的代碼部分。 局域網(wǎng)內(nèi)實現(xiàn)廣播功能在本設計中單播發(fā)送的按鈕為 BitBtn3，主要是通過 IdUDPServer 和IdUDPClient 組件來編寫的，主要是使用了 來對信息進行發(fā)送的，在發(fā)送時將會把信息發(fā)送給在局域網(wǎng)內(nèi)部的所有用戶包括自己。第 11 頁 共 25 頁下面是發(fā)送按鈕的代碼部分： 歷史信息記錄功能為了能讓用戶對歷史的信息進行查看，所以本設計中包含了一個對歷史信息進行記錄的功能，主要是創(chuàng)建一個記事本文件對信息進行復制保存，以下就是歷procedure (Sender: TObject)。 var chatinfo:string。 chatinfobuf:array[0..2030]of char。 f:textfile。begin chatinfo:=format(39。%6s%255s%1024s39。,[39。CHAT39。,myname,])。 strpcopy(chatinfobuf,chatinfo)。 (chatinfobuf,9000)。end。
規(guī)章制度相關推薦
鄂ICP備17016276號-1