avuncle：類似問題本園地出現很多次了(請善用KTop搜尋)例：
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=57306
【問題】請問關於批次存檔以及批次讀檔的問題
答題得分者為:andychang1690
回答為：注意紅字部份！
試試下面簡單一點的方式；
FILE *out;
AnsiString filepath="C:\\a.txt"; // 不需要用char *filepath="a.txt";
out=fopen(filepath[.c_str(),"w"); // AnsiString 轉 Char 
fprintf(out,Memo1->Lines->Text.c_str());
if (fclose(out) != 0)
  fclose(out);
//----------------
這樣
for (int i=0;i<10;i  ) {
  filepath="C:\\a" IntTostr(i) ".txt";
}
讓a帶入integer不就簡單多了！
請參考！