VFP第5章下面向?qū)ο蟪绦蛟O(shè)計(jì)

1、2022-3-11蘇州大學(xué)信息技術(shù)學(xué)院計(jì)算機(jī)工程系 徐云龍12VFP支持兩種開發(fā)模型：面向過程和面向?qū)ο笾С謨煞N開發(fā)模型：面向過程和面向?qū)ο蠼Y(jié)構(gòu)化程序設(shè)計(jì)（面向過程）結(jié)構(gòu)化程序設(shè)計(jì)（面向過程） 本質(zhì)：功能設(shè)計(jì)（以功能為主進(jìn)行設(shè)計(jì)） 方法：自頂向下、功能分解。 優(yōu)點(diǎn)：系統(tǒng)結(jié)構(gòu)性強(qiáng)、便于設(shè)計(jì)和理解 缺點(diǎn)：但各模塊間關(guān)系緊密，一旦功能需求變動(dòng)導(dǎo)致維護(hù)困難6.1 面向?qū)ο蟮某绦蛟O(shè)計(jì)概述36.1.1 面向?qū)ο蟮某绦蛟O(shè)計(jì)方法（面向?qū)ο蟮某绦蛟O(shè)計(jì)方法（OOP） 方法：把世間萬物都看成對(duì)象。從內(nèi)部結(jié)方法：把世間萬物都看成對(duì)象。從內(nèi)部結(jié)構(gòu)上模擬客觀世界。構(gòu)上模擬客觀世界。 每個(gè)對(duì)象都有自己的屬性和方法。能對(duì)消每

2、個(gè)對(duì)象都有自己的屬性和方法。能對(duì)消息做出反應(yīng)。息做出反應(yīng)。 程序就是一組對(duì)象，對(duì)象之間通過發(fā)送消程序就是一組對(duì)象，對(duì)象之間通過發(fā)送消息互相通知做什么。息互相通知做什么。6.1 面向?qū)ο蟮某绦蛟O(shè)計(jì)概述4面向過程和面向?qū)ο蟮膮^(qū)別區(qū)別：以計(jì)算機(jī)模擬貓捉老鼠的過程為例。面向過程的做法： 程序員必須通過編程告訴計(jì)算機(jī)貓抓老鼠的每一個(gè)具體動(dòng)作，如匍匐,加速，咬住等動(dòng)作。面向?qū)ο蟮淖龇ǎ?程序員給貓發(fā)一個(gè)消息“老鼠出現(xiàn)了” 。貓就會(huì)自動(dòng)去抓老鼠。貓如何抓老鼠的動(dòng)作還是得由程序員編碼來實(shí)現(xiàn)，只不過代碼的組織方式大不相同。面向?qū)ο蟮姆椒ǜ先说乃季S習(xí)慣。6.1 面向?qū)ο蟮某绦蛟O(shè)計(jì)概述56.1.2 類和對(duì)象類和

3、對(duì)象6.1.2 類和對(duì)象的區(qū)別類和對(duì)象的區(qū)別F類（CLASS,類型）:定義了對(duì)象特征以及對(duì)象外觀和行為的模板模板，它刻劃了一組具有共同特性的對(duì)象。F對(duì)象：是類的一個(gè)實(shí)例OOP中，程序由一個(gè)或多個(gè)類組成，在程序運(yùn)行時(shí)視需要?jiǎng)?chuàng)建該類的各個(gè)對(duì)象（實(shí)例）F類是靜態(tài)概念，對(duì)象是動(dòng)態(tài)概念對(duì)象是基于某種類所創(chuàng)建的實(shí)例，包括了數(shù)據(jù)和過程。例：貓可以定義為一個(gè)類，具有顏色，品種屬性，具有 抓老鼠的方法。 某個(gè)貓對(duì)象：白色波斯貓。6.1 面向?qū)ο蟮某绦蛟O(shè)計(jì)概述61. 類類基類基類:VFP系統(tǒng)提供的內(nèi)部定義的類,可提供給用戶用于自定義類的基礎(chǔ)（例如：表單、控件）子類子類:是以其它類定義為起點(diǎn),為某一種對(duì)象所建立的新

