Запись в файл и кодировка

#include <vcl.h>
#pragma hdrstop
#include <fstream.h>
 
#include "Unit7.h"
#include "Unit6.h"
 
void __fastcall TForm7::Button1Click(TObject *Sender)
{
    String s;  
    s="C:\\test";
    if(!DirectoryExists(s)) MkDir(s);
    Memo3->Lines->SaveToFile(s+"\\vopros.txt");
 
 
}
//---------------------------------------------------------------------------
 
void __fastcall TForm7::Button2Click(TObject *Sender)
{
    for (int i = 0; i < Memo2->Lines->Count; i++)
    {
    if (CheckBox1->Checked==true) Memo3->Lines->Append(":+ "+Memo2->Lines->Strings[i]);
    else Memo3->Lines->Append(":- "+Memo2->Lines->Strings[i]);
    }
}
//---------------------------------------------------------------------------
void __fastcall TForm7::Button3Click(TObject *Sender)
{
    for (int i = 0; i < Memo1->Lines->Count; i++)
    {
    if (i==0) Memo3->Lines->Append(":? "+Memo1->Lines->Strings[i]);
    else Memo3->Lines->Append("? "+Memo1->Lines->Strings[i]);
    }
}
//---------------------------------------------------------------------------

Memo1->Lines->Strings[i][k]
for(i=0;i<Memo1->Lines->Count;i++);
for(k=0;k<Memo1->Lines->Strings[i].Length();k++);
(char)((int)(Memo1->Lines->Strings[i][k]+1);