在adodataset中如何动态的创建字段并批量增加记录。要求adodataset不和真实的数据库相连。然后在将此记录集转给adoquery或adotable?请解答?
解决方案 »
- 太孤单,没事吼吼
- 请问fastreport 怎么打印大文本?
- delphi中用Richtext控件写入sql server的一个Text字段,用Asp读取时不能正常显示,何解?
- 关于Indy的问题,比较麻烦,找了很久都没有答案!请高手解决!!!
- 有关B/S和C/S的比较
- 有没好的决策控件 DELPHI5上能用的 我觉得DELPHI5不是很好用
- 报这样的错:BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除,所需的操作要求一个当前的记录。
- 請再參與討論(我真的很痛苦,救救我吧).
- 关于TNMUDP component的sendstream问题
- 关于绕过MD5校验的问题
- 我是初学者:给我一个好的答案:解决后加到100分,我快没分了!!!!
- .cab 文件用什么軟件可以打開并編輯?
用SQL语句;//批量更新;
用clientdataset组件,可以
.Edit
.CreateDataSet
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DB, DBClient, Grids, DBGrids;type
TForm1 = class(TForm)
ClientDataSet1: TClientDataSet;
Button1: TButton;
DataSource1: TDataSource;
DBGrid1: TDBGrid;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
begin
with ClientDataSet1 do
begin
FieldDefs.Add('Code', ftString, 4);
FieldDefs.Add('Name', ftString, 8);
FieldDefs.Add('Data', ftFloat);
CreateDataSet;
AppendRecord(['0001', 'abc', 100.23]);
end;
end;end.
http://expert.csdn.net/Expert/TopicView1.asp?id=2414069