4、類。子類將繼承任何對(duì)父類所做的修改6.1 面向?qū)ο蟮某绦蛟O(shè)計(jì)概述7F對(duì)象（對(duì)象（Object） 每個(gè)對(duì)象都具有屬性及與之相關(guān)的事件和方法6.1 面向?qū)ο蟮某绦蛟O(shè)計(jì)概述8F屬性屬性(Property) ： 定義對(duì)象的特征定義對(duì)象的特征-對(duì)象的屬性由對(duì)象所基于的類決定-如貓的顏色，品種F方法方法(Method) ：是對(duì)象能夠執(zhí)行的一個(gè)操作：是對(duì)象能夠執(zhí)行的一個(gè)操作 方法是與對(duì)象相關(guān)聯(lián)的過程，也稱方法程序 方法可由用戶自己創(chuàng)建 例：SetColor()設(shè)置貓的顏色。（主人將它染發(fā)了）F事件事件(Event) ：對(duì)象可對(duì)該事件做出反應(yīng)：對(duì)象可對(duì)該事件做出反應(yīng) 可編寫相應(yīng)的代碼，對(duì)動(dòng)作進(jìn)行響應(yīng) 事件可由

5、用戶的動(dòng)作、程序代碼或系統(tǒng)產(chǎn)生例：對(duì)于老鼠出現(xiàn)這個(gè)事件，貓能做出反應(yīng)。6.1 面向?qū)ο蟮某绦蛟O(shè)計(jì)概述96.2 6.2 基基 類類VFP基類子類子類子類106.2.1 VFP的基類的基類VFP提供的所有基類見p151 表5-1說明：該表中加*部分的類，只能使用，不能為它們創(chuàng)建子類?；惪梢苑譃槿萜黝惡涂丶悆煞N類型。容器類，見表5-2，其余的都是控件類。11基類的最小事件集（基類的最小事件集（重要重要）事 件說 明Init當(dāng)對(duì)象創(chuàng)建時(shí)激活Destroy當(dāng)對(duì)象從內(nèi)存中釋放時(shí)激活Error當(dāng)類中的事件或方法程序運(yùn)行中發(fā)生錯(cuò)誤時(shí)激活激發(fā)順序一般為：激發(fā)順序一般為：Init Error Destroy1

6、2基類的最小屬性集基類的最小屬性集屬性說明Class該類屬于何種類型BaseclassBaseclass該類由何種基類派生而來（Form,commandbutton或custom等）Classlibrary該類從屬于何種類庫parentclassparentclass對(duì)象所基于的類。若該類直接由VFP基類派生而來，則Parentclass屬性值與baseclass屬性值相同13F 容器類容器類(Container classes)是包容其他類的基類 容器可以包含其它對(duì)象 容器可以作為所包含的對(duì)象的父對(duì)象 允許訪問包含的對(duì)象F 控件類控件類(Control classes)是可以包含在容器類中的

7、基類 控件對(duì)象可以包含在容器中 不能作為其它對(duì)象的父對(duì)象F VFP的對(duì)象可分為容器對(duì)象容器對(duì)象和控件對(duì)象控件對(duì)象6.2.2 容器類與控件類容器類與控件類14F6.3.1 引用對(duì)象F6.3.2 設(shè)置對(duì)象的屬性F6.3.3 調(diào)用對(duì)象的方法程序F6.3.4 對(duì)象對(duì)事件的響應(yīng)6.3 處理對(duì)象處理對(duì)象156.3.1 引用對(duì)象引用對(duì)象F何時(shí)要引用對(duì)象何時(shí)要引用對(duì)象 當(dāng)要設(shè)置或取得對(duì)象的某個(gè)屬性的值時(shí) 當(dāng)要執(zhí)行對(duì)象的某個(gè)方法事件時(shí)F容器層次體系容器層次體系 容器與容器中的控件是上下層次的關(guān)系 一個(gè)應(yīng)用程序的最高層次是 _screen或_VFP，最低層次是一個(gè)非容器類控件或是一個(gè)不包含任何控件的容器類控件 例

