bcb2010保存空格分隔的账单成，分隔的账单

bcb2010保存空格分隔的账单成，分隔的账单。为什么呢？因为逗号分隔的保存成csv后缀，用电子表格打开直接是一个项目一个单元格，方便将来记账汇总

顺便呼吁一下某些银行信用卡账单不要用空格分隔了，太落后了，如果你直接是表格，我就不用在这里折腾这段代码了

下面关键代码：

OpenTextFileDialog1->InitialDir=ExtractFilePath(Application->ExeName);
 OpenTextFileDialog1->Filter="txt file(*.txt)|*.txt|All file(*.*)|*.*|";
 if (OpenTextFileDialog1->Execute())
 {
  path->Text=OpenTextFileDialog1->FileName;
        if(FileExists(path->Text))
  {
  Memo1->Clear();
  Memo1->Lines->LoadFromFile(path->Text);
  tip->SimpleText="文件已经打开！lines="+String(Memo1->Lines->Count);
        }else{
  tip->SimpleText="文件找不到！";
  }
    }

------------------------------

AnsiString  str=Memo1->Lines->GetText();
while(str.AnsiPos("  ")){
str= AnsiReplaceText( str,"  "," ");
}
str= AnsiReplaceText( str," ",",");
str= AnsiReplaceText( str,"-,","-");
Memo2->Clear();
Memo2->Lines->Add(str);
Memo2->Lines->SaveToFile("cib.csv");
tip->SimpleText="文件已经保存！";