醫(yī)學(xué)綜合應(yīng)用實(shí)例醫(yī)藥銷售系統(tǒng)

綜合應(yīng)用實(shí)例醫(yī)藥銷售系統(tǒng)主要內(nèi)容：9.1項(xiàng)目管理器管理文件9.2設(shè)置主文件9.3使用應(yīng)用程序生成器9.4連編應(yīng)用程序9.5生成可發(fā)布的應(yīng)用程序9.6應(yīng)用程序開發(fā)實(shí)例8/30/202329.1項(xiàng)目管理器管理文件項(xiàng)目管理器是VisualFoxPro中組織和管理項(xiàng)目中數(shù)據(jù)和對(duì)象的主要工具，它為組織和管理文件提供了一個(gè)方便和集成的開發(fā)環(huán)境，大大簡(jiǎn)化了文件的操作過程。項(xiàng)目管理器能夠?qū)?yīng)用系統(tǒng)項(xiàng)目中的數(shù)據(jù)、程序和文檔等進(jìn)行統(tǒng)一管理，并采用目錄樹的結(jié)構(gòu)，為用戶提供一個(gè)組織良好的分層結(jié)構(gòu)視圖，使項(xiàng)目的內(nèi)容一目了然，使項(xiàng)目的創(chuàng)建與修改極為方便。一個(gè)VisualFoxPro應(yīng)用系統(tǒng)項(xiàng)目中可以包含各種文件。項(xiàng)目管理器的窗口如圖9-1所示。圖9-1“項(xiàng)目管理器”窗口界面8/30/202339.1項(xiàng)目管理器管理文件9.1.1添加和移去文件一般來說，應(yīng)用系統(tǒng)項(xiàng)目所包含的文件是為某一個(gè)應(yīng)用程序服務(wù)的。如果一個(gè)已經(jīng)存在的文件，可以通過項(xiàng)目管理器添加到項(xiàng)目中；如果一個(gè)文件不需要了，可以從項(xiàng)目管理器中刪除或移去。所謂“移去”是指將一個(gè)文件從項(xiàng)目中移去，但該文件仍然存在磁盤中；“刪除”則不僅從項(xiàng)目中移去文件，同時(shí)在磁盤上刪除文件。1.添加文件要在項(xiàng)目中加入已經(jīng)建立好的文件，具體操作步驟如下：（1）選定要添加文件的文件類型，例如，需要添加一個(gè)數(shù)據(jù)庫(kù)到項(xiàng)目中去，單擊“數(shù)據(jù)”選項(xiàng)卡中的“數(shù)據(jù)庫(kù)”選項(xiàng)。（2）單擊“添加”按鈕，在“打開”對(duì)話框中，選擇要添加的數(shù)據(jù)庫(kù)文件名，如圖9-2所示。（3）單擊“確定”按鈕，這樣數(shù)據(jù)庫(kù)文件就添加到項(xiàng)目中。8/30/202349.1項(xiàng)目管理器管理文件9.1.1添加和移去文件圖9-2項(xiàng)目管理器添加文件界面8/30/202359.1項(xiàng)目管理器管理文件9.1.1添加和移去文件2.移去文件在項(xiàng)目管理器中，移去文件的具體操作步驟如下：（1）選擇要移去的文件，例如，從項(xiàng)目中移去“管理信息”數(shù)據(jù)庫(kù)中“mima”表。（2）如單擊“數(shù)據(jù)”選項(xiàng)卡中“數(shù)據(jù)庫(kù)”選項(xiàng)下的一個(gè)“mima”表。（3）單擊“移去”按鈕，此時(shí)將打開一個(gè)如圖9-3所示提示對(duì)話框，詢問是否“把表從數(shù)據(jù)庫(kù)中移去還是從磁盤上刪除?”圖9-3項(xiàng)目管理器移去文件界面8/30/202369.1項(xiàng)目管理器管理文件9.1.2包含和排除文件

