如何用 BCB 讀文字檔?

[Shyong Jian Shyu]

二甲同學：

 

有同學問讀文字檔內整數的問題；我做了個小程式(如附件) 給各位參考。

 

注意：

(1) 在 Form1 上請放入 OpenDialog 物件 (在工具盒 Dialog 頁籤中可找到，長得像 "檔案開啟" 的 icon)；

(2) # include <stdio.h>

 

即可用

 

FILE *FOpen;
        int x, y;
 if (OpenDialog1->Execute() )
 {         FOpen = fopen(OpenDialog1->FileName.c_str(), "r+");
            fscanf(FOpen, "%d %d", &x, &y);
            Memo1->Lines->Add(OpenDialog1->FileName);
            Memo1->Lines->Add("x="+IntToStr(x));
            Memo1->Lines->Add("y="+IntToStr(y));
 }

 fclose(FOpen);

 

透過 Windows fileIO 對話盒，選出文字檔；讀得裏面的2個整數。

我的測試檔在解壓的 folder 內: "新文字文件.txt"

 

祝 順利

 

熊大