Посмотрите) Вроде правильно все но не работает. Что не так?

[Bane]

Вообщем проблема такая. Должен в базу заносить данные из StringGrid'а, а по факту в базу вносится только значение для "Cena", а для "NameIng" нет. Вот всю голову сломал, не понимаю что не так?

procedure TForm5.Button1Click(Sender: TObject);
begin
With ADOQuery1 do
  begin
    SQL.Clear;
    SQL.Add('INSERT INTO Ingredients (NameIng) VALUES ('+Form5.StringGrid1.Cells[0,1]+')');
    SQL.Clear;
    SQL.Add('INSERT INTO Ingredients (Cena) VALUES ('+Form5.StringGrid1.Cells[1,1]+')');
    ExecSQL;
  end;
end;

[Streletz]

Просто запрос для добавления "NameIng" не выполняется.
Исправленное я подчеркнул.

SQL.Add('INSERT INTO Ingredients (NameIng) VALUES ('+Form5.StringGrid1.Cells[0,1]+')');
ExecSQL;
SQL.Clear;
SQL.Add('INSERT INTO Ingredients (Cena) VALUES ('+Form5.StringGrid1.Cells[1,1]+')');
ExecSQL;

Приблизительно, как-то так...

[Аватар]

Зачем двумя INSERT-ами? Это обычно одним делается, в данном случае наверняка

[Utkin]

SQL.Clear;
SQL.Add('INSERT INTO Ingredients (NameIng) VALUES ('+Form5.StringGrid1.Cells[0,1]+')');
SQL.Clear;
SQL.Add('INSERT INTO Ingredients (Cena) VALUES ('+Form5.StringGrid1.Cells[1,1]+')');
ExecSQL;

Я бы обратил внимание. Так понимаю - формируем запрос, стираем запрос, формируем запрос, исполняем запрос. Так зачем формировать, чтобы тут же его стереть?

[Streletz]

Сообщение от Аватар

Зачем двумя INSERT-ами? Это обычно одним делается, в данном случае наверняка

Я понимаю, что проще и эффективнее сделать одним. Только ТС зачем-то нужно 2.
Это лучше у него спросить.

[Аватар]

А, ну если цена ингредиента в одной записи, а наименование в другой, тогда да. Интересно посмотреть как с этим работать

[Bane]

Написал ExecSQL; и теперь выдает ошибку. "Параметр не имеет значения по умолчанию."

[Bane]

Я знаю что можно делать в одном INSERT'е, но и там ошибка вылазит...

[Serge_Bliznykov]

Сообщение от Bane

Я знаю что можно делать в одном INSERT'е...

Не "можно", а - "НУЖНО"!
Если, конечно, цена и наименование относятся к одному продукту (ингридиенту).

Сообщение от Bane

но и там ошибка вылазит...

наверняка секретная, да?!


показывайте код, как Вы добавляете одним запросом и приведите тут скриншот ошибки. Будем думать вместе, что Вы делаете не так!

[Bane]

Вот такая беда)

procedure TForm5.Button1Click(Sender: TObject);
begin
With ADOQuery1 do
  begin
    SQL.Clear;
    SQL.Add('INSERT INTO Ingredients (NameIng, Cena) VALUES ('+Form5.StringGrid1.Cells[0,1]+', '+Form5.StringGrid1.Cells[1,1]+')');
    ExecSQL;
  end;
end;