【正文】 話框： 單擊 【 確定 】 時系統(tǒng)將先按“學號”為 Grade表建立索引，然后才建立兩表間的關(guān)系。 RelationalExpr（ 指定基于父表中的字段而又與子表中的索引相關(guān)的表達式 ） 屬性的默認設(shè)置為主表中主關(guān)鍵字字段的名稱 。 這對應(yīng)于使用 SET RELATION命令時不發(fā)出 SET SKIP命令 。 返回 Visual foxpro 漳州師范學院計算中心 27 對象的添加 ? 利用 表單控件工具欄 向表單添加對象 ? (1)認識表單控件工具欄 文本框 選項按鈕組 微調(diào)控件 頁框 形狀 生成器鎖定 標簽 命令按鈕組 列表框 計時器 線條 超級連接 查看類 命令按鈕 組合框 圖象 ActiveX綁定控件 分隔符 選定對象 編輯框 復選框 表 格 ActiveX控件 容 器 命令鎖 基本容器控件 Visual foxpro 漳州師范學院計算中心 28 ? (2)在表單中創(chuàng)建對象方法 單擊表單控件工具欄的某控件按鈕，然后再單擊標單窗口某處，該處就會產(chǎn)生一對應(yīng)對象 ? (3)字段映像 – 字段映像概念 ：用鼠標將數(shù)據(jù)環(huán)境窗口中的某些對象拖放到表單中，并在表單上產(chǎn)生一個或多個對象，其中部分的對象已完成了數(shù)據(jù)綁定的過程。 也可用方向鍵對控件進行移動 。 （ 5） 刪除控件 選定不需要的控件 ， 然后按 Delete鍵 或選擇 【 編輯 】 |【 剪切 】 命令 （ 6） 對齊控件 選定一個或多個控件 ， 然后按 “ 格式 ” 菜單中的 “ 對齊 ” 可以實現(xiàn)控件的各種對齊方式的對齊 （ 7） 調(diào)整控件間距 選定多個控件 ， 然后按 “ 格式 ” 菜單中的 “ 水平間距 ”或 “ 垂直間距 ” 可以實現(xiàn)控件的水平或垂直間距的調(diào)整 Visual foxpro 漳州師范學院計算中心 33 對象組合框 選項卡 屬性設(shè)置框 屬性列表框 屬性說明信息 設(shè)置對象的屬性 屬性窗口能夠顯示當前對象的屬性、事件和方法程序，并允許更改屬性值，定義事件代碼和修改方法程序等。在一個應(yīng)用程序中，如果運行了一個模式表單，那么在關(guān)閉該表單之前不能訪問應(yīng)用程序中的其他表單 0 Visual foxpro 漳州師范學院計算中心 35 [例 ] 為 表創(chuàng)建如圖所示的表單，以實現(xiàn)記錄的翻頁與編輯。 Init：創(chuàng)建對象時發(fā)生的事件 。 Rightclick：鼠標右鍵單擊對象時發(fā)生的事件 。 InteractiveChange：以交互方式改變對象的值時發(fā)生的事件 。 Visual foxpro 漳州師范學院計算中心 41 VFP的事件代碼編寫 ? VFP事件代碼有三種 :VFP命令語句、屬性設(shè)置語句、方法與事件的調(diào)用語句 。 Visual foxpro 漳州師范學院計算中心 42 ? 在容器分層結(jié)構(gòu)中引用對象 控件 控件 控 件 表單集 組 選項 1 選項 2 表單 頁框 頁 表格 列 一種可能的容器嵌套方式 VFP對象分為容器類和控件類，在容器分層結(jié)構(gòu)中引用對象必須提供對象的地址，即指明它相對于容器分層結(jié)構(gòu)的關(guān)系 Visual foxpro 漳州師范學院計算中心 43 （ 1） 絕對引用 ：從最高容器開始逐層向下直到某個對象為止的引用稱為絕對引用 （ 2） 相對引用 ：從正在為編寫事件代碼的對象出發(fā)，通過逐層向高一層或低一層直到另一對象的引用稱為相對引用 使用相對引用常用到的所列關(guān)鍵字 關(guān)鍵字 引 用 THIS 引用該對象 THISFORM 引用該對象的表單 THISFORMSET 引用包含該對象的表單集 PARENT 引用包含該對象的直接容器 Visual foxpro 漳州師范學院計算中心 44 3. 引用格式： 關(guān)鍵字 . 對象名 . 屬性名 =屬性值 關(guān)鍵字 . 對象名 .方法名 說明： (1)引用可以是單級的 ? 例：引用本對象的 Caption (標題 )如按鈕： =“進入系統(tǒng)” ? 例：引用包含本對象表單的 Refresh(方法程序 ) ? 例： (“漳州師院 ” ) Visual foxpro 漳州師范學院計算中心 45 (2)引用也可以是多級的，但要逐級引用 例：引用本表單的對象 Label1的 Caption =“學籍管理系統(tǒng) ” (3)控件也可引用包含它的直接容器 例：引用包含本對象直接容器的 Caption屬性 =“退出 ” Visual foxpro 漳州師范學院計算中心 46 在程序中以命令方式來處理對象，首先需要知道對象相對于容器層次的關(guān)系。 對于 Txt1對象，我們可以用如下形式訪問： 若要訪問 Opt2對象，需用如下形式： 在容器層次中訪問對象時，還可以通過相對引用方式訪問到對象 使在對象 Txt1中要訪問對象 Group1，則可以使用： 或者 其中， THIS就代表 Txt1對象， THISFORM和Form1對象。 [表單文件 ] Form1的 init事件代碼： =RGB(0,0,255) =.t. =39。使其可見 .Enabled = .t. amp。使其背景為淺灰色 ENDWITH Visual foxpro 漳州師范學院計算中心 50 3. 編程調(diào)用對象的方法程序 VFP方法程序有的是帶參數(shù)，有的不帶參數(shù)，有的有返回值，有的沒有返回值。 例： (3)Setfocus方法 格式： 功能：用于給對象設(shè)置焦點 例： Visual foxpro 漳州師范學院計算中心 53 ?(4) Line方法 ?格式： (nxcoord2,nycoord2) 或 (nxcoord1,nycoord1,nxcoord2,nycoord2) ?參數(shù) : nXCoord1, nYCoord1指定線條起始點的坐標。在背景上畫線條的方式取決于 DrawMode 和 DrawStyle 屬性的設(shè)置。度量單位由表單的 ScaleMode 屬性確定。 說明 :要控制畫圓或橢圓的線寬，可設(shè)置 DrawWidth 屬性。 ? 功能 ：在表單上畫一個圓或橢圓。 (3) nXCoord, nYCoord參數(shù) 存放表單中鼠標指針當前的水平 (nXCoord) 和垂直 (nYCoord) 位置。amp。amp。amp。amp。amp。amp。傳遞參數(shù)給方法 =() amp。 “事件跟蹤”對話框中，選擇“開啟事件跟蹤”。 下面列出當啟動運行 VFP的表單時有關(guān)對象的事件順序，其他的事件依賴于用戶的動作或系統(tǒng)的反應(yīng)（如計時器的 Timer事件）。 (3)表單的 Load和 Unload及各對象的 Init事件在一個運行周期中只執(zhí)行一次。 ? 對于單表單的表單文件，用戶為表單定義的屬性和方法的作用范圍只是該表單；而表單集中定義的屬性和方法的作用范圍是表單集中的所有表單。 例如：可在“新建屬性”對話框的“名稱”框中輸入myarray(10,5)，創(chuàng)建一個 10行 5列的二維數(shù)組，還可以在“說明”框中輸入需要對該屬性進行說明的內(nèi)容，如“自定義數(shù)組”等。 [表單文件 ] ① 打開表單設(shè)計器，創(chuàng)建 Form1 ② 為 Form1創(chuàng)建一個用戶自定義屬性 Color,通過屬性窗口將 Color的值修改為 1 ③ 在表單的事件中編寫如下代碼： DO CASE CASE =1 FOR J=0 TO =RGB(255,255,； INT(J*255/)) (0,J,J) ENDFOR =黃色 Visual foxpro 漳州師范學院計算中心 74 CASE =2 FOR J=0 TO =RGB(255,； INT(J*255/),255) (0,J,J) ENDFOR =紅色 CASE =3 FOR J=0 TO =RGB(； INT(J*255/),255,255) (0,J,J) ENDFOR =蘭色 ENDCASE =iif(=3,1,+1) ④ 保存并運行 Visual foxpro 漳州師范學院計算中心 75 用戶定義方法程序 用戶定義方法程序：為表單或表單集所定義的過程 1. 方法程序的創(chuàng)建 ① 從 “ 表單 ” 菜單中選擇 “ 新建方法程序 ” 。調(diào)用用戶自定義方法程序和調(diào)用基類方法程序一樣，都使用下面的語法： 建立的方法程序同樣可以接受參數(shù)并返回值，這種情況下，可以使用賦值語句來調(diào)用方法程序： cVariable＝ （ cParameter, nParameter） Visual foxpro 漳州師范學院計算中心 76 方法程序創(chuàng)建后，并無代碼，用戶可雙擊“屬性”窗口中的方法程序，既可打開代碼編輯窗口再為其添加代碼。 （ 2） 在系統(tǒng)菜單中選擇 【 文件 】 |【 新建 】 命令 ， 或者單擊工具欄上的 “ 新建 ” 按鈕 ，打開 “ 新建 ” 對話框 ， 在文件類型欄中選擇 “ 表單 ”