506.臨床試驗室信息系統

1、i臨床試驗室信息系統摘要伴隨著信息技術的發(fā)展，臨床實驗室信息系統(clinical laboratory information system, clis)已經成為實驗室最重要的組成部分之一。尤其是自動化程度高、標本量大的實驗室，clis出現故障，日常工作將受到嚴重的影響，甚至停止。clis是以支持實驗室日常工作、管理決策、科研等為目標的信息收集、處理、存儲、傳播和應用的系統，由信息系統和管理系統兩部分組成。信息系統以實驗室標本檢測全過程中產生的數據管理為主，管理系統以實驗室的經濟、物資、人事、科研等管理決策為主。本系統總結了課題研制開發(fā)醫(yī)院檢驗科信息管理系統的設計思路與實現方法，主要內容包括

2、：1.開發(fā)背景、目的與意義；2.軟件系統的功能和用戶界面設計；3.數據庫設計與管理；4.主要設計；5.預期結果；6.設計總結。課題研制開發(fā)的管理系統界面采用delphi 7.0設計，數據庫管理采用cach數據庫，并且利用 sql語句實現查詢和統計，并以printer對象和quick report設計器實現報表打印。整個管理系統功能全面、界面美觀、數據庫運行穩(wěn)定，基本實現了臨床實驗室管理常用管理功能，達到了當初設計的要求。關鍵詞:lis，檢驗科信息系統，cachclinical laboratory information systemabstractfollowing the informat

3、ion technology development,clinical laboratory information system already became one of laboratory most important constituents. especially the laboratory with high automaticity, big specimen quantity. clis presents the breakdown, the routine work will come under the serious influence, even stops. cl

4、is is take supports the laboratory routine work, the management decision, the scientific research and so on as the goal collection of information, processing, the memory, the dissemination and the application system, is composed of the information system and the management system management system t

5、wo parts. the information system examines the data management which by the laboratory specimen in the entire process produces primarily, the management system management system by management decisions and so on laboratory economy, commodity, human affairs, scientific research primarily.the system su

6、mmarizes the research and development topics hospital laboratory information management system design and implementation, main contents include:1. development background, purpose and significance; 2. software system functionality and user interface design; 3. database design and management; 4. main

7、design; 5. expected results; 6. design summary. development of the issue management system using delphi 7.0 interface design, cach database management using database, and use sql query and statistics, and printer objects, and quick report designer print achieve statements. entire management system f

8、ully functional, beautiful interface, database operation stability, basically achieved in the management of clinical laboratory management functions commonly used to achieve the original design. keywords: lis, laboratory information systems, cach iii目 錄摘要iabstractii1 前言11.1 研究背景、現狀11.2 目的、意義21.3 主要內

9、容22 軟件系統的功能及用戶界面設計42.1 功能模塊及系統設計42.2 用戶界面設計43 數據庫的設計與管理63.1 數據庫及開發(fā)語言的選擇63.1.1 開發(fā)語言的選擇63.1.2 數據庫的選擇73.2 數據庫的建立83.3 數據庫的設計思路及結構83.4 數據庫查詢143.5 ado概述144 詳細設計154.1 系統項目文件154.2主控制平臺的界面效果174.3 用戶登陸174.4 基本資料錄入模塊194.5 用戶管理214.5.1 權限管理214.5.2 添加用戶214.5.3 修改密碼234.6 查詢244.7 檢驗模塊264.7.1 血常規(guī)設置264.7.2 檢驗數據的手動錄入2

10、84.8 聯機模式304.8.1 rs-232接口的基本原理304.8.2檢驗結果自動化數據實時采集314.9報表324.9.1 報表的類型及選擇324.9.2 打印報表的實現345 預期結果365.1 軟件的優(yōu)點365.2 經濟效益預測366 總結與展望37致 謝39參 考 文 獻40 39臨床實驗室信息系統1 前言1.1 研究背景、現狀 隨著醫(yī)院信息化進程的推進，各級醫(yī)院在門診、住院、病房、藥房等各部門的信化已經有了長足的進展。醫(yī)院檢驗科作為醫(yī)院的一個重要部門，在疾病的診斷和治療過程中起著重要的作用，其自動化水平體現和制約著醫(yī)院整體水平的發(fā)展。甚至可以說現代醫(yī)學，特別是循證醫(yī)學的發(fā)展在很大

