zoukankan
html css js c++ java
TClientDataSet的操作
记性不好了,唉,这里写个被忘
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Grids, DBGrids, DB, DBClient, StdCtrls;
type
TForm1
=
class
(TForm)
Button1: TButton;
Button2: TButton;
ClientDataSet1: TClientDataSet;
DataSource1: TDataSource;
DBGrid1: TDBGrid;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R
*
.dfm}
procedure TForm1.Button2Click(Sender: TObject);
begin
ClientDataSet1.LoadFromFile(
'
E:\TEMP.XML
'
);
end;
procedure TForm1.Button1Click(Sender: TObject);
var tempClientDataSet : TClientDataSet;
begin
tempClientDataSet :
=
TClientDataSet.Create(self);
try
with tempClientDataSet
do
begin
with FieldDefs.AddFieldDef
do
begin
DataType :
=
ftInteger;
Name :
=
'
Field1
'
;
end;
with FieldDefs.AddFieldDef
do
begin
DataType :
=
ftdatetime;
Name :
=
'
Field2
'
;
end;
createDataSet;
appendRecord([
3
,now]);
appendRecord([
1
,now]);
appendRecord([
2
,now]);
tempClientDataSet.AddIndex(
'
T1
'
,
'
Field1
'
, []);
tempClientDataSet.IndexName :
=
'
T1
'
;
first;
while
not EOF
do
begin
showmessage(intToStr(FieldByName(
'
Field1
'
).AsInteger)
+
formatdatetime(
'
yyyymmdd HH:NN:DD
'
,FieldByName(
'
Field2
'
).AsDateTime ));
next;
end;
end;
tempClientDataSet.SaveToFile(
'
E:\TEMP.XML
'
);
finally
tempClientDataSet.Free;
end;
end;
end.
查看全文
相关阅读:
Git学习总结(11)——Git撤销操作详解
Spring学习总结(18)——Spring整合Mysql数据库一主多从、多主多从配置
Java Web学习总结(27)——JavaEE中Web服务器、Web容器、Application服务器区别及联系
ZT onActivityResult在android中的用法
转一个csdn看到的帖子:而立之年的程序猿失业了 [问题点数:0分,结帖人jinxingfeng_cn]
[EffectiveC++]item39:明智而审慎地使用private
[EffectiveC++]item38:通过复合塑膜出has -a 或“根据某物实现出”
zt C++ list 类学习笔记
zt C++标准库set类型
[EffectiveC++]item37:绝不重新定义继承而来的缺省参数值
原文地址:https://www.cnblogs.com/enli/p/642359.html
最新文章
error LNK2038: mismatch detected for '_ITERATOR_DEBUG_LEVEL': value '0' doesn't match value '
【转载】java class运行时热替换(hotswap)
JNI高级教程之数据类型转换
Android百度地图的使用
Android百度地图的使用
Struts2 利用拦截器 interceptor 控制登陆和访问权限
Struts2 利用拦截器 interceptor 控制登陆和访问权限
struts.xml配置详解
struts.xml配置详解
PhoneGap之自定义插件
热门文章
PhoneGap之自定义插件
Android 实现对图片 Exif 的修改(Android 自带的方法)
Android 实现对图片 Exif 的修改(Android 自带的方法)
Mysql学习总结(36)——Mysql查询优化
Java基础学习总结(63)——Java集合总结
Android学习总结(4)——Andorid Studio熟练使用
Java基础学习总结(62)——Java中的流和Socket
Java基础学习总结(61)——Java项目开发要注意的60个问题
Android学习总结(3)——Handler深入详解
Java基础学习总结(60)——Java常用的八种排序算法
Copyright © 2011-2022 走看看