項(xiàng)目管理器中的文件有包含和排除兩種情況，“包含”是指在應(yīng)用程序的運(yùn)行過程中不需要更新的項(xiàng)目，也就是一般不會(huì)再變動(dòng)的項(xiàng)目。它們主要有程序、圖形、窗體、菜單、報(bào)表、查詢等?！芭懦笔侵敢烟砑釉凇绊?xiàng)目管理器”中，但又在使用狀態(tài)上被排除的項(xiàng)目。通常，允許在程序運(yùn)行過程中隨意地更新它們，如數(shù)據(jù)庫(kù)表。對(duì)于在程序運(yùn)行過程中可以更新和修改的文件，應(yīng)將它們修改成“排除”狀態(tài)。指定項(xiàng)目的“包含”與“排除”狀態(tài)的方法是：打開“項(xiàng)目管理器”，選擇菜單欄的“項(xiàng)目”命令中的“包含|排除”命令項(xiàng)；或者通過單擊鼠標(biāo)右鍵，在彈出的快捷菜單中，選擇“包含|排除”命令項(xiàng)。8/30/202379.2設(shè)置主文件

在一個(gè)應(yīng)用系統(tǒng)中，可以執(zhí)行的模塊會(huì)有多個(gè)，但一定有一個(gè)入口程序作為應(yīng)用系統(tǒng)的起始點(diǎn)，這個(gè)程序在VisualFoxPro中稱為主文件。主文件是整個(gè)應(yīng)用程序的入口點(diǎn)，它的任務(wù)是設(shè)置應(yīng)用程序的起始點(diǎn)、初始化環(huán)境、顯示初始的用戶界面和控制事件循環(huán)，當(dāng)退出應(yīng)用程序時(shí)恢復(fù)至原來的開發(fā)環(huán)境。9.2.1設(shè)置主文件在VisualFoxPro中，系統(tǒng)的主文件是唯一的，一個(gè)項(xiàng)目管理器中，只能設(shè)置一個(gè)主文件，設(shè)置為主文件的文件名將以黑體顯示。設(shè)置主文件的方法有2種：（1）在項(xiàng)目管理器中選中要設(shè)置的主程序文件，從“項(xiàng)目”菜單或快捷菜單中選擇“設(shè)置為主文件”命令。（2）在“項(xiàng)目信息”的“文件”選項(xiàng)卡中選中要設(shè)置的主程序文件后，用鼠標(biāo)右鍵單擊，在彈出的快捷菜單中選擇“設(shè)置為主文件”命令。8/30/202389.2設(shè)置主文件9.2.2初始化環(huán)境

主文件必須做的第一件事情就是對(duì)應(yīng)用系統(tǒng)的環(huán)境進(jìn)行初始化。在打開VisualFoxPro時(shí)，其本身有一些默認(rèn)的環(huán)境設(shè)置和系統(tǒng)變量的值，但是這些值不可能適合所有的應(yīng)用系統(tǒng)，因此需要在主文件中對(duì)應(yīng)用系統(tǒng)的環(huán)境進(jìn)行初始化。VisualFoxPro中主要是使用SET命令設(shè)置初始化環(huán)境。1.取得系統(tǒng)當(dāng)前環(huán)境設(shè)置命令通過下列操作能取得系統(tǒng)當(dāng)前的環(huán)境設(shè)置命令：（1）選擇“工具”菜單中的“選項(xiàng)”，打開“選項(xiàng)”對(duì)話框。（2）在“選項(xiàng)”對(duì)話框中修改相應(yīng)選項(xiàng)。（3）在按下Shift鍵的同時(shí)單擊“選項(xiàng)”對(duì)話框的“確定”按鈕，則“命令”窗口中將顯示當(dāng)前環(huán)境的SET命令。（4）在“命令”窗口中，選擇需要復(fù)制的SET命令，將其粘貼到主文件中。8/30/202399.2設(shè)置主文件9.2.2初始化環(huán)境2.恢復(fù)初始的開發(fā)環(huán)境如果要在應(yīng)用系統(tǒng)退出時(shí)恢復(fù)默認(rèn)的設(shè)置值，一個(gè)好的方法是把這些命令保存在公有變量、用戶自定義類或者應(yīng)用程序?qū)ο蟮膶傩灾?。如果初始化時(shí)使用的程序和恢復(fù)時(shí)使用的程序不同，則應(yīng)確保可以對(duì)存儲(chǔ)的值進(jìn)行訪問。8/30/2023109.2設(shè)置主文件9.2.3控制事件循環(huán)