11、程度上依賴和取決于實驗室醫(yī)學的發(fā)展。衡量一個醫(yī)院整體水平的高低，很重要的一方面是看這個醫(yī)院的實驗室檢測項目的數量、質量及其所采用的檢測技術手段。隨著科學技術和現代醫(yī)學的發(fā)展，以及實驗室醫(yī)學本身的進步、實驗方法的不斷更新和拓展，檢驗科在臨床診治中的地位愈發(fā)重要。實現計算機自動化的醫(yī)院信息系統是醫(yī)院現代化的標志之一，對于提高醫(yī)院管理水平、改善醫(yī)療服務質量，加速臨床醫(yī)學研究步伐都有巨大的效益和深遠的影響。在我國，醫(yī)院管理信息系統的應用，始于20世紀80年代。為了管理和引導醫(yī)院軟件的開發(fā)，衛(wèi)生部設立了專門的管理機構衛(wèi)生部信息化領導小組，并制定了醫(yī)院管理信息系統評審規(guī)范。 檢驗科管理的信息化是醫(yī)院管理信

12、息系統的一個組成部分，將lis(laboratory information system)系統嵌入his(hospital information system)，檢驗信息資源才能得到更充分的利用。實驗室信息管理系統，是結合臨床檢驗科日常工作的需求，按實驗室的工作流程設計，將實驗室各項工作集合到一起，集分析檢測、質量控制及實驗室綜合管理一體化、模塊化、開放化的信息平臺，實現儀器檢測與醫(yī)療信息自動化、智能化的實驗室管理應用軟件系統。lis在與 his融合后其主要功能是將檢驗數據分析后生成檢驗報告，通過網絡存儲在網絡數據庫中供臨床醫(yī)生調用。為全面實現醫(yī)院管理的信息化，作為醫(yī)院的重要信息產生部門，

13、檢驗科的信息化工作勢在必行。 現代檢驗醫(yī)學的進步很大程度上體現于檢驗科自動化程度的提高。隨著各種先進的自動化檢驗儀器相繼進入臨床，在取代了以前的手工操作、提高了檢驗效率和質量的同時，也為實現檢驗科的信息化管理提供了必要的物質基礎。計算機信息管理技術的應用，除了能在相當大的程度上代替人工作業(yè)、減少人員工作量和工作中因為人為原因而產生的錯誤外，更重要的是能建立準確、暢通的信息流通渠道，為臨床工作提供準確、及時的信息以幫助臨床醫(yī)生做出正確、及時的診療決定。 國外lis的發(fā)展到目前為止經歷了三個階段，第一階段為20世紀 80年代，第二階段為20世紀90年代中期，目前處于第三階段。其技術特點如下：基于瀏

14、覽器/服務器的三層結構體系，硬件平臺：pc機、小型機、按 intemet/intranet和web原理構建局域網，操作系統有unix, windons9.x/2000, windows nt。數據庫采用access, sql, oracle等，并能動態(tài)訪問。如starlims, labsystem, beckman于 1998、1999年成功地推出了三層結構的商品化 lis，它凝結了信息技術的創(chuàng)新成果，代表了當前l(fā)is的發(fā)展方向。它的優(yōu)點是客戶機都使用了統一的瀏覽器(ie,netscape)，業(yè)務邏輯共用性好，安全可靠、開放性好、信息共享性好。目前向著internet/intranet和 we

15、b技術發(fā)展，它已跳出了單獨的實驗室運行環(huán)境，打破了地區(qū)和時空界限，實現遠程樣品登錄、訪問、遠程信息交換。雖然國外 lis生產商具有比較高的技術水平，但是在將 lis與實驗室儀器和其它硬件產品完全融合，實現實驗室的完全自動化控制等方面仍然有不少需要解決的問題。同時由于國外lis產品不能很好的漢化，針對中文系統有不少技術問題沒有解決，不適于國內臨床實驗室的模式，為實驗室量身定做的解決方案又十分昂貴，加上其它服務實施費用也同樣昂貴，國內多數臨床實驗室難以負擔。所以開發(fā)自主的同時又符合中國國情的lis系統是迫切需要的。1.2 目的、意義 隨著醫(yī)療保險制度的實施和醫(yī)療行為的市場化，要求對醫(yī)院的管理完全實

