哪位用过ADODataSet?

[r_james]

哪位用过ADODataSet，能不能告诉我怎么怎么使用，步骤具体点！
从初始化到释放！谢谢了！分不够可以加！

[zhoutian618]

设置ADODataSet的ConnectionString值。（联接数据库的信息）
设置ADODataSet的CommandText值。(需要执行的ＳＱＬ语句)
激活。

ADODataSet.ConnectionString:='Provider=SQLOLEDB.1;Persist Security Info=False;User ID=SA;Initial Catalog=master;Data Source=DRAGON';
ADODataSet.CommandText:='select * from Table1';
ADODataSet.Active:=True;

[r_james]

我是在过程中定义的ADODataSet,不用初始化吗？

procedure THRI_OrgForm.WriteTree(MyNode:TTreeNode;Grade:Integer);
var
ThisDataSet:TADODataSet;
begin

ThisDataSet.Connection:=DBConnectionUnit.DBConnection.DBADOConnection;
ThisDataSet.CommandText:='select * from tgORG_DeptInfo ';
ThisDataSet.CommandType:= cmdText;
ThisDataSet.Open();

end;

[anxing]

procedure THRI_OrgForm.WriteTree(MyNode:TTreeNode;Grade:Integer);
var
ThisDataSet:TADODataSet;
begin
ThisDataSet:=TADODataSet.Create(nil);
ThisDataSet.Connection:=DBConnectionUnit.DBConnection.DBADOConnection;
ThisDataSet.CommandText:='select * from tgORG_DeptInfo ';
ThisDataSet.CommandType:= cmdText;
ThisDataSet.Open();

.......// some you code

ThisDataSet.Free;
end;