控制事件循環(huán)的方法是執(zhí)行READEVENTS命令，該命令使VisualFoxPro開始處理例如鼠標(biāo)單擊、雙擊等用戶事件。從執(zhí)行READEVENTS命令開始，到相應(yīng)的CLEAREVENTS命令執(zhí)行期間，主文件中所有的處理過程全部掛起。在啟動(dòng)事件循環(huán)之前建立一個(gè)方法來退出事件循環(huán)，必須確保在界面上存在一個(gè)可執(zhí)行結(jié)束事件循環(huán)CLEAREVENTS命令的機(jī)制。CLEAREVENTS命令將掛起VisualFoxPro的事件處理過程，同時(shí)將控制權(quán)返回給執(zhí)行READEVENTS命令并開始事件循環(huán)的程序。8/30/2023119.3使用應(yīng)用程序生成器9.3.1使用應(yīng)用程序向?qū)?/p>

使用應(yīng)用程序向?qū)軌蛏梢粋€(gè)項(xiàng)目和一個(gè)VisualFoxPro應(yīng)用程序框架，然后使用應(yīng)用程序生成器可以添加已生成的數(shù)據(jù)庫(kù)、表、表單和報(bào)表等組件。1.使用應(yīng)用程序向?qū)?chuàng)建項(xiàng)目和應(yīng)用程序框架（1）選擇“文件”菜單下的“新建”命令，在“新建”對(duì)話框中選擇“項(xiàng)目”單選按鈕。（2）單擊“向?qū)А卑粹o，在彈出的“應(yīng)用程序向?qū)А睂?duì)話框中選中“創(chuàng)建項(xiàng)目目錄結(jié)構(gòu)”復(fù)選框。（3）在對(duì)話框的“項(xiàng)目名稱”中直接輸入新項(xiàng)目的名稱，最好給出一個(gè)獨(dú)立的子目錄，如圖9-4所示。（4）單擊“應(yīng)用程序向?qū)А睂?duì)話框上的“確定”按鈕，“應(yīng)用程序向?qū)А睂⒆詣?dòng)調(diào)用所需要的各種應(yīng)用程序生成器，并且為應(yīng)用程序生成一個(gè)目錄和項(xiàng)目結(jié)構(gòu)。8/30/2023129.3使用應(yīng)用程序生成器9.3.1使用應(yīng)用程序向?qū)?/p>

圖9-4用應(yīng)用程序向?qū)陆?xiàng)目8/30/2023139.3使用應(yīng)用程序生成器9.3.1使用應(yīng)用程序向?qū)?/p>

2.應(yīng)用程序框架應(yīng)用程序框架中包含了所有必需的，以及許多可選的元素。應(yīng)用程序框架可自動(dòng)完成以下任務(wù)：（1）提供啟動(dòng)和清理程序，其中包括負(fù)責(zé)保存和恢復(fù)環(huán)境狀態(tài)的程序。（2）顯示菜單和工具欄。（3）幫助開發(fā)者確定應(yīng)用程序的功能、用戶輸入數(shù)據(jù)的方式、應(yīng)用程序的外觀以及其他強(qiáng)大的功能。8/30/2023149.3使用應(yīng)用程序生成器9.3.2應(yīng)用程序生成器

1.應(yīng)用程序生成器的組成應(yīng)用程序生成器包括“常規(guī)”、“信息”、“數(shù)據(jù)”、“表單”、“報(bào)表”和“高級(jí)”6個(gè)選項(xiàng)卡。在每個(gè)選項(xiàng)卡中可完成各自不同的功能，且功能非常強(qiáng)大，如圖9-5所示。8/30/2023159.3使用應(yīng)用程序生成器9.3.2應(yīng)用程序生成器

1.應(yīng)用程序生成器的組成（1）“常規(guī)”選項(xiàng)卡在常規(guī)選項(xiàng)卡中可以設(shè)置應(yīng)用程序的名稱、指定顯示在啟動(dòng)畫面和“關(guān)于”對(duì)話框中的圖像文件的文件名以及指定應(yīng)用程序的運(yùn)行方式等信息。其中應(yīng)用程序的運(yùn)行方式“正?！笔侵干稍赩isualFoxPro的主窗口中運(yùn)行的.app應(yīng)用程序；“模塊”是指應(yīng)用程序準(zhǔn)備被添加到已有的項(xiàng)目中，或者被其它程序調(diào)用；“頂層”是指生成可以在Windows桌面上運(yùn)行的.exe可執(zhí)行程序（2）“信息”選項(xiàng)卡主要用于指定應(yīng)用程序的生成信息。（3）“數(shù)據(jù)”選項(xiàng)卡用于指定應(yīng)用程序的數(shù)據(jù)源以及表單和報(bào)表的樣式。（4）“表單”選項(xiàng)卡用于指定菜單的類型、啟動(dòng)表單的菜單、工具欄以及表單可否有多個(gè)實(shí)例。（5）“報(bào)表”選項(xiàng)卡用于指定在應(yīng)用程序中使用的報(bào)表名稱。（6）“高級(jí)”選項(xiàng)卡指定幫助文件的名稱和應(yīng)用程序的默認(rèn)目錄。8/30/2023169.3使用應(yīng)用程序生成器9.3.2應(yīng)用程序生成器