16、現自動化、規(guī)范化和信息化。同時現代化醫(yī)院的發(fā)展方向要求改變傳統的工作方式，把病人信息充分共享、實施無紙化醫(yī)療。這樣既可以縮短診治時間又可以減少醫(yī)院感染的機會。而lis作為醫(yī)院信息系統的一個重要分支，其重要性不言而喻。基于我國大部分臨床檢驗科的管理現狀，以及在工作中使用過的部分lis系統時發(fā)現的部分問題，為克服大多數實驗室先進的檢測儀器與落后的實驗室管理之間的矛盾，加速實現實驗室管理的自動化進程，滿足臨床實驗室的管理與業(yè)務發(fā)展需要，如何實現實用、方便、安全、穩(wěn)定的實驗室管理顯得尤為重要，而開發(fā)相應的管理系統也成為醫(yī)院信息化建設的重要課題之一。希望本課題的成果可以積累更多的相關經驗和資料，以便在以

17、后的工作中為lis及his的發(fā)展提供一些有價值的參考意見，起到拋磚引玉的作用。1.3 主要內容 本研究課題按照臨床實驗室的管理、應用要求，以滿足檢驗科日常工作與管理需求為目的，通過反復實驗和思索，建立了一套實用、方便、安全、穩(wěn)定的實驗室管理系統。課題研究的主要內容包括： 1.設計交互式圖形中文用戶界面?？紤]到大多數檢驗科用戶對計算機的認知和使用能力有限，所以力求操作界面實用、方便，使用戶能通過鍵盤、鼠標和顯示器等計算機外部設備來控制和管理檢驗數據，宗旨是建立 “傻瓜式”的操作界面1。 2.設計結構合理、安全可靠的數據庫存儲和管理系統。由于lis的主要功能就是處理數據，包括檢驗數據的產生、存儲、

18、更新、備份等一系列過程；檢驗數據的正確與否關系到病人的健康甚至生命安全，所以數據庫的安全可靠至關重要。在數據的存儲、傳輸過程中要求有合理、安全的渠道和保障。 3.設計實用、有效的數據查詢系統。保存、傳輸檢驗數據的根本目的是為了在需要的時候重新獲取數據，因此建立有效的數據查詢渠道是相當有必要的。查詢條件的輸入方式和結果的準確性是體現軟件系統方便實用的一個重要衡量標準。4.設計美觀、詳細、結構合理的打印報告。實驗室檢測的結果最終需要報告給患者和臨床醫(yī)生，以達到輔助診療的目的。所以，報告的打印是管理系統的輸出項目，要求 做到結構合理、準確、美觀。2 軟件系統的功能及用戶界面設計2.1 功能模塊及系統

19、設計 本軟件系統的功能模塊包括病人資料錄入、接收數據、報告查詢、報告打印、用戶管理、數據備份、數據更新等。其相互關系如圖2-1所示：檢驗儀器修改密碼添加用戶聯機模式報告打印病人資料錄入病人信息查詢數據庫數據庫備份數據庫更新rs-232用戶管理圖2-1 實驗室管理系統功能模塊關系圖所有模塊都以數據庫為核心，其中資料輸入和接收數據、以及系統設定是對數據庫的寫入操作，而報告的查詢和打印是通過用戶界面對數據庫進行讀出操作。2.2 用戶界面設計用戶界面是以用戶使用方便和設計的科學性為根本原則，吸收和積累了部分較成功的lis系統的開發(fā)經驗，以windows的標準界面為準則做出的設計。1.用戶登陸：用戶登陸

20、界面包括啟動界面和登陸界面便于審核用戶的合法信息，維護系統安全。2.系統:1) 修改密碼：以防用戶密碼泄漏，檢驗員可以改變密碼。2) 添加用戶: 便于檢驗員人員管理調用。3) 系統備份：便于數據庫系統數據管理安全。4) 系統還原：便于數據庫系統。3.資料錄入：用于錄入病人的基本信息并能夠和his信息系統實現無縫連接便于整個醫(yī)院信息系統的管理。4.檢驗：1) 檢驗項目的設置：用于設置不同檢驗項目，不僅包括檢驗標本不同的設置而且還包括標本內部檢驗項目的設置。2) 檢驗項目的錄入：用于錄入不同項目的數據。5.查詢：對病人的基本信息和檢驗歷史紀錄進行查詢操作，選擇相應的查詢條件，包括門診號、檢驗編號、

21、姓名等。6.聯機模式：選擇系統聯機設置，包括兩個串口的設置，串口述、波特率、檢驗方式、數據位、停止位等，根據不同的聯機儀器來設置。7.關于：用于介紹本系統的用戶操作規(guī)范，并介紹本系統的基本功能實現。3 數據庫的設計與管理3.1 數據庫及開發(fā)語言的選擇3.1.1 開發(fā)語言的選擇目前，開發(fā)c/s應用程序的可視化工具較多，最常用的如powerbuilder, visual basic(vb), visual foxpro等。delphi是borland公司開發(fā)的面向對象的可視化軟件開發(fā)工具系統。delphi發(fā)展到現在已經歷了7代產品的歷程。它具有強大的功能、運行速度快、易于使用及開發(fā)迅速等特點。而且

22、它結合了可視化技術、面向對象編程、數據庫和分布式應用技術等先進的軟件編程技術和思想，并使用了全特征的代碼編程器和高速度的編譯器及高級而獨特的集成開發(fā)環(huán)境。delphi憑借這些特點使其在所用的應用軟件開發(fā)工具之中成為倍受程序員青睞的焦點。delphi 7并不是計算機語言，而是一個基于對象pascal語言的windows應用程序開發(fā)工具系統。delphi提供的只是一個應用程序框架，而這個程序框架就是一個已經完成的可運行的應用程序，只是不處理任何事情。程序員需要做的就是在程序中加入完成所需功能的代碼而已，開發(fā)過程簡便、易學。其突出的特點表現在下列幾個方面2。1) 可視化的開發(fā)環(huán)境的(ide)特性bo

23、rland把可視化開發(fā)的概念發(fā)揮的淋漓盡致，delphi則是其突出的體現。通常，windows程序的可視化開發(fā)環(huán)境分為三個組成部分：編輯器、調試器和窗體設計器。這三部分是協同工作的，當程序員在窗體設計器中工作時，delphi可以在后臺自動為正在窗體中操作的控件及事件生成代碼，這就是所謂的code complete技術?？梢宰约涸诰庉嬈髦屑尤氪a來定義應用程序的行為，同時還可以在同一編輯器中通過設置斷點和監(jiān)控點來調試程序。2) 編譯器的速度和已編譯代碼的執(zhí)行效率快速的編譯器可以提高運行效率，節(jié)約運行時間，其優(yōu)越性是顯而易見的。delphi的編譯器最著名的特點就是速度快，從pascal時代就是如此

24、。microsoft visual c+的編譯器就比delphi的編譯器速度慢了許多。3) 編譯語言的功能及復雜性delphi是集強大性和易用性于一身的一個開發(fā)平臺。delphi的語言基礎是object pascal，它很好的把握了復雜性和功能性的平衡。使用delphi，可以很容易的開發(fā)出功能強大的windows應用程序，而且object pascal可以在最大程度上保證程序的嚴謹性。4) 強大的數據庫支持功能delphi具有所有工具中最靈活的數據庫結構，對大多數基于數據庫平臺的應用程序來說，bde(borland database engineer)的功能都足夠強大，程序設計人員無需直接同數

25、據庫文件打交道，就可以操作和處理各個數據庫文件。5) 靈活的vcl(visual component library)組件vcl是delphi最重要的組成部分。在設計時添加/刪除組件、自定義組件、使用面向對象技術繼承其他組件的行為，這些能力都是決定delphi效率的關鍵因素。3.1.2 數據庫的選擇提起數據庫軟件，人們想到的是關系數據庫(relational-database-management)和 ibm(db2、informix)、microsoft、oracle(甲骨文)、sybase等廠商。很少有人聽說過cach、post-relational-database-management

