Шифрование файла

int TmF::Crypto(char key,AnsiString FileName){
int f;
int n;  //Число прочитанных байтов файлридом
char buf[250];   //Буффер ввода
char a;
int i;
if (FileExists(FileName)){
   f=FileOpen(FileName,fmOpenReadWrite);  //Открываем файл
   ShowMessage("it's work");
   while (n)                 //Пока есть прочитанные данные
    {n=FileRead(f,buf,250);              //Считываем 250 байт в буффер
     for (i=1; i<strlen(buf); i++)
      {a=buf[i];                         //Шифруем
       buf[i]=a ^ key;
       i++;
      }
     FileSeek(f,-n,1);                  //Возращаемся на n байтов назад
     FileWrite(f,buf,n);               //Записываем из буфера
    }
   FileClose(f);                 //Закрываем файл
  }
  else ShowMessage("файла не найден");
return 1;
}

while (n)   // Чему равно n в этом месте? Есть уверенность, что после объявления n не будет нулевым?
    {n=FileRead(f,buf,250);    // А почему 250? А если в файле нет 250 байт, что будет? Нешифрованным останется? А что будет с остатком?
     for (i=1; i<strlen(buf); i++) // Массивы индексируются с 0, а цикл с 1. Каждый 0 элемент массива незашифрован?
      {a=buf[i];  
       buf[i]=a ^ key;
       i++; // i уже увеличивается в цикле, теперь шифруем через символ?
      }