一
概述
Delphi作為Windows下的一種快速開發工具
不僅能開發一般的Windows應用程序
而且還具有強大的數據庫應用程序開發功能
Delphi本身提供了對BDE
ODBC
ADO和InterBase幾種數據庫驅動的支持
能夠滿足不同應用對數據庫程序開發的需要
然而
在發布用Delphi開發的數據庫程序時
除了要安裝應用程序之外
還需要同時發布數據庫驅動程序
這對於一些只涉及單個或多個簡單表數據存儲的單機應用程序來說
就顯得有點頭重腳輕的感覺了
況且
有些應用程序本身需要存儲大量數據
但本身又要求結果短小精悍的話
用Delphi常規開發數據庫的方法就不能滿足需要了
那麼
有沒有辦法解決上述矛盾
開發出能脫離龐大的數據庫驅動程序的
瘦
數據庫單機應用程序呢?Delphi
在Midas控件面板中提供了一個TClientDataSet控件
可以很好地解決這個問題
二
TClientDataSet使用要點
TClientDataSet控件繼承自TDataSet
其數據存儲文件格式擴展名為
cds
是基於文件型數據存儲和操作的控件
該控件封裝了對數據進行操作處理的接口和功能
而本身並不依賴上述幾種數據庫驅動程序
基本上能滿足單機
瘦
數據庫應用程序的需要
.TClientDataSet的基本屬性和方法介紹
).FieldDefs: 字段定義列表屬性
開發者可通過單擊屬性編輯器中該屬性編輯按鈕
或在該控件上單擊右鍵選擇彈出菜單中的
Fields Editor
菜單進行字段編輯
設置完此屬性後
實際上就相當於定義了表的結構
如果想裝入已有的數據表的結構和數據
可通過單擊右鍵選擇彈出菜單中的
Assign Local Data
菜單
從彈出對話框中選取當前窗體中已與數據庫連接好的數據集控件名稱即可(當前窗體中必須已放置好要套用的數據集控件並打開激活)
使用注意
對於自定義的字段名表
該屬性編輯完後
該控件仍然無法打開
必須右鍵單擊該控件
選擇彈出菜單中的
Create DataSet
菜單
讓該控件以上述編輯的字段列表為依據
創建數據集後
才能夠被激活打開和使用
否則
會出現類似
ClientDataSet
: Missing data provider or data packet
的錯誤(包括在運行期
運行期可調用該控件的CreateDataSet方法
從而動態定義字段和表)
).FileName屬性
說明
數據存儲文件的名稱
因該控件是基於文件型的數據操作控件
因此
必須指定所操作的數據文件名稱(默認擴展名稱
cds)
從而打開和激活該控件
進而進行數據編輯
例
利用此屬性打開指定的
cds文件
var
Path: string;
begin
Path := ExtractFilePath(Application
ExeName); //取得可執行文件路徑
CDataSet
FileName := Path +
test
cds
;
CDataSet
Open;
end;
).CreateDataSet方法
說明
該方法以FieldDefs中的字段名表為結構建立數據集
常用來進行動態定義表
例
動態創建一具有姓名和年齡兩個字段的數據集
//創建字段名表
CDataSet
FieldDefs
Clear;
with CDataSet
FieldDefs
AddFieldDef do
begin
Name :=
Name
;
Size :=
;
DataType := ftString;
end;
with CDataSet
FieldDefs
AddFieldDef do
begin
Name :=
Age
;
DataType := ftInteger;
end;
//動態創建數據集
CDataSet
CreateDataSet;
//激活和打開該數據集
CDataSet
Open;
).Open方法
說明
打開和激活數據集控件
從而進行數據編輯
a
如果指定了FileName屬性
則直接用Open方法即可打開和激活該控件
見例
b
如果未指定FileName屬性
可使用例
方法動態創建和打開數據集
進而操作數據
).LoadFromFile和SaveToFile
說明
從文件中裝入表結構和數據以及存儲數據到文件
該方法類似於Word中的打開新文件和另存為的功能
例
:將數據集的數據存儲到指定文件中
CDataSet
SaveToFile(
c:\windows\desktop\test
cds
);
)
First(到首)
Prior(向前)
Next(向後)
Last(到尾)
Edit(編輯)
CanCel(取消編輯)
Post(保存)
Insert(插入記錄)
Append(添加記錄)
Delete(刪除)
Refresh(數據刷新)等數據集常用方法
說明
當指定了FileName屬性時
其Post方法可將數據存入指定的文件中
類似其SaveToFile方法
如果未指定存儲文件名
則Post方法只將數據存儲在RAM中
其它方法
同一般數據集控件使用方法
略
)
Filter
Filtered: 過濾篩選屬性
說明:用於篩選指定條件的記錄
用法同一般數據集控件
略
例
在已經激活打開的數據集中篩選性別為男性的記錄
CDataSet
Close;
CDataSet
Filter :=
性別=
+
男
+
;
CDataSet
Filtered := True;
CDataSet
Open;
.使用TClientDataSet控件的應用程序發布的注意事項
如前所述
使用TClientDataSet控件的程序發布時不需要任何數據庫驅動程序
大大節省了安裝文件的大小
但是
在發布程序時別忘了將Windows系統目錄下midas
dll(
KB)與應用程序一起發布(運行必須)
否則
程序仍然無法正常運行
三
結束語
通過使用Delphi中TClientDataSet控件
既實現了應用程序可徹底脫離數據庫驅動程序
也實現了常規數據集控件簡單易用的特性
為編寫
瘦
數據庫應用程序提供了一種技術方法和手段
上述程序在Pwindows
Delphi
下測試通過
From:http://tw.wingwit.com/Article/program/Delphi/201311/24702.html