26、(后關系數據庫/面向對象的數據庫)、inter systems公司。這主要是因為cach和inter-systems才剛剛進入中國市場 。 美國的inter systems公司是全球唯一擁有后關系數據庫科技，并在商業(yè)上獲得成功的公司。在短短的五年內就占領了美國嵌入式數據庫23%的市場。(比較：關系數據庫的四大供應商則花了30年的時間才取得近70%的市場)。公司在醫(yī)療行業(yè)的數據庫解決方案被公認為是國際醫(yī)療衛(wèi)生數字化的標準解決方案，運用于五大洲十七個國家的大型醫(yī)院和衛(wèi)生系統。inter systems是世界醫(yī)療衛(wèi)生數字化數據庫軟件最大的供應商。世界最大的50家銀行有約30%采用cach科技管理資產

27、和證券交易。荷蘭和比利時近一半的圖書館采用cach科技作為數據庫。取得這個成就，是因為公司的核心科cach有加快研發(fā)時間(快1/3的時間)，減少營運護理成本(-30%到70%)，提高讀取數據速度(快7-20倍)，適合處理大型復雜數據的優(yōu)點。公司的產品還用于機械、通訊、旅店、政府、物流、零售等行業(yè)。日本ntt docomo，vodafone，at&t，丹麥電信，愛爾蘭電信，戴姆勒(奔馳)-克萊斯勒集團、科達、飛利浦、殼牌石油都不同程度地采用了cach 數據庫。 cach是一種后關系型數據庫。之所以叫做后關系型數據庫，是因為cach不僅支持面向對象的數據庫的訪問和存儲的方式，而且支持傳統的關系型數

28、據庫的訪問方式。 cach是一種兼容性非常強的數據庫。支持現在流行的多種操作系統和服務器平臺。目前大家常用的開發(fā)語言都可以在cach上面進行開發(fā)。大家可以通過odbc、jdbc等傳統的方式進行高效率的訪問，也可以把邏輯封裝在數據庫的對象里，得到更高效率的訪問。cach也不僅僅是一個數據庫。他有很多現在其他的主流數據庫不具備的功能。cach自帶了一個網絡服務器。一般的開發(fā)用戶，數量少，在安裝了cach以后，沒有安裝網絡服務器的話，也可以使用cach的服務器進行網絡軟件的開發(fā)；而且cach的這個服務器網關也為您提供了更好的數據安全性。另外，cach有一個工具叫csp。這是一個類似jsp等等網絡開發(fā)

29、的工具。在csp上進行網絡開發(fā)，可以得到更多的安全性和更高的效率。 3.2 數據庫的建立下面開始新建數據庫： 在windows中，選擇立方體-configuration manager，打開配置管理器(configuration manager)； 以后我們可以通過配置管理器添加/刪除數據庫文件； 在配置管理器中，選擇 database 標簽，進入 數據庫(databases)頁面； 我們在數據庫頁面中可以看到系統中所有的數據庫文件； 在數據庫頁面中，選擇 add按鈕，彈出數據庫向導(database wizard)； 我們將通過數據庫向導一步步創(chuàng)建數據庫； 第一步：輸入數據庫名稱：我們在da

30、tabase欄中輸入數據庫名稱“hospital”，按next； 第二步：選擇數據庫所在的目錄：選擇目錄“c:hospital”，按next； 第三步：使用默認值即可，按finish完成； 此時我們在數據庫頁面中可以看到新增的數據庫hospital； 我們必須更新cach以使剛才的操作生效： 在配置管理器中，按ok鍵確認， 此時有對話框彈出詢問是否更新(activate)，選擇activate即可。在配置管理器中所作的修改都需要最后按ok鍵確認，否則不會生效。按ok鍵之后，有的更新不需要重新啟動cach(稱為activate，像創(chuàng)建數據庫這樣的操作)，有的則需要重新啟動(稱為restart)。

