?? core11.htm
字號:
<html><head><title>第十一章 TClientDataSet http://jjlzg.yeah.net</title><meta http-equiv=Content-Type content="text/html; charset=gb2312"></head><body bgcolor="#00000" text="#00cc66"><p><b>第十一章 TClientDataSet</b><br> 與TTable、TQuery一樣，TClientDataSet也是從TDataSet繼承下來的，它通常用于多層體系結(jié)構(gòu)的客戶端。TClientDataSet最大的特點是它不依賴于BDE(Borland Database Engine)，但它需要一個動態(tài)鏈接庫的支持，這個動態(tài)鏈接庫叫DBCLIENT.DLL。在客戶端，也不需要用TDatabase構(gòu)件，因為客戶端并不直接連接數(shù)據(jù)庫。<br> 由于TClientDataSet是從TDataSet繼承下來的，所以，它支持諸如編輯、搜索、瀏覽、糾錯、過濾等功能。由于TClientDataSet在內(nèi)存中建立了數(shù)據(jù)的本地副本，上述操作的執(zhí)行速度很快。也正是由于TClientDataSet并不直接連接數(shù)據(jù)庫，因此，客戶程序必須提供獲取數(shù)據(jù)的機制。在Delphi 4中，TClientDataSet有三種途徑獲取數(shù)據(jù)：<br> .從文件中存取數(shù)據(jù)。<br> .從本地的另一個數(shù)據(jù)集中獲取數(shù)據(jù)。<br> .通過IProvider接口從遠程數(shù)據(jù)庫服務(wù)器獲取數(shù)據(jù)。<br> 在一個客戶程序中，可以同時運用上述三種機制獲取數(shù)據(jù)。 <br> <b>11.1 瀏覽和編輯數(shù)據(jù)</b><br> 和其他數(shù)據(jù)集構(gòu)件一樣，可以用標準的數(shù)據(jù)控件顯示由TClientDataSet引入的數(shù)據(jù)集，當然，這需要借助于TDataSource構(gòu)件。<br> 由于TClientDataSet是從TDataSet繼承下來的，所以，凡是其他數(shù)據(jù)集構(gòu)件支持的功能，TClientDataSet構(gòu)件也大致具備。不同的是，TClientDataSet能夠在內(nèi)存中建立數(shù)據(jù)的副本，因此，TClientDataSet比其他數(shù)據(jù)集構(gòu)件增加了一些特殊的功能。<br> 11.1.1 瀏覽數(shù)據(jù)<br> 可以用標準的數(shù)據(jù)控件顯示由TClientDataSet引入的數(shù)據(jù)集。在運行期，可以調(diào)用諸如First、GotoKey、Last、Next和Prior等函數(shù)來瀏覽數(shù)據(jù)。<br> TClientDataSet也支持書簽功能，可以用書簽來標記某條記錄，以后就可以方便地找到這條記錄。<br> 對于TTable、TQuery等數(shù)據(jù)集構(gòu)件來說，只能讀RecNo屬性來判斷當前記錄的序號。對于TClientDataSet構(gòu)件來說，還可以寫RecNo屬性，使某一序號的記錄成為當前記錄。<br> <b>11.1.2 CanModify屬性</b><br> TDataSet的CanModify屬性用于判斷數(shù)據(jù)集中的數(shù)據(jù)是否可以修改。CanModify屬性本身是只讀的，也就是說，數(shù)據(jù)是否能夠修改不取決于應(yīng)用程序。<br> 不過，TClientDataSet構(gòu)件有其特殊性，因為TClientDataSet已經(jīng)把數(shù)據(jù)在內(nèi)存中建立了副本，因此，應(yīng)用程序可以決定是否允許修改數(shù)據(jù)。如果不允許用戶修改數(shù)據(jù)，只要把ReadOnly屬性設(shè)為True，此時，CanModify屬性肯定返回False。<br> 與其他數(shù)據(jù)集構(gòu)件不同，修改TClientDataSet構(gòu)件的ReadOnly屬性時，不需要事先把Active屬性設(shè)為True。<br> <b>11.1.3 取消修改</b><br> TClientDataSet傳輸數(shù)據(jù)的基本單位稱為數(shù)據(jù)包，當前的數(shù)據(jù)包可以由Data屬性來訪問。不過，用戶對數(shù)據(jù)的修改并不直接反映到Data屬性中，而是臨時寫到一個日志即Delta屬性中，這樣做的好處是以后隨時可以取消修改。<br> 不過，這里要說明一點，盡管用戶的修改并沒有反映到Data，當用戶在數(shù)據(jù)控件中看到的卻是最新修改的數(shù)據(jù)。如果一條記錄被反復(fù)修改了多次，用戶看到的只是最新的數(shù)據(jù)，但日志中卻記載了多次。<br> 要取消上一次的修改，調(diào)用UndoLastChange函數(shù)。UndoLastChange需要傳遞一個布爾類型的參數(shù)叫FollowChange，如果FollowChange參數(shù)設(shè)為True，光標就移到被恢復(fù)的記錄上，如果FollowChange參數(shù)設(shè)為False，光標仍然在當前記錄上。<br> ChangeCount屬性返回日志中記載的修改次數(shù)。如果一條記錄被反復(fù)修改了多次，每調(diào)用一次UndoLastChange能夠逐級取消上一次的修改。<br> UndoLastChange只能取消上一次的修改，如果想一下子取消所有的修改，首先要選擇一個記錄，然后調(diào)用RevertRecord。RevertRecord將從日志中取消所有對當前記錄的修改。<br> TClientDataSet還有一個SavePoint屬性，它能把當前的編輯狀態(tài)保存起來，以后隨時可以返回當時的狀態(tài)。例如，可以這樣保存當前的狀態(tài)：<br> BeforeChanges := ClientDataSet1.SavePoint;<br> 以后，可以這樣來恢復(fù)當時的狀態(tài)：<br> ClientDataSet1.SavePoint := BeforeChanges;<br> 應(yīng)用程序可以保存多處狀態(tài)，可以恢復(fù)其中一個狀態(tài)，不過，一旦某個狀態(tài)被恢復(fù)，在其之后的狀態(tài)就無效。<br> 如果要一下子取消日志中記載的所有修改，可以調(diào)用CancelUpdates函數(shù)。CancelUpdates將把日志清空，取消所有的修改。<br> 如果LogChanges屬性設(shè)為False，用戶對數(shù)據(jù)的修改就會直接反映到Data屬性中。 <br> <b>11.1.4 合并修改</b><br> 要把日志中記載的修改合并到Data屬性中，有兩種方式，具體使用哪一種方式，取決于應(yīng)用程序獲取數(shù)據(jù)的機制。不過，不管是哪種機制，合并后，日志自動被清空。<br> 對于一個從文件中獲取數(shù)據(jù)的程序來說，只要調(diào)用MergeChangeLog函數(shù)，就把日志中記載的修改合并到Data屬性中。不用擔心其他用戶同時修改了數(shù)據(jù)。<br> 對于一個從應(yīng)用服務(wù)器獲取數(shù)據(jù)的程序來說，就不能調(diào)用MergeChangeLog來合并數(shù)據(jù)，而要調(diào)用ApplyUpdates函數(shù)，ApplyUpdates會把日志中記載的修改傳遞給應(yīng)用服務(wù)器，待應(yīng)用服務(wù)器成功地把數(shù)據(jù)更新了數(shù)據(jù)庫服務(wù)器后，才會合并到Data屬性中。<br> <b>11.1.5 糾錯</b><br> TClientDataSet支持糾錯功能。一般情況下，需要自己建立糾錯規(guī)則，以便對用戶輸入的數(shù)據(jù)進行糾錯。<br> 此外，如果獲得了IProvider接口的話，還可以從遠程服務(wù)器引入糾錯規(guī)則。<br> 有時候，客戶端可能需要暫時禁止糾錯，因為客戶端從應(yīng)用服務(wù)器檢索數(shù)據(jù)是分階段進行的，在所有的數(shù)據(jù)檢索完畢之前，有些糾錯規(guī)則很可能會報錯。 <br> 要暫時禁止糾錯，可以調(diào)用DisableConstraints，要重新允許糾錯，可以調(diào)用EnableConstraints函數(shù)。DisableConstraints和EnableConstraints實際上都是作用于一個內(nèi)部的計數(shù)。<br> <b>11.2 索 引</b><br> 使用索引有這么幾個好處：<br> .在數(shù)據(jù)集中定位記錄比較快。<br> .能夠在兩個數(shù)據(jù)集之間建立Lookup或Master/Detail關(guān)系。<br> .可以對記錄排序。<br> 在多層體系結(jié)構(gòu)中，當客戶程序從應(yīng)用服務(wù)器檢索數(shù)據(jù)時，它同時獲得了默認的索引。默認的索引叫DEFAULT_ORDER，可以使用這個索引排序，但不能修改或刪除這個索引。<br> 除了默認的索引外，TClientDataSet還對日志中記載的記錄自動建立了一個副索引叫CHANGEINDEX。與DEFAULT_ORDER一樣，不能修改或刪除這個副索引。<br> 另外，還可以使用數(shù)據(jù)集中已建立的其他索引，或者自己建立索引。<br> <b>11.2.1 創(chuàng)建一個新的索引</b><br> 要創(chuàng)建一個新的索引，可以調(diào)用AddIndex。AddIndex需要傳遞若干個參數(shù)：<br> 一是Name參數(shù)，用于指定索引名。在運行期切換索引時需要用到索引的名稱。<br> 二是Fields參數(shù)，它是一個字符串，用于指定索引中的字段名，彼此之間用分號隔開。<br> 三是Options參數(shù)，用于設(shè)置索引的選項，包含ixDescending元素表示按降序排列，包含ixCaseInsensitive元素表示大小寫不敏感。<br> 四是DescFields參數(shù)，它也是一個字符串，用于指定若干個字段名，這些字段將按照降序排列。<br> 五是CaseInsFields參數(shù)，它的作用與DescFields參數(shù)類似，包含在CaseInsFields參數(shù)中的字段將對大小寫不敏感。<br> 六是GroupingLevel參數(shù)，用于指定分組級別，其值不能超過索引中的字段數(shù)。<br> 下面的代碼創(chuàng)建了一個索引：<br> If Edit1.Text <> '' and ClientDataSet1.Fields.FindField(Edit1.Text) then<br> Begin<br> ClientDataSet1.AddIndex(Edit1.Text+'Index',Edit1.Text, <br> [ixCaseInsensitive],'','',0);<br> ClientDataSet1.IndexName := Edit1.Text + 'Index';<br> End;<br> 為了避免創(chuàng)建一個索引，可以臨時用IndexFieldNames屬性來指定若干個字段，讓數(shù)據(jù)集按這些字段排序。<br> <b>11.2.2 刪除和切換索引</b><br> 要刪除一個先前創(chuàng)建的索引，可以調(diào)用DeleteIndex并指定要刪除的索引名稱。注意：DEFAULT_ORDER和CHANGEINDEX不能刪除。<br> 如果建立了多個索引，可以任意選擇其中的一個索引，這就要用到IndexName屬性。<br> <b>11.2.3 用索引把數(shù)據(jù)分組</b><br> 選擇了一個索引后，數(shù)據(jù)集將自動按其中的字段進行排序。這樣，臨近的記錄往往在關(guān)鍵字段上含有相同的值。例如，假設(shè)有一個表是這樣的：<br> SalesRep Customer OrderNo Amount<br> 1 1 5 100<br> 1 1 2 50<br> 1 2 3 200<br> 1 2 6 75<br> 2 1 1 10<br> 2 3 4 200<br> 可以看出，SalesRep字段的值有重復(fù)的。對于SalesRep字段的值為1的來說，Customer字段的值也有重復(fù)的。這就是說，可以按SalesRep字段分組，進而再按Customer字段分組。顯然，這里的分組級別是不同的，按SalesRep字段建立的分組屬于第一級，按Customer字段建立的分組屬于第二級。實際上，分組級別取決于字段在索引中的順序。<br> TClientDataSet可以決定是否按照分組級別來顯示記錄的值。例如，也許想以下面這種形式顯示數(shù)據(jù)：<br> SalesRep Customer OrderNo Amount<br> 1 1 5 100<br> 2 50<br> 2 3 200<br> 6 75<br> 2 1 1 10<br> 2 3 4 200<br> 要判斷當前記錄某一級的什么位置，可以調(diào)用GetGroupState函數(shù)。GetGroupState函數(shù)需要傳遞一個參數(shù)，用于指定分組級別。<br> <b>11.3 計 算 字 段</b><br> 與其他數(shù)據(jù)集一樣，也可以在TClientDataSet建立的數(shù)據(jù)集中增加計算字段。計算字段的值是基于同一個記錄中的其他字段計算出來的。<br> 在其他數(shù)據(jù)集中，只要用戶修改了數(shù)據(jù)或當前記錄發(fā)生改變，就會觸發(fā)OnCalcFields事件，換句話說，計算字段的值就被計算一次。<br> TClientDataSet引入了“內(nèi)部計算字段”的概念。與一般的計算字段不同的是，內(nèi)部計算字段的值將隨其他字段的值一起存取，這樣，只有當用戶修改了數(shù)據(jù)才會觸發(fā)OnCalcFields事件，如果僅僅改變了當前記錄，不會觸發(fā)OnCalcFields事件。也就是說，內(nèi)部計算字段的值需要重新計算的機會大大減少。<br> 在處理OnCalcFields事件的句柄中，首先要判斷State屬性。如果State屬性返回dsInternalCalc，此時需要計算內(nèi)部計算字段的值。如果State屬性返回dsCalcFields，此時需要計算一般的計算字段的值。<br> <b>11.4 統(tǒng) 計 值</b><br> TClientDataSet增加了統(tǒng)計的功能，它可以基于分組自動計算總和、平均、計數(shù)、最大、最小值。當用戶編輯數(shù)據(jù)時，這些統(tǒng)計值會自動跟著變化。<br> <b>11.4.1 指定統(tǒng)計方式</b><br> 要指定怎樣進行統(tǒng)計，就要用到Aggregates屬性。這個屬性是一個TAggregates對象，它用于管理一組TAggregate對象。<br> 在設(shè)計期，可以單擊Aggregates屬性邊上的省略號按鈕打開如圖11.1所示<br> 的編輯器。<br> 圖11.1 管理一組TAggregate對象<br> 單擊按鈕可以增加一個TAggregate對象，單擊按鈕可以刪減一個TAggregate對象，單擊按鈕可以把TAggregate對象前移，單擊按鈕可以把TAggregate對象后移。<br> 可以用字段編輯器專門創(chuàng)建一個用于表達統(tǒng)計值的字段，該字段的類型必須是“Aggregate”。Delphi 4會自動創(chuàng)建一個TAggregate對象，并加到Aggregates屬性中。選擇一個TAggregate對象，Object Inpector將顯示該對象的屬性。<br> 其中，Expression屬性用于指定統(tǒng)計表達式，例如：<br> Sum(Field1)<br> 也可以是比較復(fù)雜的表達式：<br> Sum(Qty * Price) - Sum(AmountPaid)<br> 在表達式中，可以使用下列統(tǒng)計運算符：<br> .Sum計算一組數(shù)據(jù)的總和。<br> .Avg計算一組數(shù)據(jù)的平均值。<br> .Count計算一組數(shù)據(jù)中的非空值的個數(shù)。<br> .Min計算一組數(shù)據(jù)的最小值。<br> .Max計算一組數(shù)據(jù)的最大值。<br> 除了上述幾個統(tǒng)計運算符外，還可以使用過濾條件中所能使用的運算符，但不能嵌套。在一個表達式中，可以混合出現(xiàn)幾個統(tǒng)計值或常量，但不能混合出現(xiàn)統(tǒng)計值和字段。<br> Sum(Qty * Price){合法}<br> Max(Field1) - Max(Field2){合法}<br> Avg(DiscountRate) * 100{合法}<br> Min(Sum(Field1)){非法，不能嵌套}<br> Count(Field1) - Field2{非法，統(tǒng)計值和字段不能混合出現(xiàn)在一個表達式中}<br> <b>11.4.2 指定分組</b><br> 默認情況下，統(tǒng)計值是基于數(shù)據(jù)集中所有的記錄計算出來的。不過，也可以針對一部分記錄計算統(tǒng)計值，這就需要事先建立分組。<br> 前面在介紹索引時已經(jīng)提到分組的概念。可以通過IndexName屬性和GroupingLevel屬性來選擇使用哪個索引以及最大的分組級別。<br> 例如，假設(shè)有一個表是這樣的：<br> SalesRep Customer OrderNo Amount<br> 1 1 5 100<br> 1 1 2 50<br> 1 2 3 200<br> 1 2 6 75<br> 2 1 1 10<br> 2 3 4 200<br> 如果要按SalesRep字段分組，并且指定其中的第一級，程序代碼應(yīng)當這樣寫：<br> Agg.Expression := 'Sum(Amount)';<br> Agg.IndexName := 'SalesCust';<br> Agg.GroupingLevel := 1;<br> Agg.AggregateName := 'Total for Rep';<br> <b>11.4.3 怎樣獲取統(tǒng)計值</b><br> 要獲取統(tǒng)計值，可以調(diào)用TAggregate對象的Value函數(shù)。如果統(tǒng)計值是基于數(shù)據(jù)集中所有的記錄計算出來的，隨時可以調(diào)用Value函數(shù)。如果統(tǒng)計值是基于分組計算出來的，必須保證當前記錄正好位于該分組內(nèi)。因此，在調(diào)用Value之前，最好先調(diào)用GetGroupState函數(shù)看看當前記錄是否位于該分組內(nèi)。<br> 要在數(shù)據(jù)控件中顯示統(tǒng)計值，必須事先在字段編輯器中創(chuàng)建一個永久字段對象，該字段的類型必須是Aggregate。<br> <b>11.5 數(shù) 據(jù) 包</b><br> 通過Data屬性可以訪問客戶程序從應(yīng)用服務(wù)器檢索到的數(shù)據(jù)。程序示例如下：<br> Procedure TForm1.Button1Click(Sender: TObject);<br> Begin<br> ClientDataSet1.Data := ClientDataSet1.Provider.DataRequest(FilterEdit.Text);<br> End;<br> <b>11.5.1 直接對Data屬性賦值</b><br> 前面講過，客戶程序既可以通過IProvider接口獲取數(shù)據(jù)，也可以從另一個數(shù)據(jù)集獲取數(shù)據(jù)，后者就是通過Data屬性賦值的。程序示例如下：<br> ClientDataSet1.Data := ClientDataSet2.Data;<br> 一旦Data被賦值，就可以用標準的數(shù)據(jù)控件顯示這些數(shù)據(jù)。<br> 注意：當從另一個數(shù)據(jù)集獲取數(shù)據(jù)時，另一個數(shù)據(jù)集的日志也將被復(fù)制過來，但不包括原來的范圍和過濾條件。<br> 如果要從另一個基于BDE的數(shù)據(jù)集中獲取數(shù)據(jù)，可以通過數(shù)據(jù)集構(gòu)件的Provider屬性，程序示例如下：<br> ClientDataSet1.Data := Table1.Provider.Data;<br> 如果要從一個自定義的數(shù)據(jù)集獲取數(shù)據(jù)，首先要創(chuàng)建一個臨時的TProvider構(gòu)件，然后設(shè)置其DataSet屬性指定這個自定義的數(shù)據(jù)集。程序示例如下：<br> TempProvider := TDataSetProvider.Create(Form1);<br> TempProvider.DataSet := SourceDataSet;<br> ClientDataSet1.Data := TempProvider.Data;<br> TempProvider.Free;<br> <b>11.5.2 在數(shù)據(jù)包中加入自定義的信息</b><br> 可以把自定義的信息加到數(shù)據(jù)包中。當把數(shù)據(jù)保存到文件或流中時，這些自定義的信息也將保存到文件或流中。如果把數(shù)據(jù)包直接賦值給另一個數(shù)據(jù)集的話，這些自定義的信息也將被復(fù)制。<br> 要把自定義的信息加到數(shù)據(jù)包中，可以調(diào)用SetOptionalParam函數(shù)。要從數(shù)據(jù)包中檢索自定義的信息，可以調(diào)用GetOptionalParam。程序示例如下：<br> Procedure TAppServer.Provider1UpdateData(Sender: TObject; DataSet: TClientDataSet); <br> var<br> WhenProvided: TDateTime;<br> Begin<br> WhenProvided := DataSet.GetOptionalParam('TimeProvided');<br> ...<br> End;<br> <b>11.5.3 克隆另一個數(shù)據(jù)集</b><br> 調(diào)用TClientDataSet的CloneCursor函數(shù)可以獲得一個數(shù)據(jù)集的完全相同的副本。它與直接通過Data屬性賦值是有區(qū)別的。<br> 區(qū)別之一：數(shù)據(jù)在兩個數(shù)據(jù)集之間是共享的，修改其中一個將同時修改另一個。<br> 區(qū)別之二：除了數(shù)據(jù)外，CloneCursor函數(shù)還復(fù)制了一些屬性和事件，這取決于Reset和KeepSettings參數(shù)怎樣設(shè)置。<br> CloneCursor函數(shù)需要傳遞三個參數(shù)，其中，Source參數(shù)指定源數(shù)據(jù)集，Reset參數(shù)和KeepSettings參數(shù)用于設(shè)置除了數(shù)據(jù)外是否還要復(fù)制下列屬性和事件：Filter、Filtered、FilterOptions、OnFilterRecord、IndexName、MasterSource、MasterFields、ReadOnly、RemoteServer、ProviderName、Provider。<br> 如果Reset和KeepSettings參數(shù)都設(shè)為False，源數(shù)據(jù)集的上述屬性和事件都將被復(fù)制給目標數(shù)據(jù)集。如果Reset參數(shù)設(shè)為True，目標數(shù)據(jù)集的上述屬性和事件都將被清空。如果Reset參數(shù)設(shè)為False，而KeepSettings參數(shù)設(shè)為True，目標數(shù)據(jù)集的上述屬性和事件不變，不過，必須保證這些屬性和事件與克隆后的數(shù)據(jù)相容。<br> <b>11.6 與應(yīng)用服務(wù)器通訊</b><br> 在多層體系結(jié)構(gòu)中，客戶程序通過IProvider接口與應(yīng)用服務(wù)器交換數(shù)據(jù)。這一章介紹怎樣在客戶端獲得IProvider接口、怎樣向應(yīng)用服務(wù)器傳遞參數(shù)、怎樣向應(yīng)用服務(wù)器請求數(shù)據(jù)、怎樣把用戶對數(shù)據(jù)的修改寫到數(shù)據(jù)庫中。<br> <b>11.6.1 怎樣在客戶端獲得IProvider接口</b><br> 在單層應(yīng)用程序以及工作在“公文包”模式下的多層應(yīng)用程序中，不需要用到IProvider接口。而在多層體系結(jié)構(gòu)中，客戶程序要與應(yīng)用服務(wù)器交換數(shù)據(jù)，首先必須獲得IProvider接口，這就要用到RemoteServer屬性和ProviderName屬性。<br> RemoteServer屬性用于指定客戶端的MIDAS連接構(gòu)件。MIDAS連接構(gòu)件又稱Data Broker，用于建立和維護與應(yīng)用服務(wù)器的連接。<br> 在設(shè)計期，正確設(shè)置了RemoteServer屬性后，就可以在對象觀察器中為ProviderName屬性選擇一個值，實際上就是選擇應(yīng)用服務(wù)器上的一個TProvider構(gòu)件。<br> <b>11.6.2 向應(yīng)用服務(wù)器傳遞參數(shù)</b><br> 客戶程序可以向應(yīng)用服務(wù)器傳遞參數(shù)，這些參數(shù)實際上是傳遞給應(yīng)用服務(wù)器上的TQuery構(gòu)件或TStoredProc構(gòu)件。既可以在設(shè)計期也可以在運行期設(shè)置參數(shù)。<br> 在設(shè)計期，可以單擊Params屬性邊上的省略號按鈕，打開一個如圖11.2所示的編輯器。<br> 圖11.2 設(shè)置參數(shù)<br> 單擊按鈕可以增加一個參數(shù)，單擊按鈕可以刪減一個參數(shù)，單擊按鈕可以把一個參數(shù)前移，單擊按鈕可以把一個參數(shù)后移。<br> 選擇一個參數(shù)，對象觀察器將顯示該參數(shù)(TParam對象)的屬性。<br> 在運行期可以調(diào)用TParams的CreateParam函數(shù)來創(chuàng)建一個參數(shù)。例如，下面的代碼創(chuàng)建了一個參數(shù)叫CustNo，它的使用類型是ptInput，數(shù)據(jù)類型是ftInteger，它的值設(shè)為605。<br> With ClientDataSet1.Params.CreateParam(ftInteger, 'CustNo', ptInput) Do<br> AsInteger := 605;<br> 設(shè)置好參數(shù)以后，如果TClientDataset的Active屬性是False，只要把Active屬性設(shè)為True，這些參數(shù)將被自動傳遞給應(yīng)用服務(wù)器。如果Active屬性已經(jīng)為True，就要調(diào)用SendParams函數(shù)把參數(shù)傳遞給應(yīng)用服務(wù)器。<br> 注意：傳遞給應(yīng)用服務(wù)器的參數(shù)必須與TQuery構(gòu)件或TStoredProc構(gòu)件的參數(shù)匹配，包括名稱、數(shù)據(jù)類型和參數(shù)類型。<br> <b>11.6.3 怎樣向應(yīng)用服務(wù)器請求數(shù)據(jù)</b><br> TClientDataSet提供了兩個屬性和三個方法，用于怎樣向應(yīng)用服務(wù)器請求數(shù)據(jù)：<br> 一是FetchOnDemand屬性。如果這個屬性設(shè)為True，TClientDataSet會根據(jù)需要自動檢索附加的數(shù)據(jù)包，例如BLOB字段的值或者嵌套表的內(nèi)容。如果這個屬性設(shè)為False，程序需要顯式地調(diào)用GetNextPacket才能獲得這些附加的數(shù)據(jù)包。<br> 二是PacketRecords屬性，用于設(shè)置一個數(shù)據(jù)包中最多可容納的記錄數(shù)，設(shè)為-1表示一個數(shù)據(jù)包可以容納數(shù)據(jù)集的所有記錄。<br> 三是GetNextPacket函數(shù)，用于向應(yīng)用服務(wù)器檢索下一個數(shù)據(jù)包，并把檢索到的數(shù)據(jù)包添加到前一次檢索到的數(shù)據(jù)包的后面。這個函數(shù)返回實際檢索到的記錄數(shù)。<br> 四是FetchBlobs過程，用于從應(yīng)用服務(wù)器檢索BLOB字段的值。如果FetchOnDemand屬性設(shè)為True，就沒必要調(diào)用FetchBlobs函數(shù)。<br> 五是FetchDetails過程，用于檢索嵌套表中的數(shù)據(jù)。如果FetchOnDemand屬性設(shè)為True，就沒必要調(diào)用FetchDetails函數(shù)。<br> <b>11.6.4 更新數(shù)據(jù)庫</b><br> 在多層體系結(jié)構(gòu)中，用戶在客戶端修改了數(shù)據(jù)后，需要把最新的數(shù)據(jù)寫到數(shù)據(jù)庫中，這就要調(diào)用TClientDataSet的ApplyUpdates函數(shù)。<br> ApplyUpdates只需要傳遞一個參數(shù)叫MaxErrors，用于指定一個整數(shù)，當遇到無法更新的記錄超過這個數(shù)時，此次更新就中止。如果MaxErrors參數(shù)設(shè)為0，表示只要遇到一個錯誤更新就中止，客戶端的日志保持不變。如果MaxErrors參數(shù)設(shè)為-1，當應(yīng)用服務(wù)器發(fā)現(xiàn)有錯誤的記錄，就嘗試更新下一個記錄，等所有的記錄都嘗試過以后才返回。<br> ApplyUpdates會自動調(diào)用Reconcile函數(shù)，進而調(diào)用應(yīng)用服務(wù)器上的TProvider構(gòu)件的ApplyUpdates函數(shù)去更新遠程的數(shù)據(jù)庫服務(wù)器。沒有被DBMS服務(wù)器認可的記錄通過Reconcile返回給客戶端，此時將在客戶端觸發(fā)OnReconcileError事件讓您更正錯誤。最后，ApplyUpdates函數(shù)返回仍然沒有被認可的記錄數(shù)。<br> <b>11.7 在文件中存取數(shù)據(jù)</b><br> 要從文件中讀取數(shù)據(jù)，可以調(diào)用LoadFromFile函數(shù)。LoadFromFile函數(shù)需要傳遞一個參數(shù)，用于指定文件名。文件名應(yīng)包含完整的路徑。如果客戶程序總是從一個固定的文件中讀取數(shù)據(jù)，可以設(shè)置FileName屬性指定一個文件名，以后，當TClientDataSet引入的數(shù)據(jù)集打開時，就自動從這個文件中讀取數(shù)據(jù)，不需要調(diào)用LoadFromFile。<br> 要從流中讀取數(shù)據(jù)，可以調(diào)用LoadFromStream。LoadFromStream需要傳遞一個參數(shù)，用于指定一個流對象。<br> 注意：LoadFromFile(LoadFromStream)只能從先前用SaveToFile(SaveToStream)保存的文件中讀取數(shù)據(jù)。<br> 要把數(shù)據(jù)保存到文件中，可以調(diào)用SaveToFile函數(shù)。SaveToFile需要傳遞一個參數(shù)，用于指定文件名。如果指定的文件已存在，文件中的數(shù)據(jù)將被覆蓋。如果客戶程序總是把數(shù)據(jù)保存到一個固定的文件中，可以設(shè)置FileName屬性指定一個文件名，當TClientDataSet引入的數(shù)據(jù)集關(guān)閉時，就自動把數(shù)據(jù)保存到這個文件中，不需要調(diào)用SaveToFile。<br> 要把數(shù)據(jù)保存到流中，可以調(diào)用SaveToStream。SaveToStream需要傳遞一個參數(shù)，指定一個流對象。<br> 注意：當把數(shù)據(jù)保存到文件或流中時，日志中記載的修改仍然保留。這樣，當下次調(diào)用LoadFromFile或LoadFromStream讀取數(shù)據(jù)時，仍然可以恢復(fù)原來的數(shù)據(jù)。</p></body></html>?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -