読み込んだファイルのテキストすべてを表示させたい。


現在、embarcadero RAD Studio 10.3でプログラミングを行っています。

[以前の質問](https://ja.stackoverflow.com/q/60697/35993)
で、テキストファイルを読み込むことができましたが、テキストファイル内には文字列が4行入っており、表示されたメッセージボックスには最初の1行目の文字列の”testtest12”のみが表示されるだけです。

残りの4行もすべてメッセージボックスに表示させるにはどのようにプログラムしたらよいでしょうか？  
どうぞ、よろしくお願いします。

[code]

    void __fastcall TTCP_Client::FormCreate(TObject *Sender)
    {
    
        AnsiString filename = "SaveFile.txt";
    
        //filename += ".csv";
    
        ifstream fin;
        fin.open(filename.c_str(), ios::in);
    
        if( !(fin.fail()) )
        {
            string line;
            getline(fin, line);
            AnsiString str(line.c_str());
            ShowMessage(str);
        }
        else
        {
            StatusBar1->Panels->Items[0]->Text = "Save file does not exist!";
        }
    
    }
    
[/code]




とりあえず、ShowMessageで読み込んだファイルのテキストを出力できました。  
ShowMessageでエラー出ていましたが、AnsiString
str(line02.c_str());を追加することで解決しました。AnsiString型に渡してやらないとエラーが回避できないのがよくわからない感じです（＾＾；

[code]

    using namespace std;
    
    void __fastcall TTCP_Client::FormCreate(TObject *Sender)
    {
    
        AnsiString filename = "SaveFile.txt";
    
        ifstream fin;
        fin.open(filename.c_str(), ios::in);
    
        if( !(fin.fail()) )
        {
            string line;
            string line02;
    
            while(getline(fin,line))
            {
                //cout << "[" << line << "]" << endl;
                //line02 << "[" << line << "]" << endl;
                line = "[" + line;
                line = line + "]\r\n";
                line02 = line02 + line;
    
    
            }
    
            AnsiString str(line02.c_str());
            ShowMessage(str);
        }
        else
        {
            StatusBar1->Panels->Items[0]->Text = "Save file does not exist!";
        }
    
    }
    //---------------------------------------------------------------------------
    
[/code]




とりあえず、ShowMessageで読み込んだファイルのテキストを出力できました。  
ShowMessageでエラー出ていましたが、AnsiString
str(line02.c_str());を追加することで解決しました。AnsiString型に渡してやらないとエラーが回避できないのがよくわからない感じです（＾＾；

[code]

    using namespace std;
    
    void __fastcall TTCP_Client::FormCreate(TObject *Sender)
    {
    
        AnsiString filename = "SaveFile.txt";
    
        ifstream fin;
        fin.open(filename.c_str(), ios::in);
    
        if( !(fin.fail()) )
        {
            string line;
            string line02;
    
            while(getline(fin,line))
            {
                //cout << "[" << line << "]" << endl;
                //line02 << "[" << line << "]" << endl;
                line = "[" + line;
                line = line + "]\r\n";
                line02 = line02 + line;
    
    
            }
    
            AnsiString str(line02.c_str());
            ShowMessage(str);
        }
        else
        {
            StatusBar1->Panels->Items[0]->Text = "Save file does not exist!";
        }
    
    }
    //---------------------------------------------------------------------------
    
[/code]