8、如：_screen.caption=“我的表單”6.3 6.3 處理對(duì)象處理對(duì)象16層次體系示意圖層次體系示意圖表單集表單容器控件17表單集“表單集1”（該對(duì)象的Name屬性為FormSet1）中包含2個(gè)表單“Form1”和“Form2”；表單“Form1”中包含2個(gè)文本框、1個(gè)選項(xiàng)按鈕組、1個(gè)頁框；頁框中包含2個(gè)選項(xiàng)卡式頁面Page1和Page2；頁面“Page1”中包含1個(gè)表格“Grid1”；表格中包含2個(gè)列控件對(duì)象;列控件又包括標(biāo)頭和文本框控件。18F絕對(duì)引用絕對(duì)引用 從容器的最高層次引用對(duì)象，給出對(duì)象的絕對(duì)地址從容器的最高層次引用對(duì)象，給出對(duì)象的絕對(duì)地址 例：引用表單例：引用表單For

9、m1對(duì)象：對(duì)象：FormSet1.Form1 引用表格的第一列中的文本框引用表格的第一列中的文本框Text1對(duì)象：對(duì)象： FormSet1.Form1.Pageframe1.Page1.Grid1.Column1.Text1F相對(duì)引用相對(duì)引用 在容器層次中相對(duì)于某個(gè)容器層次的引用 相對(duì)引用通常運(yùn)用于某個(gè)對(duì)象的事件處理代碼或方法程序代碼中，即在某個(gè)容器對(duì)象的事件處理代碼或方法程序中對(duì)所包容的對(duì)象的引用，引用時(shí)可以直接使用其對(duì)象名 相對(duì)引用時(shí)，所涉及到的一些關(guān)鍵字（P153表5-5）F類似于文件系統(tǒng)中的絕對(duì)路徑和相對(duì)路徑類似于文件系統(tǒng)中的絕對(duì)路徑和相對(duì)路徑19關(guān) 鍵 字含 義ActiveFormA

10、ctiveForm當(dāng)前活動(dòng)表單當(dāng)前活動(dòng)表單ActivePageActivePage當(dāng)前活動(dòng)表單中的活動(dòng)頁面當(dāng)前活動(dòng)表單中的活動(dòng)頁面ActiveControlActiveControl當(dāng)前活動(dòng)表單中具有當(dāng)前活動(dòng)表單中具有焦點(diǎn)焦點(diǎn)的控件的控件PARENTPARENT當(dāng)前對(duì)象的直接容器當(dāng)前對(duì)象的直接容器THISTHIS當(dāng)前對(duì)象當(dāng)前對(duì)象THISFORMTHISFORM包含當(dāng)前對(duì)象的表單包含當(dāng)前對(duì)象的表單THISFORMSETTHISFORMSET包含當(dāng)前對(duì)象的表單集包含當(dāng)前對(duì)象的表單集相對(duì)引用對(duì)象時(shí)所用的關(guān)鍵字（重要） 206.3.2 設(shè)置對(duì)象屬性設(shè)置對(duì)象屬性 每個(gè)對(duì)象都有屬性，可以為對(duì)象設(shè)置屬性 屬

11、性可以在設(shè)計(jì)時(shí)設(shè)置也可在運(yùn)行時(shí)設(shè)置（如caption） 設(shè)計(jì)設(shè)計(jì)時(shí)修改屬性在“屬性”窗口中進(jìn)行 程序代碼程序代碼中，用以下語法進(jìn)行設(shè)置 對(duì)象名稱 . 屬性 = 值例：絕對(duì)引用FormSet1.Form1.Text1.Value=DATE()FormSet1.Form1.Text1.ForeColor=RGB(0,0,0)黑FormSet1.Form1.Text1.FontName=“黑體”21如：with formset1.form1.text1 .Value=DATE() .ForeColor=RGB(0,0,0) .BackColor=RGB(192,192,192) .FontName=

12、“黑體”endwith如：With Thisform.txtXh.backcolor=rgb(128,0,0).txtXm.backcolor=rgb(0,128,0)Endwith226.3.3 調(diào)用對(duì)象的方法程序調(diào)用對(duì)象的方法程序F方法程序是對(duì)象能夠執(zhí)行的一個(gè)操作，是和對(duì)象相聯(lián)系的過程F調(diào)用語法.例1.釋放表單：Thisform.release例2.顯示表單Form1，并將焦點(diǎn)設(shè)置在文本框Text2上： FormSet1.Form1.show FormSet1.Form1.Text2.SetFocusF有返回值的方法程序以圓括號(hào)結(jié)尾有返回值的方法程序以圓括號(hào)結(jié)尾236.3.4 對(duì)象對(duì)事件的

