The Art of Delphi Programming – Recently I came to the point where I had to export the tables of a database as CSV files. While in FireDAC there is TFDDataMove, I wasn’t able to use it as I encountered a bug in that component that rendered the output useless. (The bug has been fixed by Dmitry the day after I mentioned it, but is not publicly available yet.) So I wondered how such a simple CSV export can be done with things available in Delphi. Well, here it is:procedure ExportDataSetToCVS(DataSet: TDataSet; const FileName: string); var fld: TField; lst: TStringList; wasActive: Boolean; writer: TTextWriter; ...
Visits by Source
Users who voted for this posting