c++ TADOConnection TADOQuery TDataSetProvider TClientDataSet 動態創建

TADOConnection *myADOConnection=new TADOConnection(NULL);
TADOQuery *myADOQuery=new TADOQuery(NULL);
TDataSetProvider *mDataSetProvider=new TDataSetProvider(NULL);
TClientDataSet *mClientDataSet=new TClientDataSet(NULL);
myADOQuery->Connection=myADOConnection;
mDataSetProvider->DataSet=myADOQuery;
mClientDataSet->ProviderName="mDataSetProvider";
mClientDataSet->SetProvider(mDataSetProvider);
myADOConnection->ConnectionString="Provider=SQLOLEDB.1;Persist Security Info=False;User ID=用戶名;Password=密碼;Initial Catalog=數據庫;Data Source=服務器";
myADOConnection->LoginPrompt=false;
myADOConnection->Open();
myADOQuery->SQL->Clear();
myADOQuery->SQL->Add("select * from tablename");
myADOQuery->Active=true;
mClientDataSet->Active=true;
String resultstr=mClientDataSet->XMLData;
myADOQuery->Active=false;
mClientDataSet->Active=false;