13、響應(yīng)對(duì)象對(duì)事件的響應(yīng) 事件是對(duì)對(duì)象識(shí)別的一個(gè)動(dòng)作，可以編寫相應(yīng)的代碼對(duì)此動(dòng)作進(jìn)行響應(yīng) 用戶不能用其他的程序設(shè)計(jì)方法產(chǎn)生其事件，但可以調(diào)用與這些事件相關(guān)的過程 常用的事件類u鼠標(biāo)事件u鍵盤事件u表單事件u控件焦點(diǎn)事件u數(shù)據(jù)環(huán)境事件246.4 相關(guān)事件相關(guān)事件F核心事件集（表核心事件集（表5-6）6.4.1 核心事件核心事件這些事件適用于大多數(shù)的對(duì)象（控件） 25表表6-6 核心事件集核心事件集事件事件被激發(fā)后的動(dòng)作LoadLoad表單或表單集被加載到內(nèi)存中表單或表單集被加載到內(nèi)存中 UnloadUnload從內(nèi)存中釋放表單或表單集從內(nèi)存中釋放表單或表單集 InitInit創(chuàng)建對(duì)象創(chuàng)建對(duì)象Dest

14、royDestroy從內(nèi)存中釋放對(duì)象從內(nèi)存中釋放對(duì)象 ClickClick用戶使用主鼠標(biāo)按鈕單擊對(duì)象用戶使用主鼠標(biāo)按鈕單擊對(duì)象 DblclickDblclick用戶使用主鼠標(biāo)按鈕雙擊對(duì)象用戶使用主鼠標(biāo)按鈕雙擊對(duì)象 RightclickRightclick用戶使用輔鼠標(biāo)按鈕單擊對(duì)象用戶使用輔鼠標(biāo)按鈕單擊對(duì)象 GotfocusGotfocus對(duì)象接收焦點(diǎn)，由用戶動(dòng)作引起對(duì)象接收焦點(diǎn)，由用戶動(dòng)作引起LostfocusLostfocus對(duì)象失去焦點(diǎn)，由用戶動(dòng)作引起對(duì)象失去焦點(diǎn)，由用戶動(dòng)作引起KeypressKeypress用戶按下或釋放鍵用戶按下或釋放鍵 MousedownMousedown當(dāng)鼠標(biāo)指針

15、停在一個(gè)對(duì)象上時(shí)，用當(dāng)鼠標(biāo)指針停在一個(gè)對(duì)象上時(shí)，用戶按下鼠標(biāo)按鈕戶按下鼠標(biāo)按鈕 MousemoveMousemove用戶在對(duì)象上移動(dòng)鼠標(biāo)用戶在對(duì)象上移動(dòng)鼠標(biāo) MouseupMouseup當(dāng)鼠標(biāo)指針停在一個(gè)對(duì)象上時(shí)，用當(dāng)鼠標(biāo)指針停在一個(gè)對(duì)象上時(shí)，用戶釋放鼠標(biāo)按鈕戶釋放鼠標(biāo)按鈕 interactivechangeinteractivechange以交互方式改變對(duì)象值以交互方式改變對(duì)象值 programmaticchangeprogrammaticchange以編程方式改變對(duì)象值以編程方式改變對(duì)象值 266.4 相關(guān)事件相關(guān)事件問題：容器和它包含的控件都設(shè)置了某事件的響應(yīng)代碼，系統(tǒng)如何處理這個(gè)事件。

16、為控件編寫事件的處理代碼時(shí)，應(yīng)注意兩條原則：兩條原則： （1）容器不處理與所包含的控件相關(guān)聯(lián)的事件 （2）如果沒有與控件相關(guān)聯(lián)的事件代碼，Visual FoxPro將在類層次的更高層上檢查是否有與此事件相關(guān)聯(lián)的控件代碼 6.4. 2 容器層次事件和類層次中的事件容器層次事件和類層次中的事件276.4 相關(guān)事件相關(guān)事件6.4. 2 容器層次事件和類層次中的事件容器層次事件和類層次中的事件例外：對(duì)于選項(xiàng)按鈕組與命令按鈕組來說，組中個(gè)別按鈕如果沒有編寫事件處理代碼，則當(dāng)事件發(fā)生時(shí)將執(zhí)行組事件的處理代碼。例如，在如圖6-4所示的表單中有一個(gè)選項(xiàng)按鈕組（設(shè)置Click事件處理代碼），該選項(xiàng)按鈕組中有二個(gè)

