Работа с файлами

[terredis]

нужно написать структуру, которая хранит имя, фамилию, отчество и дату рождения студента, который выполнил задание.
Структуру я написал, но вот как сохранять и читать данные я не разобрался(как должен выглядеть код?0
вот мой код (в данном коде в файле txt сохраняются какие-то иероглифы)

#include <vcl.h>
#pragma hdrstop
#include <stdio.h>
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{

}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
i++;
  t[i].fam=Edit1->Text;
  t[i].name=Edit2->Text;
  t[i].otches=Edit3->Text;
  t[i].year=StrToInt(Edit4->Text);

  if (CheckBox1->Checked==true)
   t[i].p1=true;
  else
   t[i].p1=false;

   if (CheckBox2->Checked==true)
   t[i].p2=true;
  else
   t[i].p2=false;

   if (CheckBox3->Checked==true)
   t[i].p3=true;
  else
   t[i].p3=false;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)
{ FILE*fi;
  fi=fopen("text.txt","w");
  if (fi==0)
  {
   Application->MessageBoxA ("Äàííûå îòñóòñòâóþò", "Îøèáêà!", mbYes);
  }
  for(int i=0;i<10;i++)
  if (t[i].p1==true || t[i].p2==true || t[i].p3==true)
  Memo1->Lines->Add(t[i].fam+" "+t[i].name+" "+t[i].otches+" "+t[i].year);
  fwrite  (&t[i],sizeof(t[i]),1,fi);
  fclose(fi);
}

описание структуры:
struct test {
AnsiString fam;
AnsiString name;
AnsiString otches;
int year;
bool p1;
bool p2;
bool p3;
};
test t[10];
int i=-1;

[terredis]

Люди! АУ) Кто-нибудь сможет помочь?

[nick42]

Во первых..

  Memo1->Lines->Add(t[i].fam+" "+t[i].name+" "+t[i].otches+" "+IntToStr(t[i].year));

а во вторых, слишком сложно с файлом. С мэмо все проще гораздо:

  Memo1->Lines->SaveToFile(".\\text.txt");

и в третьих, - с логическими переменными можно короче:

   t[i].p3 = CheckBox3->Checked ;

[terredis]

Спасибо, за помощь)

[terredis]

а если записывать данные так

Memo1->Lines->SaveToFile(".\\text.txt");

можно ли их прочитать в программе?(как с помощью fread())

[nick42]

-можно и fread, и Memo1->Lines->LoadFromFile(".\\text.txt");

[Smitt&Wesson]

в файле txt сохраняются какие-то иероглифы)

Меняй кодировку с UTF8 на WINDOWS.

[terredis]

можно подробнее где её сменить?

[terredis]

Меняй кодировку с UTF8 на WINDOWS.

сменил, но все равно какие-то иероглифы(