Ошибка при шифровании

[disaer]

Здравствуйте, стоит задача:"Закодировать текстовый файл методом цезаря и бла бла бла..." С билдером не дружу вообще Шифрую с ключом "3". Все бы было хорошо, но вылетает ошибка памяти а потом появляется окошко. с текстом

char& __fastcall operator [](const int idx)
    {
      ThrowIfOutOfRange(idx);   // Should Range-checking be optional to avoid overhead ??
      Unique();                 // Ensure we're not ref-counted
      return Data[idx-1];
    }

Я конечно понимаю, что это вылет за индексы, но где и как исправить? И еще:"Это правильно Memo1->Text = Memo1->Text.Insert(a[k+3]%26,j); или как правильно будет, чтобы если индекс больше массива, индекс шел по кругу?"

void __fastcall TForm1::N7Click(TObject *Sender)
{
char a[26] = {'A','B','C','D','E','F','G','H','I','J','K','L','M','N',
'O','P','Q','R','S','T','U','V','W','X','Y','Z'};
char b[26] = {'a','b','c','d','e','f','g','h','i','j','k','l','m','n',
'o','p','q','r','s','t','u','v','w','x','y','z'};
int i=0,j=1;
char s[1]="";;
if(Memo1->Lines->Count==0)
{MessageBox(NULL, "Îòêðîéòå ëþáîé(íå ïóñòîé) òåêñòîâûé ôàéë", "Íåò äàííûõ äëÿ øèôðîâàíèÿ!!!", MB_OK | MB_ICONERROR);}
else
  {i=strlen(Memo1->Text.c_str());
     while(j<i)
     {
     if(j<i)
        {for(int k=0;k<26;k++)
          {if(Memo1->Text[j]==a[k])
             {Memo1->Text = Memo1->Text.Delete(j,1);
              Memo1->Text = Memo1->Text.Insert(a[k+3],j);
              break;
             }
           else
                {for(int r=0;r<26;r++)
                   {if(Memo1->Text[j]==b[r])
                     {Memo1->Text = Memo1->Text.Delete(j,1);
                      Memo1->Text = Memo1->Text.Insert(b[r+3],j);
                      break;
                     }
                     else
                       {s[1]=Memo1->Text[j];
                       Memo1->Text=Memo1->Text.Delete(j,1);
                       Memo1->Text=Memo1->Text.Insert(s[1],j);
                       }
                   }
                }
          }
        }
    j=j+1;
    }
  }
}

[Black Fregat]

Будет ошибка на буквах x-z, когда k или r будет слишком близко к концу массива?
Поставьте a[(k+3) % 26] или просто добавьте в конец массива 3 элемента из начала

И что за кусок в конце, с заменой символа сам на себя? Зачем это?

[disaer]

А это я перебивал весь цикл, забыл удалить наверное. Тут смысл был таков, что если не символ алфавита, то типо дальше по тексту...
Да ошибка исчезла, спасибо. Но теперь еще одна проблема.
Из строки:AbCdEf. получаю DbFdHf. И последний Символ тоже не шифруется Почему-то пропускаются малые буквы.

void __fastcall TForm1::N7Click(TObject *Sender)
{
char a[29] = {'A','B','C','D','E','F','G','H','I','J','K','L','M','N',
'O','P','Q','R','S','T','U','V','W','X','Y','Z','A','B','C'};
char b[29] = {'a','b','c','d','e','f','g','h','i','j','k','l','m','n',
'o','p','q','r','s','t','u','v','w','x','y','z','a','b','c'};
int i=0,j=1;
char s[1]="";;
if(Memo1->Lines->Count==0)
{MessageBox(NULL, "Îòêðîéòå ëþáîé(íå ïóñòîé) òåêñòîâûé ôàéë", "Íåò äàííûõ äëÿ øèôðîâàíèÿ!!!", MB_OK | MB_ICONERROR);}
else
  {i=strlen(Memo1->Text.c_str());
     while(j<i)
     {
     if(j<i)
        {for(int k=0;k<26;k++)
          {if(Memo1->Text[j]==a[k])
             {Memo1->Text = Memo1->Text.Delete(j,1);
              Memo1->Text = Memo1->Text.Insert(a[k+3],j);
              break;
             }
           else
                {for(int r=0;r<26;r++)
                   {if(Memo1->Text[j]==b[r])
                     {Memo1->Text = Memo1->Text.Delete(j,1);
                      Memo1->Text = Memo1->Text.Insert(b[r+3],j);
                      break;
                     }
                   
                   }
                }
          }
        }
    j=j+1;
    }
  }
}

[disaer]

Все, разобрался, был лишний If
Всем спасибо, код выглядит так

void __fastcall TForm1::N7Click(TObject *Sender)
{
char a[29] = {'A','B','C','D','E','F','G','H','I','J','K','L','M','N',
'O','P','Q','R','S','T','U','V','W','X','Y','Z','A','B','C'};
char b[29] = {'a','b','c','d','e','f','g','h','i','j','k','l','m','n',
'o','p','q','r','s','t','u','v','w','x','y','z','a','b','c'};
int i=0,j=1;
if(Memo1->Lines->Count==0)
{MessageBox(NULL, "Îòêðîéòå ëþáîé(íå ïóñòîé) òåêñòîâûé ôàéë", "Íåò äàííûõ äëÿ øèôðîâàíèÿ!!!", MB_OK | MB_ICONERROR);}
else
  {i=strlen(Memo1->Text.c_str());
     while(j<=i)
     {
      for(int k=0;k<26;k++)
          {if(Memo1->Text[j]==a[k])
             {Memo1->Text = Memo1->Text.Delete(j,1);
              Memo1->Text = Memo1->Text.Insert(a[k+3],j);
              break;
              }
          }
     for(int r=0;r<26;r++)
        {if(Memo1->Text[j]==b[r])
           {Memo1->Text = Memo1->Text.Delete(j,1);
           Memo1->Text = Memo1->Text.Insert(b[r+3],j);
           break;
           }
        }
        j=j+1;
     }
  }
}