31、3.3 數據庫的設計思路及結構數據庫的設計是以病人的資料與檢驗信息為中心的，其基本結構是按照其使用界面和功能安排的，整個數據庫一共包括登陸信息、標本類型、病人基本信息、科室分類、醫(yī)生信息、病人檢驗信息等六個表，分別包含相應的數據庫內容，并按照一些索引建立關系。又基于cach和其他數據庫完全兼容，如果在其他數據庫開發(fā)的應用軟件可以不花大的力氣從其他數據庫搬到cach數據庫上運作，我對cach數據庫的操作不夠熟練性所以選擇了捷徑的方式。先在sql 上建立數據庫再平行數據遷移到cach上。遷移的方式和步驟如下：1. 數據表結構的遷移過程： 1) 先配置一個odbc.odbc的名稱可以隨便命名。 如果

32、是用sql server 等往外導，就建立一個cach的odbc。 見下圖：圖3-1 cachodbc數據源2) cach odbc 數據源建立cach odbc 數據源 圖3-2 數據源的建立圖3-3 建立好的數據源2存儲過程的改寫。 存儲過程在遷移的時候是需要改寫的。因為，一般的數據庫的存儲過程都有自己的一套語法和架構，就算傳統的關系型數據庫之間的數據遷移也是需要改寫存儲過程的。 下面我寫一段代碼，可以在sql manager里面的execute query里面執(zhí)行的代碼，他將create一個存儲過程。(execute query在sql manager 里面選擇一張表table然后在右邊

33、最后一個頁簽就是了，如圖3-4所示)。3-4 存儲過程改寫過程代碼： create procedure storedproc.sp(in stype var char(1), inout sname varchar(50), out ssex varchar(1) returns int language objectscript &sql(declare x cursor for select name,sex,dob into :name,:sex,:dobfrom storedproc.sp1 where type = :stype and name %startswith :sname

34、) &sql(open x) set count=0 for &sql(fetch x) if sqlcode=100 quit set count=count+1 if count=1 set sname=name,ssex=sex &sql(close x) if count=0 set sname=not found,ssex= quit count 上面的代碼的目的是說明我們的語法和一個簡單的結構。 language objectscript是說明了存儲過程的語言是利用cach objectscript編寫的，&sql()這個是說明里面的語句是sql語句。3數據表結構根據本系統的要求我

35、設計了六個表結構以為系統所用。所以它是以病人的基本資料和檢驗信息為中心的，其基本結構是按照其使用界面和功能需求安排的，在本系統中涉及了六個表：登陸表、病人基本信息表、科室表、醫(yī)生基本信息表、標本類型表和檢驗信息表。如下各表所示：(1) 登陸信息表(表名稱標識：login)表3-1 檢驗醫(yī)師登陸信息表字段名字段類型字段長度是否為空是否為主鍵usernamechar10noyespwdchar10nonorightint4nono(2) 科室信息表(表名稱標識：office)表3-2 科室分類表字段名字段類型字段長度是否為空是否為主鍵off_nochar10noyesoff_namechar10n

36、ono (3) 醫(yī)生信息表(表名稱標識：doctor)表3-3 醫(yī)生信息表字段名字段類型字段長度是否為空是否為主鍵doc_nochar10noyesdoc_namechar20nonooff_nochar10nono (4) 病人基本信息表(表名稱標識：patient) 表3-4 病人基本信息表字段名字段類型字段長度是否為空是否為主鍵n1char10noyesnumchar20noyesnamechar20nonoageint4nonosexchar10nonopa_nochar10yesnoofficechar10nonodoctorchar20nonopa_typechar20nonote

37、lchar20yesnoaddchar30yesnosong_datedatetime8nonoexam_datedatetime8nonob_typechar10nonooperatorchar20nonolinzhenchar50yesnobeizhuchar50yesno(5) 標本類型表(表名稱標識：btype)表3-5 標本信息表字段名稱字段類型字段長度是否為空是否為主鍵b_typechar10noyesb_namechar20nono(6) 檢驗信息表(表名稱標識：exam_data)表3-6 檢驗信息表字段名字段類型字段長度是否為空是否為主健n1char10noyesnumcha

38、r20noyesp_codechar10nonop_namechar20nonosong_datedatetime8nonoexam_datedatetime8nonooperatorchar20nono3.4 數據庫查詢 我們采用直接調用sql語句的方式。該新功能將從雇員(employee)所在公司名稱和person本人或配偶的家庭住址郵編查找到可能的person：通過輸入公司名稱的片斷信息(如 “int”)，以及郵編片斷信息(如 “10”),程序將會自動匹配出符合的名單供選擇。匹配過程中執(zhí)行了相應的sql 語句。 employee 為person 的繼承類(可以查看該類的類定義信息)。em

39、ployee在person 基礎上添加了一些屬性，其中包括聯系屬性company (類似于引用屬性spouse)，該屬性指向了company類型的持久類實例。在新安裝的cach上，id號碼為101-200的person 實例是employee類型的。之前，我們一直把它們當作person實例來引用，這是符合面向對象的原則的。下面，為類tform_main添加一個私有方法聲明，名為updatenamelist2，功能和updatenamelist相似。它將用來從ed_key_company和ed_key_zip中的信息匹配出符合的名單；代碼如下：procedure updateaddress;pr

40、ocedure updatenamelist;procedure updatenamelist2;public在updatenamelist2 的實現部分輸入以下代碼：procedure tform_main.updatenamelist2;3.5 ado概述本系統是通過對象模型ado(activex data objects)來訪問數據庫的，ado使我們能夠編寫程序，以通過ole.db提供者訪問和操作數據庫服務器中的數據。ado最主要的優(yōu)點是易于使用、速度快、內存支出少和磁盤遺跡小。ado支持建立客戶端/服務器端和基于web的應用程序的關鍵功能。ado的另一個功能是“遠程數據訪問”(rds)

41、，能夠通過一個來回的傳輸將數據從服務器移動到客戶端應用程序或web頁中，然后在客戶端對數據進行操作，最后將更新數據返回服務器。ado對象模型是由八個對象組成的，它們中的大多數在功能上和rdo對象相似，只不過具有更強的功能性。下面介紹ado的幾個主要對象：1)command對象。包含關于某個命令，例如查詢字符串、參數定義等的信息。command對象在功能上和rdo的rdoquery對象是相似的。2)connection對象。包含關于某個數據提供程序的信息。connection對象在功能上和rdo的rdoconnection對象是相似的，并且包含了關于結構描述的信息。它還包含某些rdoenviro

