[diagnost]

Пробовал:

Код:

ParamByName('Model').Variant := NewInfo[Model].Text;

или

ParamByName('Model').AsString := 'aaa';

или

Код:

ParamByName('Model').Variant := 'aaa';

или в SQL

Код:

INSERT INTO ModelDB (ID, Model) VALUES (:Model)

И еще десятка два вариантов. Переустанавливал Delphi. Ну никак.
Запрос называется ChangeModelQuery, но добавляет новое значение Model.
Хотя Update работает нормально:

Код:

with DataModule2.UpdateModelQuery do begin
  Unprepare;
  ParamByName('Model').AsString := Info[Model].Text;
  ParamByName('ID').AsInteger := Info[Model].ID;
  Prepare;
  ExecSQL;
  Close;
end;

Возможно, решение банально, но уже неделю его ищу и не нахожу. Может быть, что-нибудь не так в properties запроса?