2.重新啟動(dòng)應(yīng)用程序生成器與其他生成器一樣，“應(yīng)用程序生成器”是可重啟的，打開項(xiàng)目管理器之后，啟動(dòng)應(yīng)用程序生成器方法有如下3種。（1）在如圖9-6所示的對(duì)話框中，在項(xiàng)目上單擊鼠標(biāo)右鍵，在快捷菜單中選擇“生成器”菜單項(xiàng)。（2）從“工具”菜單中啟動(dòng)“應(yīng)用程序生成器”：?jiǎn)螕簟跋驅(qū)А保缓髥螕簟叭俊?，在彈出的“向?qū)нx取”對(duì)話框中選擇“應(yīng)用程序生成器”，如圖9-7所示。（3）按Alt+F2組合鍵。圖9-6在項(xiàng)目上重新啟動(dòng)應(yīng)用程序生成器8/30/2023179.3使用應(yīng)用程序生成器9.3.2應(yīng)用程序生成器

3.應(yīng)用程序生成器的功能應(yīng)用程序生成器與應(yīng)用程序框架結(jié)合在一起提供以下功能：（1）添加、編輯或刪除與應(yīng)用程序相關(guān)的組件。（2）設(shè)定表單和報(bào)表的外觀樣式。（3）加入常用的應(yīng)用程序元素。（4）提供應(yīng)用程序的作者和版本等信息。8/30/2023189.3使用應(yīng)用程序生成器9.3.3應(yīng)用程序生成實(shí)例

如果在應(yīng)用系統(tǒng)中使用一個(gè)程序文件（.prg），作為主文件，必須保證該程序中包含一些必要的命令，這些命令可以控制與應(yīng)用系統(tǒng)的主要任務(wù)相關(guān)的任務(wù)。如果使用了應(yīng)用程序向?qū)?，同時(shí)讓它建立程序Main.prg，就沒有必要再建立一個(gè)新程序，只需對(duì)該程序做些修改即可。一般主程序中，沒有必要直接包含執(zhí)行所有任務(wù)的命令，常用的方法是調(diào)用過程或函數(shù)來控制某些任務(wù)。一個(gè)簡(jiǎn)單的主程序應(yīng)包含下列內(nèi)容：（1）打開數(shù)據(jù)庫(kù)、變量聲明等初始化環(huán)境。（2）調(diào)用菜單或表單以建立初始的用戶界面。（3）執(zhí)行READEVENTS命令開始事件循環(huán)。（4）在一個(gè)菜單項(xiàng)或表單按鈕上執(zhí)行CLEAREVENTS命令。注意主程序不應(yīng)執(zhí)行該命令。（5）應(yīng)用程序退出，恢復(fù)系統(tǒng)默認(rèn)初始環(huán)境。8/30/2023199.3使用應(yīng)用程序生成器9.3.3應(yīng)用程序生成實(shí)例

