内存表 ClientDataSet CreateDataSet
- unit Form_Main;
- interface
- uses
- Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
- Dialogs, DB, Grids, DBGrids, DBClient;
- type
- TForm1 = class(TForm)
- DBGrid1: TDBGrid;
- DataSource1: TDataSource;
- ClientDataSet1: TClientDataSet;
- procedure FormCreate(Sender: TObject);
- private
- public
- { Public declarations }
- end;
- var
- Form1: TForm1;
- implementation
- {$R *.dfm}
- procedure TForm1.FormCreate(Sender: TObject);
- var
- i: Integer;
- begin
- with ClientDataSet1 do
- begin
- FieldDefs.Add('ID', ftInteger, , False);
- FieldDefs.Add('Name', ftString, , False);
- FieldDefs.Add('Gender', ftInteger, , False);
- FieldDefs.Add('Age', ftInteger, , False);
- IndexDefs.Add('PK', 'ID', [ixPrimary, ixUnique]);
- CreateDataSet;
- DisableControls;
- for i := to do
- begin
- Append;
- FieldByName('ID').AsInteger := i;
- FieldByName('Name').AsString := 'User' + IntToStr(i);
- FieldByName('Gender').AsInteger := Random();
- FieldByName('Age').AsInteger := Random();
- Post;
- end;
- EnableControls;
- end;
- end;
- end.
- procedure TFormMain.FormCreate(Sender: TObject);
- begin
- self.ClientDataSet1.FieldDefs.Add('Name',ftString,50);
- self.ClientDataSet1.FieldDefs.Add('Age',ftString,50);
- self.ClientDataSet1.CreateDataSet;
- self.ClientDataSet1.AppendRecord(['100','100']);
- self.ClientDataSet1.AppendRecord(['100','100']);
- self.ClientDataSet1.AppendRecord(['100','100']);
- self.ClientDataSet1.AppendRecord(['100','100']);
- self.ClientDataSet1.AppendRecord(['100','100']);
- self.ClientDataSet1.AppendRecord(['100','100']);
- self.DataSource1.DataSet:=self.ClientDataSet1;
- end;
- procedure TFormMain.BitBtn1Click(Sender: TObject);
- begin
- self.ClientDataSet1.AppendRecord(['1001','100']);//添加新纪录
- self.ClientDataSet2.Data:=self.ClientDataSet1.Delta;
- self.DataSource1.DataSet:=self.ClientDataSet2;
- end;
内存表 ClientDataSet CreateDataSet的更多相关文章
- delphi 新版内存表 FDMemTable
c++builder XE 官方demo最全60多个 http://community.embarcadero.com/blogs?view=entry&id=8761 FireDAC.Com ...
- kbmMemTable关于内存表的使用,以及各种三层框架的评价
关于内存表的使用(kbmMemTable) 关于内存表的使用说明一. Delphi使用内存表1.1 Delphi创建内存表步骤:1. 创建一个Ttable实例.2. 设置一个DataBaseName为 ...
- 关于Delphi内存表的使用说明
关于Delphi内存表的使用说明: 1.建立临时表 数据输入是开发数据库程序的必然环节.在Client/Server结构中,客户端可能要输入一批数据后,再向服务器的后台数据库提交,这就需要在本地(客 ...
- 基于海明距离的加权平均值人职匹配模型(Sqlserver2014/16内存表实现)
最近给某大学网站制作一个功能,需要给全校所有的学生提供就业单位发布职位的自动匹配,学生登陆就业网,就可以查看适合自己的职位,进而可以在线投递. 全校有几万名学生,注册企业发布的职位也有上万,如何在很短 ...
- mysql的内存表和临时表
内存表: session $ mysql -uroot root@(none) ::>use test Database changed root::>CREATE TABLE tmp_m ...
- MySQL内存表-临时表
HEAP表是访问数据速度最快的MySQL表,他使用保存在内存中的散列索引.但如果MySQL或者服务器重新启动,表中数据将会丢失.用法:如论坛的在线人数统计,这种表的数据应该是无关紧要的,就几个简单的字 ...
- sql server 2014内存表
内存数据库,指的是将数据库的数据放在内存中直接操作.相对于存放在磁盘上,内存的数据读写速度要高出很多,故可以提高应用的性能.微软的SQL Server 2014已于2014年4月1日正式发布,SQL ...
- MySQL内存表的特性与使用介绍
国内私募机构九鼎控股打造APP,来就送 20元现金领取地址:http://jdb.jiudingcapital.com/phone.html内部邀请码:C8E245J (不写邀请码,没有现金送)国内私 ...
- sql server 是否存在内存表?
最近开发有个需求,需要使用到函数,但是函数中需要使用case when 判断分支,其实可以放到一张表中读取分支:但是物理表需要I/O开销,几十W的数据,线上开销也是很大的,所以就想sql server ...
随机推荐
- map端join
package my.hadoop.hdfs.mapreduceJoin; import java.io.BufferedReader; import java.io.FileInputStream; ...
- excel表格系列
MicroSoft Excel表格系列问题 1.excel表格修改默认行高 2.[Excel技巧]Excel实现部分保护技巧
- 8168开发之---1g内存换成512M的内存映射配置
最近在帮新来同事调式内存分配,起初是将config.bld 中的内存在标配的基础上减少sr1,和tiler 将dsp从9m增加到16m,然后编译通过, 可是在加载的时候卡住了,init.sh 过,lo ...
- iOS拓展:react-native创建工程的坑和解决方法
正文 首先,在创建工程之前,你需要有环境.这个网上很多,不赘述. 我们直接从创建工程开始,一步步记叙这过程. 坑一 一.打开终端,cd到你放文件的位置(我放在桌面了): yuqideMacBook-A ...
- HTML5 - 新增的元素,删除的元素
1,HTML5新增的元素(1)用于构建页面的语义元素:<article>,<aside>,<figcaption>,<figure>,<foote ...
- 九度OJ 1193:矩阵转置 (矩阵计算)
时间限制:1 秒 内存限制:32 兆 特殊判题:否 提交:1673 解决:1132 题目描述: 输入一个N*N的矩阵,将其转置后输出.要求:不得使用任何数组(就地逆置). 输入: 输入的第一行包括一个 ...
- java.util包下面的类---------01---示意图
一直在使用util包下面的这些类,甚至有些没用过的,想要都去认识认识他们!也许在未来的一天可以用到! 图太大不好截图!部分没有截全!
- 2.二级接口ListableBeanFactory
这个随笔主要讲的是ListableBeanFactory package org.springframework.beans.factory; import java.lang.annotation. ...
- php7下 xhprof安装与使用
需要测试下 代码的性能,使用了 xhprof + xhgui 1. 下载xhprof, 这里下载吧 :https://github.com/longxinH/xhprof.git 2, 安装 cd x ...
- SMARTFORMS自定义打印格式
[转自 http://lz357502668.blog.163.com/blog/static/16496743201272155135570/] 在sap的打印开发中经常需要自定义纸张,具体步骤如下 ...