42、nment對象的功能，例如transaction控件。3)recordset對象。recordset對象包含某個查詢返回的記錄，以及那些記錄中的游標。recordset對象在功能上和rdo的rdoresult對象相似。你可以在不用顯式地打開connection對象的情況下，打開一個recordset(例如，執(zhí)行一個查詢)。不過，如果你選擇創(chuàng)建一個connection對象，你就可以在同一個連接上打開多個recordset對象。4)parameter對象。包含參數化的command對象的某個參數的信息。該command對象有一個包含其所有parameter對象的parameters集合。param

43、eter對象在功能上和rdo的rdoparameter對象是相似的。ado的目標是訪問、編輯和更新數據源，而編程模型體現了為了完成該目標所必需的系列動作的順序。ado提供類和對象以完成以下活動：連接到數據源(connection)?？蛇x擇開始一個事物。1) 可選擇創(chuàng)建對象來表示sql命令(command)。2) 可選擇在sql命令中指定列、表和值作為變量參數(parameter)。3) 執(zhí)行命令(command、connection或recordset)。4) 如果命令執(zhí)行返回，則將行存儲在緩存中(recordset)。5) 可選擇創(chuàng)建緩存視圖，以便能對數據進行排序、篩選和定位(records

44、et)。6) 通過添加、刪除或更改行和列編輯數據(recordset)。7) 在適當情況下，使用緩存中更改內容來更改數據源(recordset)。8) 在使用事物之后，可以接受或拒絕在事物期間所作的更改，結束事物 (connection)。4 詳細設計4.1 系統項目文件根據已有的需求信息和總體設計，可以進行系統的詳細設計和實現。為此，我要建立一個delphi工程。系統的實際和實現如下：program project2;uses forms, unit1 in unit1.pas login, unit2 in unit2.pas zhujm, xiugaimi in xiugaimi.pas

45、 xgmm, unit4 in unit4.pas jbzllrjm, unit5 in unit5.pas xcgjm, unit6 in unit6.pas addclient, unit8 in unit8.pas chaxun1, unit9 in unit9.pas chaxun2, unit3 in unit3.pas jylr, tuichu7 in tuichu7.pas form7, unit10 in unit10.pas form10, unitpaintrep in unitpaintrep.pas form11, unit12 in unit12.pas form12

