【正文】 西安電子科技大學(xué)出版社 Foxpro for windows 使用詳解人們郵電出版社 命令與函數(shù)專輯清華大學(xué)出版社 Visual 在本例中詳細(xì)的講述了從創(chuàng)建數(shù)據(jù)庫(kù)到系統(tǒng)設(shè)計(jì)和各模塊的創(chuàng)建、面向?qū)ο蟮谋韱蔚脑O(shè)計(jì)、基本功能如查詢的實(shí)現(xiàn)、主程序的編寫。在一個(gè)文件被排除后，則在文件的左方加入一個(gè)排除符號(hào)。 因?yàn)檫@些文件不能被包含在文件 .exe 或者是 .app 文件中，所以要在發(fā)布一個(gè)應(yīng) 用程序之前為這些文件做好準(zhǔn)備。數(shù)據(jù)庫(kù)和表 格需要變化和添加，而如果編譯后包含自 .exe 或者是 .app 文件中，由于這二個(gè)文件被創(chuàng)建后都是靜態(tài)的，因此被包含的文件也是靜態(tài)的和只讀的。 在默認(rèn)情況下， Visual 在嵌放的過(guò)程中排除了數(shù)據(jù)庫(kù)、表格、成為 .ff的 c 庫(kù)文件和 .app 文件。那么這些文件變成只讀的，不能修改?？梢栽谥鞑藛?或者主表單中添加一個(gè)“退出”項(xiàng)，該項(xiàng)發(fā)出 CLEAR EVENTS命令。 （ 4） 恢復(fù)環(huán)境，退出應(yīng)用程序。 （ 2） 建立初始用戶界面。 如果要建立一個(gè)簡(jiǎn)單的主程序，可以按下列步驟進(jìn)行。它可以是一個(gè)表單、菜單或者程序，建議使用程序作為主文件。而且表單向?qū)傻牟樵児δ芊浅?qiáng)大，完全可以滿足數(shù)據(jù)庫(kù)應(yīng)用軟件的需要。 數(shù)據(jù)庫(kù)軟件用來(lái)管理數(shù)據(jù)的優(yōu)勢(shì)在于可以迅速?gòu)某汕先f(wàn)的數(shù)據(jù)中找到我們需要的數(shù)據(jù)，而查詢功能的設(shè)計(jì)也是數(shù)據(jù)庫(kù)應(yīng)用軟件設(shè)計(jì)過(guò)程中的重點(diǎn)也是難點(diǎn)。 4． 8 開(kāi)發(fā)中的難點(diǎn)和解決技巧 Visual 中的向?qū)Оū硐驅(qū)А?shù)據(jù)庫(kù)向?qū)?、表單向?qū)А⒉樵兿驅(qū)?、?bào)表向?qū)А?biāo)簽向?qū)?、郵件合并向?qū)?、?shù)據(jù)透視表向?qū)?、?dǎo)入向?qū)?、文檔向?qū)?、安裝向?qū)?、升遷向 導(dǎo)、應(yīng)用程序向?qū)А?WEB 發(fā)表向?qū)У?、我們合理?yīng)用向?qū)Э梢栽诰幊讨刑岣咝省? 在如圖所示的空白表單中添加一個(gè)頁(yè)框 控件，并按照下表設(shè)置頁(yè)框的屬性，同時(shí)在數(shù)據(jù)環(huán)境里添加現(xiàn)有庫(kù)存表和操作日志表。添加 click 事件代碼如下： insert into 操作日志表 (操作員 ,操作內(nèi)容 ,操作時(shí)間 ) values (username,設(shè)備需求,date()) *把設(shè)備需求寫入操作日志表中 雙擊回主界面按鈕，添加 click 事件代碼如下： *釋放本表單 do form 倉(cāng)庫(kù)管理 *運(yùn)行倉(cāng)庫(kù)管理界面 保存對(duì)表單所作的修改，表單運(yùn)行效果如圖所示： 4． 7 顯示報(bào)表模塊的設(shè)計(jì) 在該模塊中，一共要顯示 3 個(gè)報(bào)表，分別提供庫(kù)存不足，庫(kù)存過(guò)多和操作日志等信息。下面的表列出了需要修改的控件的名稱以及屬性值。 （ 2）為窗體修改和添加命令按鈕 添加 2 個(gè)命令按鈕“保存日志”和“回主界面”。在選擇字段時(shí)，選擇所有可用字段，選擇陰影式和圖片按鈕作為設(shè)備采購(gòu)計(jì)劃表的樣式。 （ 1）由數(shù)據(jù)表生成表單 通過(guò) Visual Foxpro 的表單向?qū)?，生成設(shè)備采購(gòu)計(jì)劃表單。,date()) 雙擊回主界面命令按鈕，添加 click 事件代碼如下： do form 倉(cāng)庫(kù)管理 保存對(duì)表單所作的修改。添加 click 事件代碼如下： insert into 操作日志表 (操作員 ,操作內(nèi)容 ,操作時(shí)間 ) values (username,39。最后單擊“完成”按鈕，把表單保存在“ c:\倉(cāng)庫(kù)管理 \”目錄下，名為“設(shè)備需求 .scx”。在“步驟 3排序次序”時(shí)。 4． 5 設(shè)備需求模塊的設(shè)計(jì) 在設(shè)備需求模塊中將實(shí)現(xiàn)設(shè)備需求 數(shù)據(jù)的添加和保存日志等功能。設(shè)備還庫(kù) 39。 set 現(xiàn)有庫(kù)存 =(現(xiàn)有庫(kù)存 getnum) where (設(shè)備號(hào) =getid) insert into 操作日志表 (操作員 ,操作內(nèi)容 ,操作時(shí)間 )。,date()) else messagebox(出錯(cuò) ,1,錯(cuò)誤的設(shè)備號(hào) ) endif 4． 4 設(shè)備還庫(kù)模塊的設(shè)計(jì) 在設(shè)備還庫(kù)模塊中將實(shí)現(xiàn)設(shè)備還庫(kù)數(shù)據(jù)的添加和修改庫(kù)存等功能，按照前面介紹的步驟設(shè)計(jì)設(shè)備還庫(kù)表。 values ( ,39。 (1) Form1 控件的主要屬性： 屬性名稱 屬性值 Caption 設(shè)備出庫(kù)表 Autocenter . BackColor （ 2） ButtonSet1 控件的主要屬性： 控件名 屬性名稱 屬性值 cmdExit Visible . cmdDelete Visible . cmdPrint Visible . cmdEdit Visible . Command1 Caption 修改庫(kù)存 Command2 Caption 回主界面 下面時(shí)設(shè)備出庫(kù)表單中“修改庫(kù)存”命令按鈕的 click 事件的代碼： select 現(xiàn)有庫(kù)存表 *先在該表單的數(shù)據(jù)環(huán)境中添加現(xiàn)有庫(kù)存表 getid= set order to 設(shè)備號(hào) seek getid *在現(xiàn)有庫(kù)存表中查找設(shè)備號(hào)等于 getid 的紀(jì)錄 if found() getnum= update 現(xiàn)有庫(kù)存表 。 在表單的左上角加上了顯示當(dāng)前時(shí)間的功能，添加標(biāo)簽 label2 的 caption 屬性設(shè)為“當(dāng)前時(shí)間”；添加 label3 的 caption 屬性設(shè)為空；為當(dāng)前表單的 label3init事件添加如下代碼： =dtoc(date()) 該模塊具體實(shí)現(xiàn)過(guò)程不再一一詳細(xì)說(shuō)明。該模塊的 功能和設(shè)備入庫(kù)的功能相似。設(shè)備入庫(kù) 39。 value (thisform. 設(shè)備號(hào) ,thisform. 入庫(kù)數(shù)量 ,1000,10) endif insert into 操作日志表 (操作員 ,操作內(nèi)容 ,操作時(shí)間 )。添加 2 個(gè)命令按鈕， Caption 屬性分別設(shè)為“修 改庫(kù)存”和“回主界面”。如圖所示。然后打開(kāi)表單修改器生成的表單，如圖所示。由于 Vi sual 向?qū)傻谋韱沃痪哂衅毡樾?，?duì)于當(dāng)前設(shè)計(jì)的倉(cāng)庫(kù)管 理系統(tǒng)還需要一定的改變，因此以我們選擇“保存表單并用表設(shè)計(jì)器修改表單”。最后預(yù)覽表單，核對(duì)每項(xiàng)的設(shè)置，完成表單向?qū)?，如圖所示。選擇“上一步”按鈕可以跳回上一個(gè)界面對(duì)表單中顯示的字段進(jìn)行修改。 由于設(shè)備入庫(kù)需要顯示所有的字段，因此我們將可用字段全部移至選定字段，如圖所示，單擊“下一步”按鈕， 在表單樣式中，選擇“陰影式”以及“圖片按鈕”，如圖所示。本模塊設(shè)計(jì)采用先用向?qū)杀韱?，然后修改的方法?shí)現(xiàn)。 在“ ” (“ caption”屬性為“設(shè)備入庫(kù)” )控件的“ click”事件中添加如下代碼： do form 設(shè)備入庫(kù)表 在“ ” (“ caption”屬性為“設(shè)備出庫(kù)” )控件的“ click”事件中添加如下代碼： do form 設(shè)備出庫(kù)表 在“ ” (“ caption”屬性為“設(shè)備還庫(kù)” )控件的“ click”事件中添加如下代碼： do form 設(shè)備還庫(kù)表 在“ ” (“ caption”屬性為“部門需求” )控件的 “ click”事 件中添加如下代碼： do form 部門需求表 在“ ” (“ caption”屬性為“設(shè)備采購(gòu)” )控件的“ click”事件中添加如下代碼： do form 設(shè)備采購(gòu)表 在“ ” (“ caption”屬性為“顯示報(bào)表” )控件的“ click”事件中添加如下代碼： do form 顯示報(bào)表 在“ form1”的屬性里選擇“ autocenter”設(shè)置為“ .”，同時(shí)將“ backcolor” 設(shè)置為“ 255,255,255”，“ windowstate”設(shè)置為“ 0普通”。在該表單上添加6 個(gè)“按鈕”控件，它們的“ caption”屬性分別為“設(shè)備入庫(kù)”，“設(shè)備出庫(kù)”，“設(shè)備還庫(kù)”，“部門需求”，“設(shè)備采購(gòu)”，“顯示報(bào)表”。 4． 1 功能選擇界面的設(shè)計(jì)： 這一模塊的主要功能是作為系統(tǒng)主界面為進(jìn)入本系統(tǒng)不同功能界面選擇提供一個(gè)接口，使用一個(gè)窗口來(lái)實(shí)現(xiàn)這一功能。一下操作均在該項(xiàng)目管理器中進(jìn)行。 下面就按照功能模塊圖來(lái)設(shè)計(jì)該倉(cāng)庫(kù)管理系統(tǒng)。 （ 6） 切換面板：用于切換到不同的操作，如設(shè)備入庫(kù)、設(shè)備出庫(kù)等。 （ 4） 設(shè)備需求模塊：記錄各部門的設(shè)備需求。 （ 2） 設(shè)備出庫(kù)模塊：將設(shè)備從庫(kù)存取出并記錄。切換面板用于切換不同的操作，每項(xiàng)具體操作 結(jié)束后，都會(huì)返回到切換面板。如果有一個(gè)已有的數(shù)據(jù)表，就可以使用“使用追加記錄”將這個(gè)有數(shù)據(jù)的表追加到當(dāng)前表中，不過(guò)執(zhí)行該操作要求這二個(gè)表的結(jié)構(gòu)完全相同。如圖所示。具體方法如下： （ 1） 如圖所示，選中要輸入數(shù)據(jù)的表，單擊 “瀏覽”按鈕。在彈出的如圖所示的表設(shè)計(jì)器中填寫表的內(nèi)容。下面以表設(shè)備代碼表為例來(lái)介紹表的建立過(guò)程。 打開(kāi)如圖所示的“倉(cāng)庫(kù)管理”項(xiàng)目后，在項(xiàng)目管理器中展開(kāi)數(shù)據(jù)文本夾，用鼠標(biāo)選中數(shù)據(jù)庫(kù)， 單擊右側(cè)的“新建”按鈕，在彈出的對(duì)話框中將該數(shù)據(jù)庫(kù)文件存儲(chǔ)為 c:\倉(cāng)庫(kù)管理 \倉(cāng)庫(kù)管理 .dbc。每個(gè)表格表示在數(shù)據(jù)庫(kù)中的一個(gè)表。各個(gè)實(shí)體的 ER 圖及其關(guān)系描述如下： 1）庫(kù)存實(shí)體 ER 圖： 現(xiàn)有庫(kù)存 設(shè)備號(hào) 現(xiàn)有庫(kù)存 警戒庫(kù)存 總數(shù) 2）入庫(kù)實(shí)體 ER 圖： 入庫(kù) 設(shè)備號(hào) 供應(yīng)商信息 采購(gòu)價(jià)格信息 采購(gòu)員 3）出庫(kù)實(shí)體 ER 圖： 出庫(kù) 設(shè)備號(hào) 使用部門 數(shù)量 時(shí)間 經(jīng)手人 4）部門需求實(shí)體 ER 圖：