if sSaveFile <> '' then begin
    FslCsv.SaveToFile(sSaveFile);
  end;FslCsv的数据类型是TStringList,并且断点调试的时候也是'00000',
输出为Csv后打开却是'0',字符变成数值了??
请问怎么解决啊,晕死。

解决方案 »

  1.   

    str := ''' + str ; ---这样不行啊!
      

  2.   

    这个是Excel里默认的设置吧。
    加'呀。
      

  3.   

    改成用文本打开或者读取,不要用Excel打开,用Excel打开的时候,Excel总是会自作主张的做一些格式化处理
      

  4.   

    Currency Contract n ELIS reference Elis Code Item description Size
    USD 081-2037 0 955 Pant.H Atlanta bleu como PC 65/35 1
    USD 081-2037 0 3755 Blsn Atlanta gris/rouge PC 65/35 2
    USD 081-2037 0 3755 Blsn Atlanta gris/rouge PC 65/35 3
    USD 081-2037 0 3755 Blsn Atlanta gris/rouge PC 65/35 4
    USD 081-2037 0 3755 Blsn Atlanta gris/rouge PC 65/35 5
    USD 081-2037 0 3755 Blsn Atlanta gris/rouge PC 65/35 6
    USD 081-2037 0 3756 Blsn Atlanta gris/royal PC 65/35 3
    USD 081-2037 0 3756 Blsn Atlanta gris/royal PC 65/35 4
    USD 081-2037 0 3756 Blsn Atlanta gris/royal PC 65/35 5
    USD 081-2037 0 3756 Blsn Atlanta gris/royal PC 65/35 6
    如果只处理一行数据的话可以在00000前面加'变'00000
    但是我是用TStringList1.Add(TStringList2.CommaText)来存这些数据
    TStringList1.SaveToFile(sSaveFile);
    其实我输出的csv文件用记事本打开是下面这样的
    SD,"081-2037","000000","00955",Pant.H Atlanta bleu como PC 65/35,"01",25,5.14,128.50,
    USD,"081-2037","000000","03755",Blsn Atlanta gris/rouge PC 65/35,"02",20,6.21,124.20,
    USD,"081-2037","000000","03755",Blsn Atlanta gris/rouge PC 65/35,"03",40,6.21,248.40,