При редактировании выкидывает ошибку что поле ключевое

  //ОСНОВНЫЕ СВЕДЕНИЯ
        Form1->ADOQuery1->Close();
        //очищаем строки ввода SQL - запроса
        Form1->ADOQuery1->SQL->Clear();
        //добавляем запрос, выполняющий добавление записей
        Form1->ADOQuery1->SQL->Add("UPDATE osnov_sved SET \
         n_sotr='"+Edit1->Text+"', n_dolz='"+Edit9->Text+"', fam='"+Edit3->Text+"', name_s='"+Edit4->Text+"', otch='"+Edit5->Text+"', \
         data_rozhd='"+MonthCalendar1->Date+"', pol='"+ComboBox1->Text+"', tel='"+MaskEdit1->Text+"', stazh_rabot='"+Edit6->Text+"'");
        //выполняем запрос
        Form1->ADOQuery1->ExecSQL();
        //очищаем строки ввода SQL - запроса
        Form1->ADOQuery1->SQL->Clear();
        //добавим запрос, выбирающий все записи из таблицы
        Form1->ADOQuery1->SQL->Add("select * from osnov_sved");
        //выполняем запрос
        Form1->ADOQuery1->Open();

        Form1->ADOQuery1->Edit();
        Form1->ADOQuery1->FieldByName("otch")->AsString=Edit5->Text;
        Form1->ADOQuery1->Post();