46、, unit13 in unit13.pas form13, main in unit 14 .pas lianji;$r *.resbegin application.initialize; form10:=tform10.create(form10); form10.show; form10.update; sleep(1000); form10.close; form10.free; application.createform(tlogin, login); application.createform(tzhujm, zhujm); application.createform(tj

47、bzllrjm, jbzllrjm); application.createform(txcgjm, xcgjm); application.createform(txgmm, xgmm); application.createform(taddclient, addclient); application.createform(tjbzllrjm, jbzllrjm); application.createform(txcgjm, xcgjm); application.createform(taddclient, addclient); application.createform(tch

48、axun1, chaxun1); application.createform(tchaxun2, chaxun2); application.createform(tchaxun1, chaxun1); application.createform(tjylr, jylr); application.createform(tform7, form7); application.createform(tform12, form12); application.createform(tform10, form10); application.createform(tform11, form11)

49、; application.createform(tform13, form13); application.createform(tfrmmain, frmmain); application.run;end.4.2主控制平臺的界面效果主控界面直觀易懂如下圖所示：圖3-1 主控制平臺4.3 用戶登陸1) 用戶身份驗證ipo圖輸入：用戶名和密碼。處理：a) 用戶登錄窗體啟動。b) 從操作人員中讀取操作人員的名稱信息，并寫入用戶名下拉框中，以方便登錄。c) 用戶選擇用戶名并輸入密碼。d) 從操作員表中檢查是否有相應的用戶名和密碼。e) 如果用戶名或密碼錯誤，進行提示。f) 進入主控制平臺。輸出:

50、主控制平臺。2) 用戶登錄模塊的窗體設計用戶登錄模塊的窗體效果如圖4-2所示。圖4-2 登陸界面3) 用戶登錄模塊的主要代碼(unit1.pas)procedure tlogin.button1click(sender: tobject);begin if edit1.text= then begin showmessage(請輸入用戶名！); edit1.setfocus; exit; end; if edit2.text= then begin showmessage(請輸入密碼！); edit2.setfocus; exit; end; adoquery1.close; adoquery

51、1.sql.clear; adoquery1.sql.add(select * from lis.login where username=:m and pwd=:n); adoquery1.parameters.parambyname(m).value:=edit1.text; adoquery1.parameters.parambyname(n).value:=edit2.text; adoquery1.open; if adoquery1.recordcount0 then begin zhujm.show; login.hide; end else showmessage(用戶名或密碼

52、錯誤請重新輸入！);end;4.4 基本資料錄入模塊1) 錄入窗口自動生成檢驗編碼，由病人門診號作為預約檢驗審核，其他基本信息由醫(yī)院數據庫自動調入或者現場錄入由于本系統限制，只能由檢驗醫(yī)師手動錄入。2) 保存過程有很多必須信息需要錄入有條件限制。3) 繼續(xù)添加選項，先確定是否繼續(xù)添加。確定繼續(xù)添加清空各個欄目內容，生成新的檢驗編碼，繼續(xù)錄入。4) 刪除紀錄只需輸入檢驗編碼，便可刪除整條紀錄。5) 打印選項可以打印數據庫中的數據表以供醫(yī)院信息存檔。6) 具體實現界面如下圖所示：圖4-3 基本資料錄入窗口7) 主要代碼如下：procedure tjbzllrjm.button2click(send

53、er: tobject); begin adoquery1.close; adoquery1.sql.clear; adoquery1.sql.add(insert into lis.patient values(:x,:a,:b,:c,:d,:e,:f,:g,:h,:i,:j,:k,:l,:m,:n,:y,:z); adoquery1.parameters.parambyname(x).value:=combobox8.text; adoquery1.parameters.parambyname(a).value:=label17.caption; adoquery1.parameters.parambyname(b).value:= trim(edit1.text); adoquery1.parameters.parambyname(c).value:= combobox3.text; adoquery1.parameters.parambyname(d).value:=edit3.text; adoquery1.parameters.parambyname(e).value:=combobox2.text; adoquery1.parameters.parambyname(f).value:=combobox4.text; ado