Застряло на переменной s1

[prikolist]

Здравствуйте программисты! начал изучать тему Файловый ввод/вывод. ПО книгу набрал код, ниже расположен, но застряло на s1, на этом месте

 infile.getline(s1,80);

а дальше не хочет идти, не подскажите пожалуйста, в чём здесь проблемма, или что нужно прописать. Вот код:

void __fastcall TForm1::Button1Click(TObject *Sender)
{

char sin[80];
ofstream outfile("Test.dat");
if(!outfile)
{
ShowMessage("Файл не удаётся создать");
return;
}

//Операторы записи в файл
outfile << "2*2 = " <<2*2;
//Закрытие файла
outfile.close();

//Открытие файла как входного потока
ifstream infile("Test.dat");
if(!infile)
{
ShowMessage("Файл не удаётся открыть");
return;
}
Memo1->Clear();
while(!infile.eof())
{
infile.getline(s1,80);
Memo1->Lines->Add(AnsiString(s1));
}
//Закрытие файла
infile.close();



}

[Sazary]

А что такое s1? Я что-то не вижу объявления этой переменной.

[pu4koff]

Вероятно там должно быть не s1, а sin )

[prikolist]

Да, спасибо, действительно, это опечатка в тексте, вместо s1 нужно было поставить sin