【正文】 Delphi具有以下的特性：基于窗體和面向?qū)ο蟮姆椒?，高速的編譯器，強(qiáng)大的數(shù)據(jù)庫支持，與Windows編程緊密結(jié)合，強(qiáng)大而成熟的組件技術(shù)。 Delphi被稱為第四代編程語言，它具有簡(jiǎn)單、高效、功能強(qiáng)大的特點(diǎn)。因此，可以概括地說，一個(gè)關(guān)系稱為一個(gè)數(shù)據(jù)庫，若干個(gè)數(shù)據(jù)庫可以構(gòu)成一個(gè)數(shù)據(jù)庫系統(tǒng)。 Microsoft Access就是這類數(shù)據(jù)庫管理系統(tǒng)的典型代表。 ③ 數(shù)據(jù)庫結(jié)構(gòu)與數(shù)據(jù)庫種類 數(shù)據(jù)庫通常分為層次式數(shù)據(jù)庫、網(wǎng)絡(luò)式數(shù)據(jù)庫和關(guān)系式數(shù)據(jù)庫三種。 ② 數(shù)據(jù)庫的優(yōu)點(diǎn) 使用數(shù)據(jù)庫可以帶來許多好處：如減少了數(shù)據(jù)的冗余度，從而大大地節(jié)省了數(shù)據(jù)的存儲(chǔ)空間，實(shí)現(xiàn)數(shù)據(jù)資 源的充分共享等等。例如：企業(yè)或事業(yè)單位的人事部門常常要把本單位職工的基本情況 (職工號(hào)、姓名、年齡、性別、籍貫、工資、簡(jiǎn)歷等 )存放在一張表中，這張表就可以看成是一個(gè)數(shù)據(jù)庫。更有甚者稱數(shù)據(jù)庫是一個(gè)數(shù)據(jù)倉庫。它有類似于 Windows 95和Windows 98的圖形用戶界面更方便使用，而多線程，多任務(wù)結(jié)構(gòu)的設(shè)計(jì)使運(yùn)行基于 32位 Windows 應(yīng)用程序比其它操作系統(tǒng)更可靠、更安全，同時(shí)還支持基于 MSDOS和基于 16位 Windows的應(yīng)用的多重引導(dǎo)。 Windows 95是通向 32位桌面操作系統(tǒng)的最容易的途徑，在此基礎(chǔ)上進(jìn)一步創(chuàng)新的 Windows 98將使電腦更易于操作，更可靠，更快捷，并且與Inter緊密結(jié)合。以上彩顯 。 硬盤空間： 20MB。所以經(jīng)醫(yī)院領(lǐng)導(dǎo)研究決定，開發(fā)一套適用于該醫(yī)院現(xiàn)有設(shè)備水平和對(duì)藥品管理系統(tǒng)需求的軟件。藥品的過期問題也得以更加及時(shí)準(zhǔn)確的處理。 開發(fā)背景 以前，醫(yī)院藥品管理的所有相關(guān)操作的程序都是由手工來完成的，利用這種方式當(dāng)醫(yī)院需要管理的藥品數(shù)據(jù)量也很少時(shí)，用人工方式處理或許還可以接受，但隨著現(xiàn)在醫(yī)療體系的不斷改善，藥品種類的不斷增加，以往的那種靠手工記錄各類信息，單據(jù)等的辦法已遠(yuǎn)遠(yuǎn)不能滿足醫(yī)院藥品管理的要求。供應(yīng)上要有合法的可經(jīng)營(yíng)憑證，藥品的出售更要對(duì)消費(fèi)者負(fù)責(zé)。要想在高科技迅猛發(fā)展的今天，在激烈的競(jìng)爭(zhēng)中求得生存和發(fā)展，能否獲得必須的信息就成為能否成功的關(guān)鍵。由于 Borland公司的 Delphi ，面向?qū)ο罂梢暬幊痰奶攸c(diǎn)，有利 于系統(tǒng)的開發(fā)，所以決定用其作為主要開發(fā)工具。前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、數(shù)據(jù)安全性好的數(shù)據(jù)庫。后者要求應(yīng)用程序功能完備，易使用等特點(diǎn)。 本文詳細(xì)說明了一個(gè)醫(yī)院藥品管理的業(yè)務(wù)流程，分析了其數(shù)據(jù)流程，明確了數(shù)據(jù)表之間的聯(lián)系，詳細(xì)說明了主要的程序邏輯?，F(xiàn)如今計(jì)算 機(jī)行業(yè)正蓬勃向前發(fā)展，信息化深入到社會(huì)的各行各業(yè)，使企業(yè)管理發(fā)生了前所未有的變化，與此同時(shí)，計(jì)算機(jī)管理信息系統(tǒng)又是獲得信息的重要手段之一。藥品的有效期限等問題必須要嚴(yán)格控制。 計(jì)算機(jī)應(yīng)用于進(jìn)貨管理、庫存管理、報(bào)警管理、盤點(diǎn)管理、用戶管理。 所以開發(fā)一個(gè)醫(yī)院藥品管理系統(tǒng)的軟件是非常必要的。 第二章 藥店管理的調(diào)查與分析 可行性分析 計(jì)算機(jī)應(yīng)用于管理是由歷史的，經(jīng)過了多年的經(jīng)驗(yàn)積累總結(jié)，實(shí)踐 證明計(jì)算機(jī)應(yīng)用于管理起作用是巨大的，不僅可以使各類工作人員以較少的勞動(dòng)和最短的時(shí)間取得足夠的、可靠的、準(zhǔn)確的信息，而且可以使他們從簡(jiǎn)單的、繁瑣的數(shù)據(jù)的收集，匯總、統(tǒng)計(jì)中解脫出來。 內(nèi) 存： 64 MB。 (2)操作系統(tǒng)： Windows 98， Windows 2021等。它定義了許多新穎優(yōu)異的網(wǎng)絡(luò)性能，例如支持功能強(qiáng)大的新硬件技術(shù)和娛樂平臺(tái)等，同時(shí)對(duì)老的基于 Windows的應(yīng)用程序和技術(shù)保持最良好的支持。 (2)數(shù)據(jù)庫的概念與用途 ① 數(shù)據(jù)庫的概念 什么是數(shù)據(jù)庫呢？當(dāng)人們從不同的角度來 描述這一概念時(shí)就有不同的定義當(dāng)然是描述性的。當(dāng)然，這種說法雖然形象，但并不嚴(yán)謹(jǐn)。有了這個(gè)數(shù)據(jù)倉庫我們就可以根據(jù)需要隨時(shí)查詢某職工的基本情況，也可以查詢工資在某個(gè)范圍內(nèi)的職工人數(shù)等等。此外，數(shù)據(jù)庫技術(shù)還為用戶提供了非常簡(jiǎn)便的使用手段使用戶易于編寫有關(guān)數(shù)據(jù)庫應(yīng)用程序。而不同的數(shù)據(jù)庫是按不同的數(shù)據(jù)結(jié)構(gòu)來聯(lián)系和組織的。對(duì)于一個(gè)實(shí)際的應(yīng)用問題(如人事管理問題 )，有時(shí)需要多個(gè)關(guān)系才能實(shí)現(xiàn)。數(shù)據(jù)庫系統(tǒng)可以派生出各種不同類型的輔助文件和建立它的應(yīng)用系統(tǒng)。和 VC相比， Delphi更簡(jiǎn)單、更易于掌握，而在功能上卻絲毫不遜色；和 VB相比， Delphi則功能更強(qiáng)大、更實(shí)用。但最重要的還是 Object Pascal語言，它才是一切的根本。 在 Delphi眾多的優(yōu)勢(shì)當(dāng)中，它在數(shù)據(jù)庫方面的特長(zhǎng)顯得尤為突出：適應(yīng)于多種數(shù)據(jù)庫結(jié)構(gòu)，從客戶機(jī)／服務(wù)機(jī)模式到多層數(shù)據(jù)結(jié)構(gòu)模式；高效率的數(shù)據(jù)庫管理系統(tǒng)和新一代更先進(jìn)的數(shù)據(jù)庫引擎；最新的數(shù)據(jù)分析手段和提供大量的企業(yè)組件。它的特點(diǎn)主要是信息集中，內(nèi)容變化小，處理量比較大，時(shí)間性強(qiáng)等。隨著開發(fā)區(qū)規(guī)模的擴(kuò)大，醫(yī)院的病人數(shù)量增加，對(duì)藥品的需求也隨之增加。醫(yī)生在微機(jī)上開出藥方，將藥品信息直接傳送到藥房，并且對(duì)病人的信息進(jìn)行記錄。 用戶 需求 通過調(diào)研，了解醫(yī)院藥品管理的業(yè)務(wù)流程，并 向用戶咨詢和討論，得出用戶需求如下： (1)藥品供貨單位信息的記錄、查詢、統(tǒng)計(jì)。由藥房主任根據(jù)藥品的庫存情況，計(jì)劃產(chǎn)生進(jìn)貨單給供應(yīng)商。藥品的貯存需要用特定的 設(shè)施和設(shè)備進(jìn)行分類養(yǎng)護(hù)。匯總產(chǎn)生的庫存報(bào)表，出庫報(bào)表交與藥房主任以便計(jì)劃和進(jìn)貨。無法實(shí)現(xiàn)科學(xué)化管理、現(xiàn)代化管理的要求。 新系統(tǒng)的設(shè)計(jì)目標(biāo) (1)使經(jīng)營(yíng)者及時(shí)準(zhǔn)確的獲得藥品信息，減少數(shù)據(jù)的重復(fù)、冗余。快速查詢，自動(dòng)預(yù)警，盤點(diǎn)管理，使計(jì)算準(zhǔn)確性達(dá)到 100%。 數(shù)據(jù)庫技術(shù)在數(shù) 據(jù)管理和數(shù)據(jù)使用等方面具有“數(shù)據(jù)存儲(chǔ)結(jié)構(gòu)化”，“數(shù)據(jù)冗余小”，“數(shù)據(jù)資源共享”，“程序與數(shù)據(jù)獨(dú)立性高”，“數(shù)據(jù)操作語言高級(jí)”，“易學(xué)易用”等優(yōu)點(diǎn)。因此，還需要考慮數(shù)據(jù)的存儲(chǔ)方式，目的，用途及性能要求。外部實(shí)體有 5 種屬性：名稱、代碼、地址、電話、聯(lián)系人。藥品與設(shè)備之間存在養(yǎng)護(hù)與被養(yǎng)護(hù)的關(guān)系，關(guān)系養(yǎng)護(hù)有種類和數(shù)量?jī)煞N屬性。 供貨單位編碼：供貨單位在系統(tǒng)中代號(hào)為編碼。 供貨單位備注：供貨單位的備注信息。 表 字段名 類型 長(zhǎng)度 備注 供貨單位名稱 數(shù)字 30 供貨單位編碼 數(shù)字 15 索引 藥品信息表 藥品信息表（表 ），表名 : 藥品信息表 ,數(shù)據(jù)庫記錄藥品信息的表。 分類名稱：藥品的種類名稱。 零售計(jì)量單位：藥品的零售計(jì)量單位。 入庫編號(hào)：藥品入庫自動(dòng)生成的編號(hào)。 藥品產(chǎn)地：藥品的產(chǎn)地。 批發(fā)價(jià)：藥品的批發(fā)價(jià)格。 經(jīng)手人：藥品入庫的經(jīng)手人。 出庫單價(jià)：?jiǎn)蝹€(gè)藥品的出庫價(jià)格。 16 出庫利潤(rùn)：出庫時(shí)藥品的總利潤(rùn)。 分類名稱：藥品分類的名稱。 17 表 字段名 類型 長(zhǎng)度 備注 劑型 代碼 文本 10 索引 劑型 代碼 文本 10 數(shù)據(jù)表之間的關(guān)系 Microsoft Access 提供了數(shù)據(jù)庫中的數(shù)據(jù)表通過外鍵連接約束，和主鍵檢驗(yàn)值默認(rèn)值約束，計(jì)算列約束來提供數(shù)據(jù)安全性檢驗(yàn)，保護(hù)數(shù)據(jù)。 圖 18 MS Access 2021 數(shù)據(jù)庫管理系統(tǒng) MS Access 2021 是一項(xiàng)全面完整的數(shù)據(jù)庫與分析產(chǎn)品。 安全性 借助基于角色的安全特性和網(wǎng)絡(luò)加密功能確保您的應(yīng)用程序夠在任何環(huán)境下均處于安狀態(tài)。 MS Access 2021 還推出了一組復(fù)雜的新安全特性：強(qiáng)大而靈活的基于角色的服務(wù)器、數(shù)據(jù)庫和應(yīng)用程序配置安全性；集成的安全性審核工具可以跟蹤 18 個(gè)不同的安全事件及其子事件；精密的文件和網(wǎng)絡(luò)加密支持，包括 SSL（安全套接字層）。 可用性 通過增強(qiáng)的故障轉(zhuǎn)移群集、日志傳送和新增的備份策略， SQL SERVER 2021 達(dá)到了最大的可用性。獲得提高的開發(fā)工作效率。 第四章 功能模塊設(shè)計(jì) 所謂功能模塊設(shè)計(jì)，就是說將整個(gè)系統(tǒng)模塊化。 采用模塊化設(shè)計(jì)原理可 以使整個(gè)系統(tǒng)設(shè)計(jì)簡(jiǎn)易，結(jié)構(gòu)清晰，可讀性、可維護(hù)性增強(qiáng)，提高系統(tǒng)的可行性，同時(shí)也有助于信息系統(tǒng)開發(fā)的組織和管理。藥品的盤點(diǎn)、藥品過期等問題也得以更加及時(shí)準(zhǔn)確的處理。 (3)進(jìn)貨單位：記錄進(jìn)貨單位的詳細(xì)資料，用戶錄入進(jìn)貨過程中進(jìn)貨 單位的各種原始信息。 (2)出庫管理：出庫信息的錄入，由用戶錄入進(jìn)貨過程中產(chǎn)生的各種原始信息，并把他們保存在數(shù)據(jù)庫中。 (2) 出庫查詢：在出庫過程中，產(chǎn)生的各種原始信息，可以在此查詢。 (2)藥品盤點(diǎn)：針對(duì)庫存異常、超過有效期的藥品進(jìn)行盤點(diǎn)管理。 Delphi的特點(diǎn)主要包括： (1)強(qiáng)大的集成開發(fā)環(huán)境 (IDE)。 (3)完全的編譯器和鏈接器。 (5)支持 OLE 和 ActiveX。 Delphi 定義了 4 種模板類型：窗體、應(yīng)用、構(gòu)件和代碼，窗 體、應(yīng)用和構(gòu)件模板允許用戶使用定制化的對(duì)象集合，代碼模板減少了編程的重復(fù)輸入。使用 Delphi 提供的數(shù)據(jù)庫開發(fā)工具可以方便而快速地建立強(qiáng)大的數(shù)據(jù)庫應(yīng)用程序， Delphi 提供的數(shù)據(jù)庫工具包括：數(shù)據(jù)訪問構(gòu)件、數(shù)據(jù) 24 控制構(gòu)件、數(shù)據(jù)庫窗體專家、數(shù)據(jù)庫桌面等。進(jìn)程進(jìn)一步劃分為線程，每一個(gè)線程可為同一進(jìn)程創(chuàng)建一個(gè)或多個(gè)線程。如果用戶輸入的用戶名沒 找到或輸入的密碼不正確則提示錯(cuò)誤?？梢詫?duì)某些模塊進(jìn)行操作，用戶對(duì)模塊的操作權(quán)限由超級(jí)用戶設(shè)定。來實(shí)現(xiàn)。 其主要程序流程，見用戶管理流程圖 (圖 )。再在窗體中增加兩個(gè)快速按鈕 :Copy 和 Paste，圖形可選 Delphi 子目錄下ImagesιButtons 子目錄里的 。 (1) 添加信息程序 添加信息程序 ，主要通過 Delphi的命令按鈕控件“添加 ”的 OnClick事件實(shí)現(xiàn)。如果該藥品信息已經(jīng)添加，則系統(tǒng)會(huì)彈出“該鍵值已經(jīng)存在，請(qǐng)另外指定一個(gè)鍵值”。藥品預(yù)警模塊流程圖見圖 ,部分代碼如下： procedure (Sender: TObject)。+CDate()+39。+CDate()+39。 (39。from 庫存盤點(diǎn)查詢表 39。+strSQL1+39。order by 失效日期 ASC。 end。 var iYpdm: String。 with qrYpPD do begin iYpdm:=FieldByName(39。 。 where 藥品代碼 =39。 btnYpPFJQueryClick(Sender)。軟件測(cè)試是保證軟件質(zhì)量的最重要的手段。 典型的面向?qū)ο蟪绦蚓哂欣^承、封裝和多態(tài)的新特性，這使得傳統(tǒng)的測(cè)試策略必須有所改變。 程序的調(diào)試 程序調(diào)試 包括