17、選項(xiàng)按鈕（選項(xiàng)按鈕Option1有Click事件處理代碼而選項(xiàng)按鈕Option2無Click事件處理代碼），則當(dāng)用戶單擊Option1時(shí)執(zhí)行與之相關(guān)聯(lián)的事件代碼，不執(zhí)行按鈕組的Click事件處理代碼，但當(dāng)用戶單擊Option2時(shí)執(zhí)行按鈕組的Click事件處理代碼。（p128 圖6-4 按鈕組中的事件代碼.scx） 選項(xiàng)組具有相關(guān)的Click 事件處理代碼 具有相關(guān)的 Click事件處理代碼 無相關(guān)的 Click事件處理代碼 286.4 相關(guān)事件相關(guān)事件F問題：程序的運(yùn)行伴隨著一系列的事件的產(chǎn)生。如何查看這些事件的發(fā)生順序。FP156 表5-7 vfp中事件順序，交互事件未列出F*對(duì)于表單，事件

18、的激發(fā)順序?yàn)椋?Load Init Activate Destroy Unload *對(duì)于表單上的某個(gè)控件，激發(fā)順序?yàn)椋?InitWhenGotFocusValidLostFocusDestroy 6.4. 3 事件激發(fā)的順序事件激發(fā)的順序296.4.4 常用的事件常用的事件F鼠標(biāo)事件鼠標(biāo)事件FMouseMoveMouseMove事件事件FClickClick事件事件FRightClickRightClick事件事件FDblClickDblClick事件事件302. 鍵盤事件鍵盤事件FKeyPressKeyPress事件事件313. 改變控件內(nèi)容的事件改變控件內(nèi)容的事件FInteractive

19、ChangeInteractiveChange事件事件在使用鼠標(biāo)或鍵盤更改控件的值在使用鼠標(biāo)或鍵盤更改控件的值時(shí)發(fā)生時(shí)發(fā)生324. 焦點(diǎn)事件焦點(diǎn)事件F焦點(diǎn)焦點(diǎn)(Focus)用以指出當(dāng)前被操作的對(duì)象FGotFocusGotFocus事件事件 用任何方法使對(duì)象接受到焦點(diǎn)時(shí)發(fā)生用任何方法使對(duì)象接受到焦點(diǎn)時(shí)發(fā)生PROCEDURE Object.GotFocus LPARAMETERS nIndexFLostFocusLostFocus事件事件 當(dāng)某個(gè)對(duì)象失去焦點(diǎn)時(shí)發(fā)生當(dāng)某個(gè)對(duì)象失去焦點(diǎn)時(shí)發(fā)生335. 表單事件表單事件FLoadLoad事件（表單和表單集）事件（表單和表單集） 創(chuàng)建對(duì)象之前發(fā)生創(chuàng)建對(duì)象之

20、前發(fā)生 Load事件發(fā)生在事件發(fā)生在Activate和和GotFocus事件之前事件之前FUnLoadUnLoad事件（表單和表單集）事件（表單和表單集） 在對(duì)象被釋放時(shí)發(fā)生在對(duì)象被釋放時(shí)發(fā)生 Unload事件發(fā)生在事件發(fā)生在Destroy事件和所有包含的對(duì)象被事件和所有包含的對(duì)象被釋放之后釋放之后347. 其他事件其他事件FTimerTimer事件事件 （用于計(jì)時(shí)器控件）（用于計(jì)時(shí)器控件） 當(dāng)經(jīng)過當(dāng)經(jīng)過Interval屬性中指定的毫秒數(shù)時(shí)發(fā)生屬性中指定的毫秒數(shù)時(shí)發(fā)生FInitInit事件事件 在創(chuàng)建對(duì)象時(shí)發(fā)生在創(chuàng)建對(duì)象時(shí)發(fā)生FDestroyDestroy事件事件 在釋放一個(gè)對(duì)象實(shí)例時(shí)發(fā)生在釋

