сравнение Мемо и Едит

[mojohead]

неполучается сравнить данные в Мемо и Едит код компилируется но потом выдаёт ошибку

void __fastcall TForm1::Button1Click(TObject *Sender)
{
 int mas[14];int i;
 for (i=0;i<=13;i++)
  { mas[i]=StrToInt(Memo1->Lines->Strings[i-1]);}
 if (Edit2->Text==StrToInt(Memo1->Lines->Strings[i]))
  Edit1->Text="Правильно";
}

[evg_m]

Lines->Strings[i-1] какая это будет строка при i=0 // for (i=0;i<=13;i++)

Ошибка при преобразовании пустой ('') строки. Пустая строка это не число. только человек может догадаться что здесь можно подставить 0 а может быть 1 Все зависит от контекста. Программа про контекст ничего не знает (если ее специально не обучали данному).