到成csv伪代码

TStringList *pList = new TStringList;

打开数据集
...

for(int i=0; i<数据集总数; i++)
{
    pList->Add(字段1 + String(char(0x09)) + 字段2
            + String(char(0x09)) + 字段3 + String(char(0x09)) +  字段4);
}

pList->SaveToFile("C://123.csv");

delete pList;

===========================================

pList->Add的时候不加回车换行，当然是一列了。
  pList->Add(字段1 + String(char(0x09)) + 字段2
            + String(char(0x09)) + 字段3 + String(char(0x09)) +  字段4+"/r/n");