Шифрование файла методом цезаря (проблема не в алгоритме, а считывании)

{
AnsiString F_Name,Full_Name_Txt,Full_Name_Cry,Tocode,Shifr;
AnsiString Txt=".txt",Cry=".cry";
char *d_Tocode,*d_Shifr;
int K;
 
F_Name=Edit1->Text;
Full_Name_Txt=F_Name+Txt;
Full_Name_Cry=F_Name+Cry;
 
int s=Form8->ComboBox1->ItemIndex;
 
TStringList* spis1 = new TStringList;
spis1-> LoadFromFile(Full_Name_Txt);
int k = spis1-> Count;
 
int cFile = FileCreate(Full_Name_Cry);
 
// шифруем
for (int n=0; n<k; n++)
   {
     Tocode=spis1->Strings[n];
                for (int i = 1;i<=Tocode.Length();i++)
                {
                    K = ((unsigned char)Tocode[i] + s)%256;
                    Tocode[i] = (char)K;
                    K=0;
                }
    d_Tocode=Tocode.c_str();
    if (n != k-1) {Shifr=Tocode+char(10)+char(13);}
    else {Shifr=Tocode;}
    d_Shifr=Shifr.c_str();
 
    FileWrite(cFile,d_Shifr,Shifr.Length());
 
    Tocode="";d_Shifr="";d_Tocode="";Shifr="";
     }
 
FileClose(cFile);
 
 
  if (Tocode.Length()==Shifr.Length())
    {
    ShowMessage("Зашифрованно");
    }
  else ShowMessage("Ошибка шифрования");
}

    #include <fstream>
 
    std::ifstream is("in_file_name", std::ios::binary);
    std::ofstream os("out_file_name", std::ios::binary);
 
    while (true)
    {
        int c = is.peek();
        if (c == EOF) break;
        is.ignore();
 
        os.put(encode(c));
    }
 
    is.close();
    os.close();

    TFileStream *is = new TFileStream("in_file_name", fmOpenRead);
    TFileStream *os = new TFileStream("out_file_name", fmOpenWrite);
 
    while (true)
    {
        char c;
        if (!is->Read(&c, 1)) break;
 
        os->Write(encode(c), 1);
    }
 
    delete is;
    delete os;

int s=Form8->ComboBox1->ItemIndex;
//F_Name=Edit1->Text;
//const char Full_Name_Txt=F_Name+Txt;
//const char Full_Name_Cry=F_Name+Cry;
// вот тут проблема
FILE *Ftxt;
Ftxt=fopen("1.txt","rb");
FILE *Fcry;
Fcry=fopen("1.cry","w+b");
char ctxt,ccry;
int n=0;
if (Ftxt!=0)
    {
 
    while (!feof(Ftxt))
           {
            ctxt = fgetc (Ftxt);
            ccry = (ctxt+s)%256;
            fputc (ccry,Fcry);
            n++;
           };
    }
fclose(Ftxt);
fclose(Fcry);
}