本帖最后由 qinlouyiyue 于 2013-12-25 11:15:40 编辑

解决方案 »

  1.   

    那估计就是  RF:= Copy(OpenDialog1.FileName,4,length(OpenDialog1.FileName)-8)+'.DAT';有问题,RF获取的值不是有效的文件路径
      

  2.   

    你用TStringList.LoadFromFile(文件); 把文件读取这个TStringList,然后对这个TStringList操作,操作完后
    TStringList.SaveTo 保存为一个新文件就好了,其他的先别管,达到目的再说
      

  3.   

    这种直接找个带正则表达式的文本编辑工具来的更快,比如notepad++之类的。
      

  4.   

    给你个notepad++的正则表达式
    查找
    (\d+\.\d+)\.替换
    \1
      

  5.   

    果然方便 Notepad++很强大啊!