【正文】 modern enterprise. The system is designed by Delphi and SQL Server 2020. It is easy to maintain. It satisfies all the requires of the enterprise with a simple and kind interface. Key words: Delphi , control, SQL Server, Enterprise Information System 第一章 項目概況 江南大學畢業(yè)論文 熱電廠熱網(wǎng)管理系統(tǒng) 5 1． 1 項目開發(fā)背景 計算機已經(jīng)成為我們學習和工作的得力助手：首先，計算機可以代替人工進行許多繁雜的勞動；其次，計算機可以節(jié)省許多資源；再次，計算機可以大大提高人們的工作效率；第四，計算機可以使敏感穩(wěn)當更加安全；等等。 企業(yè) 信息系統(tǒng)（ EIS）是指利用電子計算機和通訊設備 ,為 企業(yè) 所屬各部 門提供信息和 行 政管理信息的收集、存儲、處理、提取和數(shù)據(jù)交換的能力 。 專業(yè)人員可以用 Delphi 實現(xiàn)其他 Windows 編程語言功能，而初學者只要掌握幾個關鍵詞就可以建立實用的應用程序。 3． 英文以及日文文獻的閱讀和翻譯。 江 南 大 學 畢業(yè)設計（論文）說明書 題目： 熱電廠熱網(wǎng)管理系統(tǒng) 畢 業(yè) 設 計 任 務 書 一．題目及專題： 1． 題目：熱電廠熱網(wǎng)管理系統(tǒng) 2． 專題：企業(yè)資源計劃管理 二．課題來源及選題依據(jù)： 某熱電廠為了實現(xiàn)對其用戶的智能管理，規(guī)范用戶的用熱行為，并能對用戶的用熱情況進行實時偵測，為了能更好地利用現(xiàn)代信息技術的成果，提高公司的工作效率和水平，因此開發(fā)本軟件對熱網(wǎng)系統(tǒng)進行全局性管理。 2． 撰寫畢業(yè)設計說明書。 Delphi 在原有Pascal 語言 的基礎上進一步發(fā)展，至今包含了數(shù)百條語句、函數(shù)及關鍵詞，其中很多和 Windows GUI 有直接關系。對于今天復雜的客戶 /服務器系統(tǒng)來說， SQL Server是一個很好的選擇。它全方位的滿足了企業(yè)管理各方面的需求，而且操作簡便，界面友好。因此開發(fā)一個熱電廠熱網(wǎng)管理系統(tǒng)也就勢在必行了。它不僅要同其他所有管理信息系統(tǒng)（ MIS）一樣追蹤、管理伴隨人流、財流、物流所產生的管理信息，從而提高整個系統(tǒng)的運行效率，而且還應該支持以病人醫(yī)療信息記錄為中心的整個醫(yī)療、教學、科 研活動。 1． 2 可行性研究 (1) 信息化管理的可行性分析 無錫熱電廠熱網(wǎng)管理系統(tǒng)是使用計算機以 Client/Server（客戶機 /服務器）的體系結構對熱電廠供熱系統(tǒng)以及日常設備、用氣情 況等進行查詢、分析以及管理的系統(tǒng)?，F(xiàn)代化 工廠企業(yè) 管理體系，必須要有信息系統(tǒng)支持，以便適應新的 企業(yè)運行機制轉變，即由社會福利型向經(jīng)營核算型轉變，要求 企業(yè) 管理者 由經(jīng)驗管理向現(xiàn)代化科學管理轉變。 江南大學畢業(yè)論文 熱電廠熱網(wǎng)管理系統(tǒng) 6 ? 數(shù)據(jù)庫平臺 ： 數(shù)據(jù)庫系統(tǒng)采用性能價格比最好的大型數(shù)據(jù)庫SQL SERVER 2020，能夠處理海量數(shù)據(jù)， 避免了 XBASE 系列管理系統(tǒng)速度慢、安全性差的缺點。 但是，熱電廠熱網(wǎng)管理系統(tǒng)所帶來的用戶和熱電廠 內部的 信息 網(wǎng)絡化，可以實現(xiàn)內部設備資源的共享、 各用氣 資料的傳輸，可縮短 數(shù)據(jù)分析 的時間，使用 實時數(shù)據(jù)分析 ，減少 故障 發(fā)生幾率 ，從而提高了熱電廠的整體工作效率，同時也改善了在業(yè)務工作中的查詢速度慢、準確率低等工作效率。 1． 3 系統(tǒng)總體設計 1． 3． 1 設計原則 熱電廠管理信息系統(tǒng)是管理系統(tǒng) (MIS)在熱電廠環(huán)境的具體應用。 * 易學易用的友善人機界面 * 可剪裁性和可伸縮性，能適應不同熱電廠的發(fā)展計劃 需求 。 需求分析主要采用結構化分析方法，用數(shù)據(jù)流圖表示需求分析模型，必要時在局部分析采用原型法。 開發(fā)工具采用 SQL Server 20 Delphi 。 數(shù)據(jù)庫系統(tǒng)采用 SQL Server2020, 且系統(tǒng)中要求有 OFFICE 辦公軟件的支持。它應該 符合現(xiàn)行熱電廠體系結構、管理模式和管理程序，系統(tǒng)的建立和運行應該成為熱電廠日常管理工作中不可缺少的組成部分，并且對熱電廠帶來一定的經(jīng)濟效益和社會效益。 靈活性：系統(tǒng)操作方便，可作部分的客戶化修改，滿足個性化的需求。本設計前臺是選用 VB 進行 設計，后臺選用 SQLsever2020 作為數(shù)據(jù)庫開發(fā)軟件。目前流行的主要數(shù)據(jù)庫有 Oracle、 Informix、 Sybase、 MS SQL Server 、 DB2 等。 Delphi 是可視化應用編程開發(fā)環(huán)境、可重用性面向對象編程語言、快速編譯器和數(shù)據(jù)庫的完美結合。同時也支持基于 Web 服務的 和 Sun One 體系，而且提供給 Web 開發(fā)者需要的可伸縮性與可靠性。 Delphi 的新特點 ● 新 IDE 的特點 ● 新的網(wǎng)絡功能特點 ● 新 VCL 的特點 ● 新 RTL 單元和特點 ● 新的編譯器的特點 ● 新的 COM/ActiveX 特點 2． 2 SQL Server 概述 SQL Sever 歷史及發(fā)展 1974 年 ， IBM 的 Ray Boyce 和 Don Chamberlin 將 Codd 關系數(shù)據(jù)庫的 12 條準則的數(shù)學定義以簡單的關鍵字語法表現(xiàn)出來 ， 里程碑式地提出了 SQL（ Structured Query Language） 語言。在 SQL 語言取 得進展的同時， IBM 研究中心于 1973 年開始著手 SystemR 項目。目前 SQL 標準有 3 個版本。ANSIX31351992[ANS92]描述了一種增強功能的 SQL，現(xiàn)在叫做 SQL92 標準。 SQL Sever 的優(yōu)越性 SQL 廣泛地 被采用正說明了它的優(yōu)點。所有 SQL 語句接受集合作為輸入，返回集合作為輸出。所有 SQL 語句使用查詢優(yōu)化器，它是 RDBMS 的一部 分，由它決定對指定數(shù)據(jù)存取的最快速度的手段。 SQL 為許多任務提供了命令，包括： ● 查詢數(shù)據(jù) ● 在表中插入、修改和刪除記錄 ● 建立、修改和刪除數(shù)據(jù)對象 ● 控制對數(shù)據(jù)和數(shù)據(jù)對象的存取 ● 保證數(shù)據(jù)庫 一致性和完整性 以前的數(shù)據(jù)庫管理系統(tǒng)為上述各類操作提供單獨的語言，而 SQL 將全部任務統(tǒng)一在一種語言中。 Delphi 與使用 SQL 語言的數(shù)據(jù)庫管理系統(tǒng)兼容，在使用Delphi 開發(fā)數(shù)據(jù)庫應用程序時，我們可以使用 SQL 語言編程，支持 SQL 編程是Delphi 的一個重要特征，這也是體現(xiàn) Delphi 作為一個強大的數(shù)據(jù)庫應用開發(fā)工具的一個重要標志。從傳統(tǒng)上看，雙層系統(tǒng)意味著客戶機應用程序運行在一臺機器上，向另一臺計算機上的服務器發(fā)送請求。三層系統(tǒng)也采用了同樣的模型。中間層直接與數(shù)據(jù)庫交互。這種主機 /終端模式的軟硬件費用相當高，中小型企業(yè)一般都無法實施。客戶機和服務器通過網(wǎng)絡連結成為一個互相協(xié)作的系統(tǒng)。與主機 /終端模式相比， Client/Server 體系結構可以更好地實現(xiàn)數(shù)據(jù)服務和應用程序的共享，并且系統(tǒng)容易擴充 ，更加靈活，簡化了企業(yè)信息系統(tǒng)的開發(fā)。 SQL Server? 2020 的應用程序相對比較 容易。 SQL Server? 2020 的特性包括 ： Inter 集成 SQL Server 2020 數(shù)據(jù)庫引擎提供完整的 XML 支持。 98 的便攜式電腦，到運行 Microsoft Windows 2020 數(shù)據(jù)中心版的大型多處理器服務器。 SQL Server 2020 分布式查詢使您得以引用來自不同數(shù)據(jù)源的數(shù)據(jù)，就好象這些數(shù)據(jù)是 SQL Server 2020 數(shù)據(jù)庫的一部分，同時分布式事務支持充分保護任何分布式數(shù)據(jù)更新的完整性。 SQL Server 2020 還支持基于標準的、與 Windows DNA 集成的程序設計模型，使 SQL Server 數(shù)據(jù)庫和數(shù)據(jù)倉庫的使用成為生成強大的可伸縮系統(tǒng)的無縫部分。 SQL Server工具 SQL Server 自帶了一些有用的工具，通過使用這些工具，可以有效的對數(shù)據(jù)庫服務器進行設置、管理和使用。通過這個工具，可以啟動和終止數(shù)據(jù)庫的運行，還可以設置數(shù)據(jù)庫服務器的屬性。 江南大學畢業(yè)論文 熱電廠熱網(wǎng)管理系統(tǒng) 17 Enterprise Manager 使用 Microsoft Management Console(MMC)作為自己的基礎接口。此外，它還帶有向導用以幫助用戶創(chuàng)建維護日程，其中包括備份數(shù)據(jù)庫、重新組織索引和檢查數(shù)據(jù)庫完整性等等。還可以通過使用 Query Analyzer從數(shù)據(jù)庫中摘錄信息，通過使用這些信息，可以使應用程序對數(shù)據(jù)庫的改動生效。那些處理應用程序，請求另一計算機的服務的計算機稱為客戶機（ Client）。但是由于微機具有成本的優(yōu)勢，因而通常選擇它們作為客戶機。 客戶 /服務器結構可以包括多個服務器。這些實用程序使用一種專用的數(shù)據(jù)定義語言（ DDL）。 如上所述，數(shù)據(jù)庫定義、存儲分配以及數(shù)據(jù)建立過程都將取決于應用需求和所選擇的特定 DBMS 產品的特征。 3．面向變換的語言，它們構成一類非過程語言，這類語言將表示為關系的輸入數(shù)據(jù)變換成表示為單個關系的結果。 3．與關系數(shù)據(jù)庫聯(lián)系的第三種方法是通過應用程序。向關系模型提供對象擴展的產品包括 Sybase、 Informix、 Oracle和 Borland。 SQL 允許用戶在關系表數(shù)據(jù)上進行查詢、建立新表、存取現(xiàn)有的遠程表、操作數(shù)據(jù)、建立應用程序存取 SQL 數(shù)據(jù)，運行 SQL 語句，處理錯誤以及訪問多個服務器。在查詢多個表時， SQL將這些表連接起來。從經(jīng)濟方面，該公司用于系統(tǒng)開發(fā)的預算基本可滿足設備的投入和人力的投入?，F(xiàn)有的員工通過培訓完全能掌握系統(tǒng)和方便地使用系統(tǒng)。 其主要工作是對各用戶進行具體的資料管理，包括添加、修改以及詳細資料 查詢等。 （ 3）儀表校驗子系統(tǒng) 該子系統(tǒng)完成對用戶的儀表各項內容的詳細資料以及儀表校驗工作的資料管理。其組成部 分主要包括報警查詢管理模塊。 其主要工作是對各用戶用汽情況進行即時的監(jiān)控和統(tǒng)計，并對統(tǒng)計進行時間段內的查詢，以分析各用戶的熱網(wǎng)使用率。 （ 7）實時數(shù)據(jù)子系統(tǒng) 該子系統(tǒng)完成對用戶用汽情況、設備情況進行實時數(shù)據(jù)的傳輸顯示。其主要組成部分包括熱用戶流量結算明細表、供熱流量結算月報表、熱網(wǎng)供汽日報表、熱網(wǎng)供汽收費報表、系統(tǒng)報警月報表、設備檢修記錄月報表等模塊。 其主要是對各用戶賬號密碼進行權限管理和新用戶的添加。它不僅為用戶的數(shù)據(jù)庫提供了一個面向對象的視點，還可獨立于任何單一的數(shù)據(jù)庫開發(fā)商之外，這將允許用戶開發(fā)出可以在不同數(shù)據(jù)庫系統(tǒng)中使用的應用程序。 Record 對象既代表紀錄集中的一個數(shù)據(jù)行，也代表一個文件或一條電子郵件信息中的數(shù)據(jù)行；Stream 對象為控制文件或電子郵件信息中的數(shù)據(jù)提供了便利條件。 這樣，就建立了文件數(shù)據(jù)源使之與 SQL Server 的數(shù)據(jù)庫建立了連接。 :=true。 :=false。 :=false。 begin :=true。 :=false。 :=false。 //調用修改記錄子模塊 procedure (Sender: TObject)。 :=true。 江南大學畢業(yè)論文 熱電廠熱網(wǎng)管理系統(tǒng) 27 :=false。 end。 :=false。 showmessage(‘不能為空 !請?zhí)钊胪暾Y料 !’)。 :=true。 end else begin messagebeep(1)。 showmessage(‘不能為空 !請?zhí)钊胪暾Y料 !’)。 :=true。 end else begin 江南大學畢業(yè)論文 熱電廠熱網(wǎng)管理系統(tǒng) 29 messagebeep(1)。 //添加記錄按鈕 procedure (Sender: TObject)。 :=”。 :=”。 :=true。 :=true。 end。 :=39。++39。 :=true。 :=[39。設備名稱 39。]。 :=[39。檢修責任人 39。]。 :=true。 :=true。 end。