我正在开发一个Delphi应用程序,它需要从一段时间内获取行并将它们转换为单个XML文件,以便上传到第三方Web服务.
有没有可用的组件或库?如果没有,那么构建DB2XML转换器的最佳代码方法是什么?
我注意到大多数XML问题都是关于如何将其转换为另一种类型的数据.
注意:数据库将是MySQL或Firebird.
我使用devart(corelab)的Mydac组件从Delphi访问MySql(2006)我经常需要处理TClientDataSet中的数据什么是将TMyQuery的数据集转换为TClientDataSet的最佳方法目前我正在使用
var
MyQuery : TMyQuery;
Dsp : TDataSetProvider;
Cds : TClientDataSet;
begin
MyQuery := nil;
Dsp := nil;
Cds := nil;
try
MyQuery := TMyQuery.Create(nil);
Dsp := TDataSetProvider.Create(nil);
Cds := TClientDataSet.Create(nil);
MyQuery.Connection := TheConnection;
MyQuery.SQL.Text := CmdStr;
Dsp.DataSet := MyQuery;
Cds.SetProvider(Dsp);
Cds.Open;
////////////////////////////////////////////////////////////////////////
/// MAKE USES OF THE CDS //
////////////////////////////////////////////////////////////////////////
finally
FreeAndNil(Cds);
FreeAndNil(Dsp);
FreeAndNil(MyQuery);
end;
end;
Run Code Online (Sandbox Code Playgroud)
有没有更好的方法呢?