Проблема с добавлением записей в бд access

[Kooki]

Доступ через ADO. В общем суть проблемы такая, использую запрос на добавление записи INSERT INTO, ну для наглядности вот укороченный отрывок кода:

Form1.ADOQuery1.SQL.Add('Insert Into Zakazi (Имя_заказчика, Дата_заказа, Статус)');
Form1.ADOQuery1.SQL.Add('Values ("'+combobox3.Text+'",(b),"неготов" )');
Form1.ADOQuery1.Parameters.ParamByN ame('b').Value:=b;
Form1.ADOQuery1.ExecSQL;

У меня на Windows 7 и у друзей на Windows 7 работает все отлично. Но у друзей на Windwos 10 пишет ошибку "несоответствие типов данных в выражение условия отбора". Я не так давно знаком с этим, поэтому возможно не знаю некоторых тонкостей, возможно сильно туплю, уж извините если что, но из-за чего это может быть?

[Аватар]

Form1.ADOQuery1.SQL.Add('Values ("'+combobox3.Text+'",(b),"неготов" )');

И что, так работает? А так:

Form1.ADOQuery1.SQL.Add('Values ("'+combobox3.Text+'",:b,"неготов" )');

Ну и почистить предварительно стринг, если уж ADD используешь для заполнения

[Serge_Bliznykov]

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

"неготов"

а это раздельно пишется: "не готов"

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

Ну и почистить предварительно стринг, если уж ADD используешь для заполнения

думаю, что у него там в начале уже есть:

Form1.ADOQuery1.SQL.Clear;

[Kooki]

Слитно или раздельно — не суть :В
Да Clear в начале есть

[Serge_Bliznykov]

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

Слитно или раздельно — не суть :В

согласен.

а суть в том, что параметры в Delphi задаются через двоеточие, как Вам совершенно верно подсказал Аватар

[Kooki]

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

согласен.

а суть в том, что параметры в Delphi задаются через двоеточие, как Вам совершенно верно подсказал Аватар

Спасибо, попробую

[Sciv]

Form1.ADOQuery1.SQL.Add('Values ("'+combobox3.Text+'",(b),"неготов" )');
Form1.ADOQuery1.Parameters.ParamByN ame('b').Value:=b;

Зачётная мешанина :D

Сори за оффтоп.

[Serge_Bliznykov]

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

Зачётная мешанина :D

собственно, согласен.

Kooki, в чём сермяжная правда первое значение встраивать в текст запроса, а второе - передавать как параметр?
всё надо через параметры передавать (кстати, тогда и текст запроса каждый раз задавать НЕ НАДО:

либо прямо в Design-time (либо в run-time на событие FormCreate) запрос вида:

ADOQuery1.SQL.Text := 'Insert Into Zakazi (Имя_заказчика, Дата_заказа, Статус) Values (:pname, :pb,"не готов")';

и дальше, на событии, где нужно вставить значение:

  Form1.ADOQuery1.Parameters.ParamByName('pname').Value:=combobox3.Text;
  Form1.ADOQuery1.Parameters.ParamByName('pb').Value:=b;
  Form1.ADOQuery1.ExecSQL;