【正文】 ase Desktop(DBD) 建立、索引、查詢數(shù)據(jù)庫(kù)表以及訪問(wèn)、編輯來(lái)自各數(shù)據(jù)中的數(shù)據(jù)ReportSmith 建立、瀏覽和打印數(shù)據(jù)庫(kù)表中的數(shù)據(jù)Borland Database Engine(BDE) 數(shù)據(jù)庫(kù)應(yīng)用通過(guò)BDE訪問(wèn)dBASE Paradox數(shù)據(jù)庫(kù)中的數(shù)據(jù)和本地InterBase數(shù)據(jù)庫(kù)服務(wù)器中的數(shù)據(jù)BDE Configuration Utility 建立和管理BDE與數(shù)據(jù)庫(kù)建立連接時(shí)所使用的數(shù)據(jù)庫(kù)別名Local InterBase Server 是一個(gè)單用戶、多例程的本地SQL數(shù)據(jù)庫(kù)服務(wù)器，可在單機(jī)環(huán)境下用來(lái)開(kāi)發(fā)或測(cè)試客戶/服務(wù)器數(shù)據(jù)庫(kù)應(yīng)用程序，然后再將之?dāng)U展成一個(gè)訪問(wèn)遠(yuǎn)程數(shù)據(jù)庫(kù)服務(wù)器如ORACLE、SyBase、Informix等InterBase SQL Link 連接Delphi數(shù)據(jù)庫(kù)應(yīng)用程序一本地InterBase服務(wù)器的驅(qū)動(dòng)程序Delphi上述這些特性使得創(chuàng)建數(shù)據(jù)庫(kù)應(yīng)用程序通過(guò)BDE能夠很靈活地與dBASE、Paradox、Local InterBase數(shù)據(jù)庫(kù)服務(wù)器進(jìn)行連接并可以方便地訪問(wèn)其中的數(shù)據(jù)。數(shù)據(jù)庫(kù)對(duì)象的數(shù)據(jù)成員即可在設(shè)計(jì)階段設(shè)置，也可在運(yùn)行階段通過(guò)程序代碼進(jìn)行設(shè)置。Delphi 的客戶/服務(wù)器版本包括Borland SQL Link，它能直接訪問(wèn)ORACLE、SyBase和Microsoft SQL Server，Informix以及InterBase數(shù)據(jù)庫(kù)服務(wù)器。而Delphi結(jié)合了兩個(gè)體系的優(yōu)點(diǎn)，它結(jié)合了傳統(tǒng)的編程語(yǔ)言O(shè)bject Pascal和數(shù)據(jù)庫(kù)語(yǔ)言的強(qiáng)大功能，它即可以用于傳統(tǒng)的算術(shù)編程又可以用于數(shù)據(jù)庫(kù)編程，特別是Delphi具有強(qiáng)大的數(shù)據(jù)庫(kù)功能，利用Delphi的數(shù)據(jù)庫(kù)工具，用戶根本不需要編寫(xiě)任何Object Pascal代碼便可以創(chuàng)建一個(gè)簡(jiǎn)單的數(shù)據(jù)庫(kù)應(yīng)用。另一個(gè)體系則是通用的數(shù)據(jù)庫(kù)管理軟件領(lǐng)域（數(shù)據(jù)庫(kù)應(yīng)用程序的開(kāi)發(fā)）。使用人事管理系統(tǒng)，便于公司領(lǐng)導(dǎo)掌握人員的動(dòng)向，及時(shí)調(diào)整人才的分配，以獲取最大的經(jīng)濟(jì)效益。數(shù)據(jù)庫(kù)應(yīng)用系統(tǒng)的開(kāi)發(fā)是Delphi程序設(shè)計(jì)的重要組成部分，在Delphi中創(chuàng)建數(shù)據(jù)庫(kù)程序，其過(guò)程和方法如同創(chuàng)建其他類型的Delphi應(yīng)用程序一樣簡(jiǎn)單、快捷。而Microsoft SQL Server 2000是一個(gè)面向二十一世紀(jì)的高性能的關(guān)系型數(shù)據(jù)庫(kù)管理系統(tǒng)。本文具體闡述了本應(yīng)用系統(tǒng)的開(kāi)發(fā)工具、開(kāi)發(fā)思想和開(kāi)發(fā)方法。這兩個(gè)體系的發(fā)展都極為迅猛，但是二者并沒(méi)出現(xiàn)混合滲透跡象。Delphi是Borland公司于1994年底發(fā)布的用于開(kāi)發(fā)數(shù)據(jù)庫(kù)應(yīng)用程序的工具，它是面向?qū)ο蟮?，它是目前開(kāi)發(fā)客戶/服務(wù)器數(shù)據(jù)庫(kù)應(yīng)用程序的強(qiáng)有力的工具。Delphi可以訪問(wèn)多種數(shù)據(jù)庫(kù)管理系統(tǒng)的數(shù)據(jù)庫(kù)，憑借窗體（Forms）和報(bào)表（Reports），BDE（Borland Database Engine）可以訪問(wèn)諸如Paradox、dBASE、本地InterBase服務(wù)器的數(shù)據(jù)庫(kù)，也可以訪問(wèn)遠(yuǎn)程數(shù)據(jù)庫(kù)服務(wù)器上的數(shù)據(jù)庫(kù)（如ORACLE、SyBase、Informix等可戶/服務(wù)器數(shù)據(jù)庫(kù)中的數(shù)據(jù)庫(kù)），或任何經(jīng)ODBC（Open Database Connecticity）可訪問(wèn)的數(shù)據(jù)庫(kù)管理系統(tǒng)中的數(shù)據(jù)庫(kù)。Delphi的部件板上提供了兩頁(yè)數(shù)據(jù)庫(kù)應(yīng)用程序開(kāi)發(fā)中所使用的部件：數(shù)據(jù)訪問(wèn)頁(yè)（Data Access Page）上的部件用于直接訪問(wèn)數(shù)據(jù)庫(kù)中的數(shù)據(jù)庫(kù)表。用戶在創(chuàng)建一個(gè)簡(jiǎn)單的數(shù)據(jù)庫(kù)應(yīng)用時(shí)通過(guò)使用Delphi提供的上述工具和部件甚至可以不許編寫(xiě)任何程序。 表12 Delphi可訪問(wèn)的數(shù)據(jù)源數(shù)據(jù)源（DataSource） 文件擴(kuò)展名 特性描述 dBASE數(shù)據(jù)庫(kù) .DBF 數(shù)據(jù)庫(kù)表是通過(guò)dBASE數(shù)據(jù)庫(kù)管理系統(tǒng)或DBD建立的，每個(gè)表是一個(gè)獨(dú)立的文件Paradox數(shù)據(jù)庫(kù) .DB 數(shù)據(jù)庫(kù)表是通過(guò)Paradox數(shù)據(jù)庫(kù)管理系統(tǒng)或DBD建立，每個(gè)表是一個(gè)獨(dú)立的文件ASCII文件 .TXT 表是通過(guò)Database Desktop建立的，每個(gè) 表是一個(gè)獨(dú)立的文件本地InterBase服務(wù)器 .GDB 數(shù)據(jù)庫(kù)是通過(guò)InterBase數(shù)據(jù)庫(kù)管理系統(tǒng)建立的，多個(gè)表包含在一個(gè)數(shù)據(jù)庫(kù)文件中SQL數(shù)據(jù)庫(kù)服務(wù)器： 依賴不同的數(shù) 數(shù)據(jù)庫(kù)是通過(guò)相應(yīng)的數(shù)據(jù)庫(kù)服務(wù)器提供的ORACLE，Sybase， 據(jù)庫(kù)管理系統(tǒng) 專用或通過(guò)工具建立的，也可以通過(guò)DBDInformix Microsoft 來(lái)創(chuàng)建數(shù)據(jù)庫(kù)，并通過(guò)SQL Link訪問(wèn)數(shù)SQL Server InterBase 據(jù)庫(kù)ODBC數(shù)據(jù)源 依賴于相應(yīng)的 主要是指那些具有ODBC接口的數(shù)據(jù)庫(kù)系 數(shù)據(jù)庫(kù) 統(tǒng)如MS Access，Btrieve等 數(shù)據(jù)訪問(wèn)部件數(shù)據(jù)訪問(wèn)組件頁(yè)上提供了一組數(shù)據(jù)訪問(wèn)組件用來(lái)訪問(wèn)數(shù)據(jù)庫(kù)中的數(shù)據(jù)。圖11 BDE頁(yè)上的數(shù)據(jù)訪問(wèn)組件1． Ttable部件Ttable構(gòu)件是Delphi中最基本、最靈活的數(shù)據(jù)集構(gòu)件。（2） 單擊Table圖標(biāo)。Active屬性設(shè)置為True時(shí)，表示打開(kāi)要訪問(wèn)的數(shù)據(jù)庫(kù)表；設(shè)置為False時(shí)，暫時(shí)不打開(kāi)要訪問(wèn)的數(shù)據(jù)庫(kù)表。Tquery部件是程序員使用SQL語(yǔ)言開(kāi)發(fā)數(shù)據(jù)庫(kù)應(yīng)用程序的有力工具，因?yàn)槭褂肧QL語(yǔ)言，可以非常方便靈活地對(duì)一個(gè)或多個(gè)數(shù)據(jù)庫(kù)表中的記錄進(jìn)行訪問(wèn)，所以利用Tquery可以查詢本地的數(shù)據(jù)庫(kù)如paradox和dBASE數(shù)據(jù)庫(kù)系統(tǒng)中的數(shù)據(jù)，還可以使用Tquery部件對(duì)一個(gè)遠(yuǎn)地的數(shù)據(jù)庫(kù)SQL服務(wù)器進(jìn)行訪問(wèn)，建立客戶/服務(wù)器模式的應(yīng)用程序。在Tquery部件中，不是用TableName屬性來(lái)指定要訪問(wèn)的數(shù)據(jù)庫(kù)中的數(shù)據(jù)庫(kù)表，而是在SQL屬性中，通過(guò)SQL語(yǔ)句來(lái)指定將要訪問(wèn)的數(shù)據(jù)庫(kù)表。 數(shù)據(jù)控制部件數(shù)據(jù)控制部件頁(yè)上的部件，主要用于設(shè)計(jì)用戶界面，對(duì)數(shù)據(jù)庫(kù)中的數(shù)據(jù)進(jìn)行瀏覽、編輯、插入、刪除等操作。表13列出了數(shù)據(jù)控制頁(yè)上的數(shù)據(jù)控制部件及它們的主要用途。在發(fā)布用Delphi開(kāi)發(fā)的數(shù)據(jù)庫(kù)程序時(shí)，除了要安裝應(yīng)用程序之外，還需要同時(shí)發(fā)布數(shù)據(jù)庫(kù)驅(qū)動(dòng)程序，以保證程序與數(shù)據(jù)庫(kù)能夠正確地連接。當(dāng)您在應(yīng)用程序中包括BDE單元的時(shí)候，你可以使用本地C/C++類型的API調(diào)用來(lái)直接管理數(shù)據(jù)庫(kù)。每一個(gè)廠商都可以創(chuàng)建DLL來(lái)實(shí)現(xiàn)同等的并與ODBC API兼容的API過(guò)程。這個(gè)應(yīng)用程序根據(jù)要實(shí)現(xiàn)的功能可分為四大部分：● 新員工資料的輸入；● 人事變動(dòng)的詳細(xì)記錄，包括崗位和部門的調(diào)整；● 員工信息的查詢，包括簡(jiǎn)單查詢（根據(jù)員工號(hào)）和模糊查詢；● 員工信息的修改； 系統(tǒng)功能模塊的設(shè)計(jì)人事管理系統(tǒng)用戶登錄模塊 系統(tǒng)管理員普通員工刪除員工信息 復(fù)雜查詢 簡(jiǎn)單查詢新員工檔案輸入 人事變更根據(jù)員工號(hào)查詢員工信息修改圖21 人事管理系統(tǒng)功能模塊圖具體各功能塊完成的任務(wù)如下：1) 用戶登錄功能塊首先利用用戶登錄功能塊實(shí)現(xiàn)對(duì)用戶的分類，普通員工和管理員，他們具有不同的權(quán)限，有不同的員工號(hào)和密碼。3） 人事變動(dòng)功能塊中，管理員要輸入具體的變動(dòng)信息，如記錄號(hào)、變動(dòng)時(shí)間、變動(dòng)原因等。在此基礎(chǔ)上可進(jìn)一步查詢，如還知道她屬于那一部門，這樣可進(jìn)一步縮小查詢范圍。 數(shù)據(jù)流程圖招聘新員工人事科員工信息員工辭退崗位調(diào)整分配員工號(hào)變動(dòng)記錄系統(tǒng)的數(shù)據(jù)流程圖如圖22所示，所有數(shù)據(jù)由人事科管理人員輸入。 歸 屬變動(dòng)員工 管 理圖23 人事管理系統(tǒng)ER圖再設(shè)置部門、職務(wù)、學(xué)歷、用戶權(quán)限、變動(dòng)原因的備選范圍分別為：（1） 部門：生產(chǎn)部、規(guī)劃部、人事部、銷售部、后勤部（2） 職務(wù)：小組成員、組長(zhǎng)、項(xiàng)目經(jīng)理、部門經(jīng)理、總經(jīng)理（3） 學(xué)歷：高中、中專、大專、大學(xué)本科、碩士、博士、博士后（4） 用戶權(quán)限：查詢、添加與修改（5） 變動(dòng)原因：新員工加入、職務(wù)變動(dòng)、辭退（6） 當(dāng)前狀態(tài)：?jiǎn)T工、非員工 數(shù)據(jù)庫(kù)邏輯設(shè)計(jì)根據(jù)系統(tǒng)ER圖，本系統(tǒng)需要有2個(gè)數(shù)據(jù)表分別來(lái)存放員工個(gè)人信息和人事變動(dòng)記錄。首先，讓我們了解一下Microsoft SQL Server 2000。客戶機(jī)應(yīng)用程序負(fù)責(zé)商業(yè)邏輯和向用戶提供數(shù)據(jù)，一般運(yùn)行在一個(gè)或多個(gè)客戶機(jī)上，也可以運(yùn)行在服務(wù)器上。SQL Server 2000可與Windows NT 的安全性系統(tǒng)集成、可支持多協(xié)議、作為NT的服務(wù)、利用NT的性能監(jiān)測(cè)器和使用Microsoft Index Server。SQL Server包括三個(gè)服務(wù)，既SQL Server, SQL Server Agent 和 Distributed Transaction Coordinator（MSDTC）服務(wù)。 創(chuàng)建數(shù)據(jù)庫(kù)創(chuàng)建數(shù)據(jù)庫(kù)的過(guò)程實(shí)際上就是為數(shù)據(jù)庫(kù)提供名稱、大小和所存放的數(shù)據(jù)庫(kù)文件的過(guò)程。數(shù)據(jù)庫(kù)的信息屬于系統(tǒng)級(jí)的信息，存貯在master數(shù)據(jù)庫(kù)的sysdatabases系統(tǒng)表中。創(chuàng)建數(shù)據(jù)庫(kù)需要一定的許可。在一個(gè)服務(wù)器中，最多能創(chuàng)建32767個(gè)數(shù)據(jù)庫(kù)。啟動(dòng)企業(yè)管理器，在左邊的目錄結(jié)構(gòu)中打開(kāi)指定的服務(wù)器組和服務(wù)器，選擇其中的數(shù)據(jù)庫(kù)文件夾。中間是該數(shù)據(jù)庫(kù)的狀態(tài)屬性，最下面是該數(shù)據(jù)庫(kù)的對(duì)照名，使用默認(rèn)值即可。用戶每次都要被檢查是否具有適當(dāng)?shù)脑L問(wèn)權(quán)。本文主要介紹創(chuàng)建SQL Server 2000 數(shù)據(jù)表的相關(guān)知識(shí)。l 在該節(jié)點(diǎn)上單擊鼠標(biāo)右鍵，在彈出菜單中選擇“新建表”命令（如圖31所示）；l 在操作菜單上選擇“操作/新建表”命令；l 單擊工具欄上的“新建”按鈕。例如，只有一個(gè)字段的數(shù)據(jù)類型為數(shù)值型時(shí)，才能設(shè)置小數(shù)位數(shù)屬性。 數(shù)據(jù)類型：指定該字段的數(shù)據(jù)類型。允許空：指定該字段在表中是否允許空值。默認(rèn)值：指定字段的默認(rèn)值。小數(shù)位數(shù)：顯示該列值小數(shù)點(diǎn)右邊能出現(xiàn)的最多數(shù)字個(gè)數(shù)。否——不設(shè)置該字段為表識(shí)字段。該選項(xiàng)只適用于其“標(biāo)識(shí)”屬性設(shè)置為“是”或“是（不適用于復(fù)制）”的字段，默認(rèn)值為1。當(dāng)插入點(diǎn)移動(dòng)到此字段時(shí)，可以單擊按鈕更改排序規(guī)則。方法是單擊工具欄上的“保存”按鈕，然后在“選擇名稱”對(duì)話框中輸入表名，單擊“確定”即可。ODBC可以用來(lái)訪問(wèn)不同平臺(tái)上的數(shù)據(jù)庫(kù)，例如SQL Server、Oracle或者DB2。其過(guò)程如下：在Windows 2000的管理工具中找到ODBC數(shù)據(jù)源管理器，雙擊該圖表，則顯示一個(gè)如圖36所示的窗口。這里，我們選擇SQL Server，單擊完成按鈕，則轉(zhuǎn)向下一對(duì)話框，它是與你選擇的驅(qū)動(dòng)程序相關(guān)的。設(shè)置默認(rèn)數(shù)據(jù)庫(kù)為“renshi”,其余選項(xiàng)采用默認(rèn)設(shè)置，單擊“下一步”按鈕，在出現(xiàn)的新窗口中繼續(xù)采用默認(rèn)設(shè)置。 圖 37 ODBC SQL Server DSN配置對(duì)話框至此，就建立了一個(gè)名為“renshi”的SQL Server ODBC數(shù)據(jù)源，可以在應(yīng)用程序中使用它了。在“File”菜單中選擇“New Application”選項(xiàng)，系統(tǒng)將創(chuàng)建一個(gè)名為Project1的新工程。主菜單控件對(duì)象在設(shè)計(jì)期窗體上顯示為正方型的區(qū)塊，對(duì)象名為“MainMenu”，雙擊這個(gè)對(duì)象即彈出菜單設(shè)計(jì)窗口?！狈?hào)后的第一個(gè)字符稱為加速字符。S 系統(tǒng) C1 Caption amp。M人事管理 A1 Caption amp。E根據(jù)員工號(hào)查詢 D2 Caption amp。H幫助 A2 Caption amp。選定Image控件，單擊對(duì)象編輯器中的Picture屬性行擴(kuò)展符號(hào)按鈕，打開(kāi)對(duì)話框，單擊load按鈕，選擇圖形文件。也可以通過(guò)調(diào)用過(guò)程：procedure LoadFromFile(const FileName: string)。 圖41 人事管理系統(tǒng)主窗口 添加代碼主窗體需要調(diào)用其他各窗體，因此uses子句中需包含以下項(xiàng)目login,add,change,isearch,dsearch,modify,about。procedure (Sender:TObject)。您尚未登錄，請(qǐng)選擇登錄頁(yè)面登錄！39。 :=false。 .text:=39。end。procedure (Sender: TObject)。begin 。end。procedure (Sender: TObject)。begin 。只有登錄成功才有操作菜單的權(quán)限。控件編輯框edit2用做密碼輸入，輸入的數(shù)據(jù)一般以“*”顯示，為此需要將edit2的屬性passwardchar設(shè)置成*。begin :=false。39。39。PASSWD39。添加與修改39。 :=true。+ 。 :=true。 :=false。+ 。,39。用戶名錯(cuò)誤39。end。那我們就必須設(shè)置一個(gè)人事變動(dòng)列表，用來(lái)存貯這些信息。其中包括11個(gè)edit控件（用來(lái)輸入員工信息），1個(gè)RadioGroup（選擇性別）組件，三個(gè)ComboBox組件，一個(gè)備注框Memo（列出詳細(xì)信息）組件和兩個(gè)按鈕（添加按鈕與關(guān)閉按鈕）。 圖43 增加新員工窗口窗體的主要控件及屬性設(shè)置如表42所示。 s:string。 table1[39。PA