var
  ClientDataSet1 : TClientDataSet;
  XMLTransformProvider1 : TXMLTransformProvider;
begin
  ClientDataSet1 := TClientDataSet.Create(nil);
  XMLTransformProvider1 :=  TXMLTransformProvider.Create(nil);  XMLTransformProvider1.TransformRead.TransformationFile := 'R_SignIn.xtr';
  XMLTransformProvider1.TransformWrite.TransformationFile := 'W_SignIn.xtr';
  XMLTransformProvider1.XMLDataFile := 'T_SignIn.XML';  ClientDataSet1.ProviderName :=  'XMLTransformProvider1' ;
  //ShowMessage(ClientDataSet1.ProviderName);
  ClientDataSet1.Active := true;    <<----运行这个就报错! 如果近件不用动态生成的话就OK!怪了
 // DataSource1.DataSet := ClientDataSet1;
  ShowMessage(ClientDataSet1.Fields[0].text);