Добавление данных в таблицу через SQL

[Morfius01]

Мне нужно добавить в базу в нужную информацию в зависимости от выбранного radiobutton'а. Но не выходит, выдает ошибку. Вот текст процедуры, я только осваиваю работу с БД и sql, так что нужна помощь

procedure TForm3.Button5Click(Sender: TObject);
begin
form3.ADOQuery2.SQL.add('SELECT * FROM score');
form3.adoquery2.SQL.Add('where [Код студента]='+Kst);
form3.adoquery2.SQL.Add('where [Предмет]='+predmet);
  form3.ADOQuery2.Open;
  form3.adoquery2.Insert;
  if form3.RadioButton1.checked=true then form3.ADOquery2.FieldByName(form3.ComboBox2.text).AsString:='3';
  if form3.RadioButton2.checked=true then form3.ADOquery2.FieldByName(form3.ComboBox2.text).AsString:='4';
  if form3.RadioButton3.checked=true then form3.ADOquery2.FieldByName(form3.ComboBox2.text).AsString:='5';
  if form3.RadioButton4.checked=true then form3.ADOquery2.FieldByName(form3.ComboBox2.text).AsString:='Зачет';
  if form3.RadioButton5.checked=true then form3.ADOquery2.FieldByName(form3.ComboBox2.text).AsString:='Не зачет';
  end;

я понял что я неправильно задаю where, не могу найти как правильно задать несколько условий.

[dosha]

procedure TForm3.Button5Click(Sender: TObject);
begin
form3.ADOQuery2.SQL.add('SELECT * FROM score');
form3.adoquery2.SQL.Add('where [Код студента]='+Kst+' and [Предмет]='+predmet);
form3.ADOQuery2.active:=true;
form3.adoquery2.Insert;
if form3.RadioButton1.checked=true then form3.ADOquery2.FieldByName(form3.C omboBox2.text).AsString:='3';
if form3.RadioButton2.checked=true then form3.ADOquery2.FieldByName(form3.C omboBox2.text).AsString:='4';
if form3.RadioButton3.checked=true then form3.ADOquery2.FieldByName(form3.C omboBox2.text).AsString:='5';
if form3.RadioButton4.checked=true then form3.ADOquery2.FieldByName(form3.C omboBox2.text).AsString:='Зачет';
if form3.RadioButton5.checked=true then form3.ADOquery2.FieldByName(form3.C omboBox2.text).AsString:='Не зачет';
form3.adoquery2.post;
end;

[Morfius01]

Выдает ошибку
"First chance exception at $75749617. Exception class EOleException with message
'Параметр МОТС(это название выбранного предмета) не имеет значения по умолчанию'. Process Project1.exe (5792)"
((

[dosha]

извини недоглядел

procedure TForm3.Button5Click(Sender: TObject);
begin
form3.ADOQuery2.SQL.add('SELECT * FROM score');
form3.adoquery2.SQL.Add('where [Код студента]='+Kst+' and [Предмет]='+predmet);
form3.ADOQuery2.active:=true;
form3.adoquery2.Insert;
if form3.RadioButton1.checked=true then form3.ADOquery2.Fields[0].AsString:='3';
if form3.RadioButton2.checked=true then form3.ADOquery2.Fields[0].AsString:='4';
if form3.RadioButton3.checked=true then form3.ADOquery2.Fields[0].AsString:='5';
if form3.RadioButton4.checked=true then form3.ADOquery2.Fields[0].AsString:='Зачет';
if form3.RadioButton5.checked=true then form3.ADOquery2.Fields[0].AsString:='Не зачет';
form3.adoquery2.post;
end;

где Fields[0] номер колонки

[Morfius01]

где Fields[0] номер колонки

мне нужно добавлять именно в ту колонку, имя которой я выбираю в комбобоксе.
и красным он после ошибки выделяет строку
form3.adoquery2.Insert;

[dosha]

procedure TForm1.Button1Click(Sender: TObject);
begin
form3.ADOQuery2.SQL.clear;
form3.ADOQuery2.SQL.add('SELECT * FROM score');
form3.adoquery2.SQL.Add('where [Код студента]='+Kst+' and [Предмет]='+predmet);
form3.ADOQuery2.active:=true;
form3.adoquery2.Insert;
if form3.RadioButton1.checked=true then form3.ADOquery2.Fields[form3.ComboBox2.itemindex].AsString:='3';
if form3.RadioButton2.checked=true then form3.ADOquery2.Fields[form3.ComboBox2.itemindex].AsString:='4';
if form3.RadioButton3.checked=true then form3.ADOquery2.Fields[form3.ComboBox2.itemindex].AsString:='5';
if form3.RadioButton4.checked=true then form3.ADOquery2.Fields[form3.ComboBox2.itemindex].AsString:='Зачет';
if form3.RadioButton5.checked=true then form3.ADOquery2.Fields[form3.ComboBox2.itemindex].AsString:='Не зачет';
form3.adoquery2.post;
end;

есль не робит то стучи в асю 631694469

[Morfius01]

таже ошибка. он прерывает выполнение на
form3.adoquery2.Insert;

[vovk]

НЕ все методы TADOtable подходят к TadoQury.
Хотите добавить запись пишите запрос на добавление

INSERT INTO <имя таблицы>(<имя поля1>,<имя поля2>,<имя поля3>,<имя поля N>)
VALUES(<значение1>,<значение2>,<значение3>,<значениеN>)

Это распространеннная ошибка если работали только с компанентами типа TTABLE
Придётся изучать SQL если в начале это может показатся неудобным, то при практическом примененеи это ощущение быстро уйдёт, в работе со SQL таятся огромные возможности при работе с БД.

[Morfius01]

попробовал убрать запрос по предмету, оставил только по значению kst, и программа не выдает ошибки при работе. Но, странно, я открываю таблицу после добавления оценки, и вижу, что он добавляет, как ни крути, в самый последний ряд нужного столбца, а не в те ряды, которые, по идее, должны были быть выбраны в sql запросе.
vovk
буду благодарен, если подгонишь мою программу под твой вариант написания

[vovk]

Это не мой вариант, это просто SQL
INSERT это добавление записи, для обновления записи нужно использовать UPDATE, синтаксис

UPDATE <имя таблицы> SET <имя поля> = <новое значение>
WHERE <выбор записей которые нужно обновить к примеру ID= 10 (обновтся поле <имя поля> у записи где поле с именем id равно 10)>

Вам будет полезно почитать про SQL иначе на каждое своё новое действие вы будете создавать новую тему, литературу можно посмотреть по это ссылке, или поискать в интернете, или купить книжку