第十四章簡單數(shù)據(jù)庫應用的創(chuàng)建及mastapp介紹二-在線瀏覽
2024-11-08 15:30本頁面
【正文】 Editor 創(chuàng)建的永久性的，它們雖然在設計和運 行階段都是不可見，但是它們跟其他的對象一樣都擁有自己的屬性、方法和事件，因此我們在應用程序中是可以對字段對象進行控制和訪問的。 動態(tài)字段對象的訪問 動態(tài)字段對象存在于數(shù)據(jù)集部件 TTable 和 TQuery 部件中，它們是隨著磁盤上的數(shù)據(jù)庫文件的打開而動態(tài)生成的，并且每一個字段對象對應于數(shù)據(jù)庫表中的一個字段（即記錄的一列）， TTable 或 TQrery 部件中所有的字段對象存在屬性 Fields 列表中， Fields 列表中的字段對象就像數(shù)組元素一樣擁有自己的索引號，我們可以用這個索引號來訪問字段對象。訪問這些屬性的方法和處理其他對象一樣。標識符 39。 通過索引號來訪問 Fields屬性中的字段在使用 For循環(huán)對列號進行迭代時會非常有用。在 TTable 部件中，提供了一個名為 FieldByName 的方法以便讓我們通過列名訪問字段對象。CustNo39。標識符 39。 現(xiàn)在我們可以建立一個允許用戶通過字 段名和索引號來訪問 表中的字段對象的簡單窗體。 例 在窗體的 Oncreate 事件處理過程中訪問字段對象。 Begin with Table1 Do begin {通過索引號訪問字段對象 } Field[0].DisplayLabel:=39。 {通過字段名訪問字段對象 } FieldByName(39。).DisplayLabel:=39。 FieldByName(39。).DisplayLabel:=39。 FieldByName(39。).DisplayLabel:=39。 end。 在程序運行過程中訪問字段對象 永久性字段對象的訪問 通過字段編輯器 Fields Editor 建立的永久性字段對象的訪問 相對于動態(tài)字段對象的訪問要簡單得多，我們在程序中可以直接通過字段對象的名稱（即 Name 屬性）進行訪問?？蛻艟幪?39。 字段對象的讀取和賦值 通過字段對象的 Value 屬性，我們可以讀取字段對象的值，例如在如圖 所示的窗體中，單擊 Read 按鈕便可以將 表中當前記錄的COMPANY 字段的值讀取到編輯框 Edit1 中。Read Button1 字段值 Label1 Edit1 ━━━━━━━━━━━━━━━━━━━━━━━━ 其它部件的的屬性跟前面的例子一樣。 begin :=。 在這里要注意的是：從字段對象中讀取字段值時必須要將它賦給與之數(shù)據(jù)類型相匹配的變量，否則會出錯。如果類型不匹配，則要經(jīng)過一定的轉換才能夠相互賦值。 AsString 是字段對象的屬性，通過字段對象的 AsString 屬性可以讀取字段值并且將它轉換成字符串類型。 CustNoDouble: Double。 CustNoString: String。{類型相匹配，不需要轉換 } :=。{類型相匹配，不需要轉換 } CustNoInt:=。{類型不匹配，需要轉換 } 設定字段對象的顯示格式 我們即可以在設計階段設定字段對象的顯示格式，也可以在運行過程中通過程序代碼來設定字段對象的顯示格式。 在運行過程中我們通過程序代碼來設定字段 Phone 的顯示格式， 美國的電話表示形式與中 國的表示形式不一樣（如美國 8085550269,中國 (808) 5550269 ）， 為此我們將 phone 字段的值表示成中國式的形式。 Text:OpenString。 begin If DisplayText then begin Text:=。 Delete(Text,7,1)。(39。 Insert(39。,Text,1)。 end。 例如我們創(chuàng)建一個瀏覽 表中記錄的應用如圖 所示。 ２、在 Fields Editor 窗口中，單擊鼠標右鍵，選擇 New Fields 菜單項。選擇 Field Type 列表框中的 Currency 項， 并在 Field Name 文體 框中 輸入 Balance ， 這 樣我們自定 義了一個 CurrencyField 類型的字段 Balance。如圖 所示。當 Fields Editor 窗口重新出現(xiàn)時， 注意 Balance 已經(jīng)出現(xiàn)在 Fields 列表框中。 ６、從 Available Fields 列表框中， 按住 Ctrl 鍵并單擊鼠標左鍵， 選擇字段： OrderNo、 CustNo、 SaleDate、 ShipData、 ItemsTotal、 Amountpaid 以及 Balance. ７、單擊 OK按鈕，關閉 Add Field
公司管理相關推薦
鄂ICP備17016276號-1