Открыть txt-файл, прочитать, вывести на экран

#include <sysdefs.h>//подключаю класс String библиотеки VCL
void __fastcall TForm1::Button1Click(TObject *Sender)
{
//создание экземпляра str
String str;
str = "c:\\Save\\str.txt";
Label1->Caption = str.c_str();
}

#include <sysdefs.h>//класс String библиотеки VCL
#include <fstream> // подключаем библиотеку fstream считывание файла
using namespace std; //подключил для  fstream
void __fastcall TForm1::Button1Click(TObject *Sender)
{
//создание экземпляра str
String str;
ifstream arr; // создаем объект класса ifstream
arr.open("c:\\Save\\str.txt"); // открываем файл
//как преобразовать arr в str ?
Label3->Caption = str.c_str();

  Memo1->Lines->LoadFromFile(str);

void __fastcall TForm1::Button1Click(TObject *Sender)
{
String str;
str = "c:\\Save\\str.txt";
Memo1->Lines->LoadFromFile(str);
}

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   TOpenDialog *od = new TOpenDialog(this);
 
     od->Filter="TXT Files (*.txt)|*.txt";
    
      if(od->Execute())
         if(od->FileName!="")
          Memo1->Lines->LoadFromFile(od->FileName);
 
    delete od;
}

#include <sysdefs.h>//класс String библиотеки VCL
void __fastcall TForm1::Button1Click(TObject *Sender)
{
//создание экземпляра str
String str;
String str3;
 
str = "c:\\Save\\str.txt";// str Брать из "массива слов" постоянный_словарь_файл.txt
str3 = "c:\\Save\\str3.txt"; // str3 массив вывода , хранить в временный_Вывод_файл.txt
String str2; // str2 "ПРОМЕЖУТОЧНЫЙ массив"
str2 = "c:\\Save\\str2.txt";
 
str.Delete(1,1);
str2.Delete(2,16);
 
str3 = str3; //значение массива str3
str3 += str2; //присоединяем отрезок от str2
//преобразование str в char и вывод в Label
Label3->Caption = str.c_str();
Label1->Caption = str3.c_str();
}

#include <sysdefs.h>//класс String библиотеки VCL
void __fastcall TForm1::Button1Click(TObject *Sender)
{
//создание экземпляра str
String str;
String str3;
 
str = "c:\\Save\\str.txt";//здесь строка с адресом
str3 = "c:\\Save\\str3.txt"; // опять строка с адресом
String str2; // str2 "ПРОМЕЖУТОЧНЫЙ массив"
str2 = "c:\\Save\\str2.txt"; //еще одна строка с адресом
 
str.Delete(1,1); //тут получилось ":\\Save\str.txt"
str2.Delete(2,16); //тут получилось "с" удалили же со второго символа 16 штук подряд (не помню в String элементы кажись с 1 начинаются)
 
str3 = str3; //тут не понять кого обнять
str3 += str2; //О! получится  "c:\\Save\\str3.txt"+"с"
//преобразование str в char и вывод в Label
Label3->Caption = str.c_str(); //У Caption свойство то как-раз далеко не char а AnsiString || UnicodeString Зачем в char то?
Label1->Caption = str3.c_str(); //а Label'ы как-то используются для визуального оформления формы. Ничего особо полезного с ними не сделаешь :)
}

Label3->Caption = str.c_str();

    while (!feof(fin)) {
        char tmp = fgetc(fin);   
                //тут чего-нибудь делаем с переменной
             }

void __fastcall TfMain::Timer1Timer(TObject *Sender)
{
    AnsiString InitialCaption = Caption;
    Caption = Caption.SubString(1, (Caption.Length() - 1));
    if(!Caption.Length())
          Caption = InitialCaption;
}

    while (!feof(fin)) {
        char tmp = fgetc(fin);   
                //тут чего-нибудь делаем с переменной
             }

void __fastcall TfMain::Timer1Timer(TObject *Sender)
{
    AnsiString InitialCaption = Caption;
    Caption = Caption.SubString(1, (Caption.Length() - 1));
    if(!Caption.Length())
          Caption = InitialCaption;
}

#include <sysdefs.h>//класс String библиотеки VCL
String str;
str = "c:\\Save\\str.txt";
Memo1->Lines->LoadFromFile(str);
Label1->Caption = Memo1->Text;

TStringList * MyList = new TStringList;
MyList->LoadFromFile("str.txt");
ListBox1->Items->AddStrings(MyList);
Label1->Caption = MyList->Strings[0];

TStringList *MyList = new TStringList
...
delete MyList;

#include <memory>
...
std::auto_ptr<TStringList> MyList (new TStringList);