21、放一個(gè)對(duì)象實(shí)例時(shí)發(fā)生FErrorError事件事件 當(dāng)某方法運(yùn)行出錯(cuò)時(shí)發(fā)生當(dāng)某方法運(yùn)行出錯(cuò)時(shí)發(fā)生356.4.5 事件驅(qū)動(dòng)和事件循環(huán)F事件驅(qū)動(dòng)事件驅(qū)動(dòng)程序代碼的執(zhí)行總是由某個(gè)事件的發(fā)生而引發(fā),執(zhí)行順序無法預(yù)料，而面向過程則是順序執(zhí)行。Message-based,event-driven,也是面向?qū)ο缶幊棠Ｐ筒捎玫姆椒?。F*利用VFP進(jìn)行應(yīng)用程序設(shè)計(jì)時(shí)，必須創(chuàng)建事件循環(huán)（event loop) READ EVENTS命令建立事件循環(huán) CLEAR EVENTS命令終止事件循環(huán) 若陷入了死循環(huán)，可以按ESC鍵強(qiáng)制中斷程序的運(yùn)行。366.5 方法F方法（程序）是對(duì)象能夠執(zhí)行的一個(gè)操作，由系統(tǒng)提供默認(rèn)的實(shí)

22、現(xiàn)代碼。F用戶可以調(diào)用這些方法程序。也可以為這些方法編寫自己的實(shí)現(xiàn)代碼。F使用方法程序可以減少我們寫代碼的數(shù)量。37常用的方法1. AddItem方法在組合框或列表框中添加一個(gè)新數(shù)據(jù)項(xiàng)，并且可以指定數(shù)據(jù)項(xiàng)索引2. RemoveItem方法從組合框或列表框中移去一項(xiàng)3. Release方法方法Release 方法是從內(nèi)存中釋放表單集或表單。其調(diào)用語法為：thisform.Release38常用的方法 4. Hide/Show方法方法 Hide 方法是通過把 Visible 屬性設(shè)置為“假”(.F.)，隱藏表單、表單集或工具欄。 其調(diào)用語法為：Object.Hide 表單被隱藏后，用戶不可訪問它的

23、控件，但是這些控件仍然可用，并且可以在代碼中訪問它們。雖然這些控件是不可見的，但這些保存在不可見表單中的控件仍然保留自己的 Visible 屬性設(shè)置值。5. Quit方法方法 Quit方法是結(jié)束一個(gè)VFP 實(shí)例，返回到創(chuàng)建VFP實(shí)例的應(yīng)用程序。 其調(diào)用語法為：ApplicationObject.Quit( )39常用的方法6. SetALL方法方法 SetAll 方法是為容器對(duì)象中的所有控件或某類控件指定一個(gè)屬性設(shè)置。 其調(diào)用語法為：Container.SetAll(cProperty, Value , cClass) 參數(shù)cProperty要設(shè)置的屬性。Value屬性的新值，Value 的數(shù)

24、據(jù)類型取決于要設(shè)置的屬性。cClass指定類名 40小結(jié)FOOP的意思：面向?qū)ο蟪绦蛟O(shè)計(jì)的意思：面向?qū)ο蟪绦蛟O(shè)計(jì)F類和對(duì)象的區(qū)別：類和對(duì)象的區(qū)別：F對(duì)象具有：屬性對(duì)象具有：屬性、方法方法、事件。事件。F基類分為兩種類型：容器類和控件類基類分為兩種類型：容器類和控件類F基類的最小事件集和最小屬性集基類的最小事件集和最小屬性集F相對(duì)引用時(shí)常用的關(guān)鍵字相對(duì)引用時(shí)常用的關(guān)鍵字F事件激發(fā)的順序事件激發(fā)的順序F建立事件循環(huán)和中止事件循環(huán)建立事件循環(huán)和中止事件循環(huán) 的命令的命令41作業(yè)FP163 填空題 全部，直接寫答案即可F選擇題自己做在書上！42考過的等級(jí)考試考題1. 類（ class ）是面向?qū)ο蟪绦蛟O(shè)計(jì)的核心。類具有許多特點(diǎn)，如抽象性、封裝性、繼承性等，其中 _ 是指包含和隱藏對(duì)象信息（如內(nèi)部數(shù)據(jù)結(jié)構(gòu)和代碼）的能力，使操作對(duì)象的內(nèi)部復(fù)雜性與應(yīng)用程序隔離開來。432. V