ADODateSet 的问题(DELPHI新手)

[htwoolotus]

以前用VB，JAVA现转到DELPHI 7
'-----------------------------------
VB里动态创建一个记录集是：
Dim rs As New ADODB.Recordset

'增加的栏位
rs.Fields.Append "column1", adVarChar, 20, adFldUpdatable
rs.Fields.Append "column2", adInteger, 20, adFldUpdatable

'打开记录集
rs.Open
'-----------------------------------

Delphi里的ADODateSet 对应的是ADODB.Recordset
请问在Delphi实现上面的功能（无数据源动态创建ADODataSet）。谢啦!

[aiirii]

一般直接用SQL語句來完成比較簡單

[htwoolotus]

To aiirii(ari-爱的眼睛):
数据库里没有表，请问一下SQL語句如何完成，有例子吗？

[htwoolotus]

第一次在DELPHI版发问。
很快有 aiirii(ari-爱的眼睛) 回答.感谢！

[qiume]

You can do it like this:
// uses ADOInt;
procedure TForm1.Button1Click(Sender: TObject);
var
ADODataSet1: TADODataSet;
begin
ADODataSet1 := TADODataSet.Create(nil);
try
with ADODataSet1.Recordset do
begin
Fields.Append('column1', adVarChar, 20, adFldUpdatable);
Fields.Append('column2', adInteger, 20, adFldUpdatable);
end;
finally
ADODataSet1.Free;
end;
end;

[htwoolotus]

试一试。

[htwoolotus]

To qiume(杜克[在Coder和Designer之间徘徊]) :
代码编译通过，应该没问题，
只不过执行的时候有一点其它问题,自己找一下原因。
感谢你帮助！

刚学DELPHI,感觉用DELPHI的哥们还不错。

[masterjames]

ADOQUERY