TStringList *slFile=new TStringList;
   slFile->LoadFromFile("Test.txt");       for(int i=0; iCount; i  ) 
   {
         ShowMessage(slFile->Strings[i]); //slFile->Strings[0]是指第一行
   }
   delete slFile;        

引言: 如何開啟一個txt檔案，把裡面的資料一行一行的讀進來?(一次讀一行哦) ps:對於檔案的讀取的操作不懂，是否有相關資料可以研讀~請大家介紹一下~ 感謝大家哦~

void __fastcall TForm1::btnSelectFileClick(TObject *Sender)
{
    if( OpenDialog1->Execute() )
    {
        TStringList *sl = new TStringList;
        sl->LoadFromFile(OpenDialog1->FileName);            for(int i = 0; i < sl->Count; i  )
        {
            // 對 sl->Strings[i] 做處理
        }            memoInput->Lines->AddStrings(sl); // 把處理完的整份文件加到memo裡秀出來
        delete sl;
    }
}

FILE *file1;  // 文字檔案 結束時請delete file1;
if (OpenDialog1->Execute())
        file1=fopen(OpenDialog1->FileName.c_str(),"r");
else
        return ;
        
char msg[254];
AnsiString Msg;            fseek(file1, 0, SEEK_SET);
while (!feof(file1))
{
  StrPCopy(msg,'\0');
  fgets(msg, 254, file1);
  Msg=msg;  // 這是你要的
  .
  .
  .
  .
}            if (fclose(file1))
    fclose(file1);

#include 
 char buff[81];          ifstream infile("TextFile.txt");
      while (!infile.eof())
      {
       infile.getline(buff,sizeof(buff));
       ListBox1->Items->Add(buff);
      }
      infile.close();