第十五章數(shù)據(jù)訪問部件的應(yīng)用及編程二-文庫吧在線文庫
【正文】 ge，其基本形式是： SetRange([起始值 ]， [結(jié)束值 ]) 3. ApplyRange 方法 根據(jù) SetRangeStart,SetRangeEnd 或 SetRange 方法說明的檢索范圍的起始和結(jié)束記錄，具體設(shè)定一個檢索范圍，調(diào)用 ApplyRange 方法之后， 應(yīng)用程序只能對檢索范圍內(nèi)的記錄進(jìn)行有關(guān)的操作。 then := 。 又如：假設(shè)一個表中的一個索引包含兩個字段 LastName 和 FirstName，我們?yōu)樗饕械囊粋€字段或多個字段指定相應(yīng)的字段值，設(shè)定數(shù)據(jù)庫表的 使用范圍。 上述代碼設(shè)定的范圍包括 LastName 字段的值大于或等于 Smith 的所有記錄。Smith39。如果我們是在 Paradox 或dBASE 數(shù)據(jù)庫中的表中查找記錄，那么查找值所對應(yīng)的字 段必須是表中的關(guān)鍵字段或輔助索引字段。 ④ 調(diào)用 GotoKey 方法，并測試它的返回值檢驗查找是否成功。下面的代碼可以測試調(diào)用 GotoKey 方法之后的返回值，告知用戶查找是否成功。如果想為多個字段指定查找值，只能為相鄰的字段指定查找值，例如輔助索引中共有三個字段，那么我們只能為第一個字段、第一和第二個字段、第一和第二以及第三個字段指定查找值，而不能為第一和第三個字段指定查找值。例如，假設(shè) Customer 表中有一個名叫 CityIndex 的輔助索引，我們?yōu)?CityIndex 中的字段指定查找值進(jìn)行查找時，首先設(shè)置 TTable 部件的IndexName 屬性為 CityIndex， 然后再進(jìn)行查找，下面是具體的程序代碼： := 39。 使用 Find 方式：使用 Find 方式在數(shù)據(jù)庫中進(jìn)行數(shù)據(jù)查找的方法有： FindNearest方法和 FindKey 方法。 FindKey 方法和 FindNearest 方法的區(qū)別與 GotoKey和 GotoNearest 方法的區(qū)別是一樣的。 如創(chuàng)建 表和 表之間的一對多關(guān)系時，使用 Field Link Designer 如圖 所示。 Enable 屬性： Enable 屬性可以暫時性地切斷 TDataSource 部件和與之相連的數(shù)據(jù)集部件的連接。 TDataSource 部件的事件 TDataSource 部件具有三個事件： ● OnDataChange 事件 ● OnStateChange ● OnUpdataData OnDataChange 事件：當(dāng)與 TDataSource 相 連的數(shù)據(jù)集中的記錄指針的位置發(fā)生改變時，該事件就被觸發(fā)，也就是說當(dāng)程序調(diào)用數(shù)據(jù)集部件的 Next、 Previous、Insert、 Append 等方法導(dǎo)致記錄指針的位置發(fā)生改變時，便會觸發(fā)該事件。Inactive39。SetKey39。 begin := ( = dsBrowse)。 表 字段部件的類型 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 字段部件的類型 對應(yīng)的數(shù)據(jù)類型 ──────────────────────────── TStringField 字符串類型的字段 TSmallIntField 短整數(shù)類型的字段 32768－ 32767 TIntegerField 整數(shù)類型的字段 TWordField 正整數(shù)類型的字段 0－ 65535 TBooleanField 布爾型字段 TFloatField 浮點數(shù)類型的字段 TCurrenCyField 貨幣型字段 TDataField 日期型 TTimeField 時間型 TBCDField 小數(shù)位數(shù)固定的浮點數(shù) TDataTimeField 日期時間型字段 ━━━━━━━━━━━━━━━━━━━━━━━━━━━ 我們在本書中只介紹一些常見類型的字段部件的使用，其他類型字段部件的使用可以參看聯(lián)機(jī)幫助文件。同理，只有當(dāng) Table1 處于特入狀態(tài) (Insert 狀態(tài) )或編輯狀態(tài) (Edit 狀態(tài) )或查找狀態(tài)(SetKey 狀態(tài) )時， CancelBtn 按鈕才有效，也即用戶可以取消當(dāng)前插入的記錄、修改當(dāng)前的記錄以及查找到 的結(jié)果等。 類似地我們也可以通過檢測數(shù)據(jù)集部件的狀態(tài)來控制有關(guān)的按鈕和菜單項是否有效。Edit39。 OnStateChange 事件：當(dāng)與 TDataSource 部件相連的數(shù)據(jù)集部件的狀態(tài)發(fā)生改變時， 便觸發(fā)該事件。不過要實現(xiàn)上述這些功能， 一般不使用 TDataSource部件的 Enabled 屬性，而是調(diào)用數(shù)據(jù)集部件的 DisableControls 方法和EnableControls 方法，因為調(diào)用這兩個方法可以方便地控制與數(shù)據(jù)集部件相連的所有 TDataSource 部件以及與 TDataSource 部件相連的數(shù)據(jù)瀏覽部件。 TDataSource 部件本身十分簡單，它所擁有的屬性、事件和方法都比較少，在使用該部件時無需作太多的工作，它主要是為數(shù)據(jù)瀏覽部件服務(wù)的，如果在應(yīng)用程序中沒有使用數(shù)據(jù)瀏覽部件，我們也沒有必要為應(yīng)用程序設(shè)置 TDataSource 部件。如 := 39。 ([])。 {39。Sm39。 If not then ShowMessage(39。 {將 Table1 置成查找狀態(tài) } [0].AsString := 。 使用 Goto 方式進(jìn)行數(shù)據(jù)查找使用的方法有 SetKey 方法、 GotoKey 方法和GotoNearest
公司管理相關(guān)推薦
鄂ICP備17016276號-1