如“醫(yī)藥銷售系統(tǒng)”初始化程序rukou.prg包括如下命令：SETTALKOFFSETSAFETYONSETCENTURYONCLEARWINDOWCLEARALLDOFORM主表單READEVENTS在頂層菜單的“退出系統(tǒng)”中包括如下命令：SETSYSMENUTODEFAULTSETTALKONSETSAFETYONCLOSEALLCLEARALLCLEARWINDOWCLEAREVENTSCANCEL8/30/2023209.4連編應(yīng)用程序連編項(xiàng)目是VisualFoxPro系統(tǒng)對(duì)項(xiàng)目的整體性能進(jìn)行測(cè)試的方法，是將項(xiàng)目中除了設(shè)置為“排除”的文件以外的所有被引用的文件合并成一個(gè)應(yīng)用程序文件的過程。連編選項(xiàng)見圖9-8所示。圖9-8連編選項(xiàng)操作界面8/30/2023219.4連編應(yīng)用程序連編應(yīng)用程序的操作步驟如下：（1）打開“項(xiàng)目管理器”對(duì)話框。（2）單擊“連編”按鈕，彈出“連編選項(xiàng)”對(duì)話框。（3）在“連編選項(xiàng)”對(duì)話框中選擇“連編應(yīng)用程序”單選鈕或“連編可執(zhí)行文件”單選鈕。（4）單擊“確定”按鈕，并在“另存為”對(duì)話框中輸入生成文件的文件名。若在第二步選擇的是“連編應(yīng)用程序”，則文件名以.app為擴(kuò)展名，其運(yùn)行需要在VisualFoxPro中運(yùn)行，若在第二步選擇的是“連編可執(zhí)行文件”，則文件名應(yīng)以.exe為擴(kuò)展名，其可以在Windows下運(yùn)行，但是需要和兩個(gè)VisualFoxPro動(dòng)態(tài)鏈接庫(kù)（Vfp6r.dll和Vfp6enu.dll）連接，這兩個(gè)動(dòng)態(tài)鏈接庫(kù)和應(yīng)用程序一起構(gòu)成了VisualFoxPro所需要的完整運(yùn)行環(huán)境。圖9-8連編選項(xiàng)操作界面8/30/2023229.4連編應(yīng)用程序也可以利用VisualFoxPro的命令BUILD來實(shí)現(xiàn)連編，例如，要從項(xiàng)目“藥品銷售.pjx”連編得到一個(gè)應(yīng)用程序“藥品銷售系統(tǒng).app”，則在命令窗口鍵入：BUILDAPP藥品銷售系統(tǒng)FROM藥品銷售或BUILDEXE藥品銷售系統(tǒng)FROM藥品銷售連編其他選項(xiàng)包括以下方面：（1）連編COMDLL：使用項(xiàng)目文件中的類信息創(chuàng)建一個(gè)具有DLL文件擴(kuò)展名的動(dòng)態(tài)鏈接庫(kù)。（2）“版本”按鈕：允許指定版本號(hào)及版本類型。（3）重新生成組件ID。連編后運(yùn)行應(yīng)用程序包括運(yùn)行APP應(yīng)用程序和運(yùn)行可執(zhí)行文件EXE兩種情況。連編項(xiàng)目獲得成功后，可在“項(xiàng)目管理器”中選擇主程序，然后選擇“運(yùn)行”，或直接使用命令DO<主程序名>，運(yùn)行該項(xiàng)目。圖9-8連編選項(xiàng)操作界面8/30/2023239.5生成可發(fā)布的應(yīng)用程序1.下列步驟說明如何發(fā)布VisualFoxPro應(yīng)用程序（1）使用VisualFoxPro開發(fā)環(huán)境創(chuàng)建并調(diào)試應(yīng)用程序。（2）為運(yùn)行環(huán)境準(zhǔn)備并定制應(yīng)用程序。2.為運(yùn)行環(huán)境準(zhǔn)備應(yīng)用程序時(shí)，應(yīng)該采取如下步驟：（1）選擇連編類型。在可以發(fā)布應(yīng)用程序之前，必須連編一個(gè)以.app為擴(kuò)展名的應(yīng)用程序文件，或者一個(gè)以.exe為擴(kuò)展名的可執(zhí)行文件。（2）考慮環(huán)境問題。必須考慮并測(cè)試應(yīng)用程序可以運(yùn)行的最小環(huán)境，包括磁盤空間和內(nèi)存大小。（3）確保正確運(yùn)行。在運(yùn)行時(shí)刻的環(huán)境中，必須提供READEVENTS命令。（4）在應(yīng)用程序中包含資源。VisualFoxPro提供了一些資源文件，用于擴(kuò)展應(yīng)用程序的基本功能，這些資源文件包括FOXUSER資源文件、API庫(kù)以及ActiveX控件。如果使用了這些文件，則必須把它們加入到項(xiàng)目或者發(fā)布目錄中。（5）刪除受限制的功能和文件。VisualFoxPro開發(fā)環(huán)境包含了許多只允許開發(fā)者使用的功能和文件。如果應(yīng)用程序中包含有這些功能或文件，發(fā)布前必須把它們刪除掉。8/30/2023249.5生成可發(fā)布的應(yīng)用程序（6）定制應(yīng)用程序