第十四章 簡單數(shù)據(jù)庫應(yīng)用的創(chuàng)建及mastapp介紹（二）-文庫吧
2025-08-02 15:30 本頁面
【正文】 屬性 字段對象的訪問 字段對象在應(yīng)用程序中有動態(tài)生成的，也有通過字段編輯器 Fields Editor 創(chuàng)建的永久性的，它們雖然在設(shè)計和運 行階段都是不可見，但是它們跟其他的對象一樣都擁有自己的屬性、方法和事件，因此我們在應(yīng)用程序中是可以對字段對象進行控制和訪問的。 因為動態(tài)字段對象是沒有自己的名字的，永久性的字段對象有自己的名字，所以對這兩種字段對象的訪問方法是不一樣的。 動態(tài)字段對象的訪問 動態(tài)字段對象存在于數(shù)據(jù)集部件 TTable 和 TQuery 部件中，它們是隨著磁盤上的數(shù)據(jù)庫文件的打開而動態(tài)生成的，并且每一個字段對象對應(yīng)于數(shù)據(jù)庫表中的一個字段（即記錄的一列）， TTable 或 TQrery 部件中所有的字段對象存在屬性 Fields 列表中， Fields 列表中的字段對象就像數(shù)組元素一樣擁有自己的索引號，我們可以用這個索引號來訪問字段對象。索引號在程序運行時賦值，從0開始，表中最左邊的一列（第一個字段）的索引號為 0，緊接著右邊一個為 1，以此類推。訪問這些屬性的方法和處理其他對象一樣。 [0].DisplayLabel:=39。標(biāo)識符 39。 上述代碼讓我們訪問與 Table1 相連的數(shù)據(jù)庫表中的第一個字段，并為該字段指定一個標(biāo)題，這是通過設(shè)置它的 DisplayLabel 屬性值為一個特定的標(biāo)識符來實現(xiàn)的 。 通過索引號來訪問 Fields屬性中的字段在使用 For循環(huán)對列號進行迭代時會非常有用。但是在大多數(shù)簡單應(yīng)用程序中，通過列名（字段名）來訪問字段會更加明白而且易讀。在 TTable 部件中，提供了一個名為 FieldByName 的方法以便讓我們通過列名訪問字段對象。 (39。CustNo39。).DisplayLabel:=39。標(biāo)識符 39。 通過這種途徑同樣可以訪問 表中的 CustNo 字段， 并為該字段指定一個標(biāo)題信息。 現(xiàn)在我們可以建立一個允許用戶通過字 段名和索引號來訪問 表中的字段對象的簡單窗體。 字段對象的訪問 在該應(yīng)用窗體的運行過程中，我們通過程序來訪問其中的字段對象并設(shè)置有關(guān)的屬性，這一控制過程我們放在窗體的 OnCreate 事件處理過程中。 例 在窗體的 Oncreate 事件處理過程中訪問字段對象。 procedure (Sender:TObject)。 Begin with Table1 Do begin {通過索引號訪問字段對象 } Field[0].DisplayLabel:=39?？蛻艟幪?39。 {通過字段名訪問字段對象 } FieldByName(39。Company39。).DisplayLabel:=39。公司名稱 39。 FieldByName(39。Phone39。).DisplayLabel:=39。電話號碼 39。 FieldByName(39。LastInvoiceDate39。).DisplayLabel:=39。購買日期 39。 end。 end。 在程序運行過程中訪問字段對象 永久性字段對象的訪問 通過字段編輯器 Fields Editor 建立的永久性字段對象的訪問 相對于動態(tài)字段對象的訪問要簡單得多，我們在程序中可以直接通過字段對象的名稱（即 Name 屬性）進行訪問。 例如： :=39。客戶編號 39。 :=12。 字段對象的讀取和賦值 通過字段對象的 Value 屬性，我們可以讀取字段對象的值，例如在如圖 所示的窗體中，單擊 Read 按鈕便可以將 表中當(dāng)前記錄的COMPANY 字段的值讀取到編輯框 Edit1 中。 讀取字段對象的 字段值 窗體中各部件的屬性如表 所示 表 各部件的屬性 ━━━━━━━━━━━━━━━━━━━━━━━━ 部件的屬性 屬 性 值 ──────────────────────── amp。Read Button1 字段值 Label1 Edit1 ━━━━━━━━━━━━━━━━━━━━━━━━ 其它部件的的屬性跟前面的例子一樣。 為 Read 按鈕編輯的 OnClick 事件處理過程如下： procedure (Sender:TObject)。 begin :=。 end。 在這里要注意的是：從字段對象中讀取字段值時必須要將它賦給與之?dāng)?shù)據(jù)類型相匹配的變量，否則會出錯。在上面的程序代碼中， Table1Company 的類型是 TStringField 即是字符串類型的字段，而編輯框 Edit1 的屬性 Text 的類型也是字符串型的， 因而它們是匹配的 。如果類
公司管理相關(guān)推薦
鄂ICP備17016276號-1