[nanometr]

есть такой вот кусок кода:

Код:

with DataModule1.Query1 do
        begin
        Parameters.ParamByName('param1').Value :=ComboBox1.Text;
        Parameters.ParamByName('param2').Value :=ComboBox2.Text;
        Parameters.ParamByName('param3').Value :=ComboBox3.Text;
        execSql;
        end;

все параметры типа string.
Вылезает ошибка "Приложение использует для текущей операции значение неверного типа."

Объясните пожалуйста, что тут не так. Не могу понять, чем тут типы то не угодили...

sql скрипт просто в базу добавляет записи insert`ом.

[Aristarh Dark]

Кавычки однако нужны...

[nanometr]

где они нужны? Параметры у меня в кавычках.

[Страдалецъ]

Текст запроса покажите. Обычно такая ошибка происходит когда пытаются сцепить текст и число или при сравнении ожидается текст, а передается неизвестная константа.

[NumLock]

я вообще не знаю у TQuery (судя по имени Query1) свойства "Parameters" (Delphi 3-Delphi 7) есть Params: TParams! а классический механизм выполнения SQL запроса, не возвращающего набор данных (cursor):

Код:

  with Query1 do
  begin
    Prepare;
    ParamByName('Param1').AsString:=Caption;
    ParamByName('Param2').AsInteger:=Tag;
    ParamByName('Param3').AsBoolean:=Visible;
    ExecSQL;
  end;

но, имхо, можно и всем ParamByName('ParamХ').AsString:=strValue;

[nanometr]

текст запроса проще некуда:
SQL

Код:

INSERT INTO Table1(field1,field2)
VALUES(:param1,:param2) 

ничего из выше перечисленного не заставило ошибку изчезнуть((((
Может есть еще какие нибудь варианты решения?

[nanometr]

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

я вообще не знаю у TQuery (судя по имени Query1) свойства "Parameters" (Delphi 3-Delphi 7) есть Params: TParams! а классический механизм выполнения SQL запроса, не возвращающего набор данных (cursor):

Код:

  with Query1 do
  begin
    Prepare;
    ParamByName('Param1').AsString:=Caption;
    ParamByName('Param2').AsInteger:=Tag;
    ParamByName('Param3').AsBoolean:=Visible;
    ExecSQL;
  end;

но, имхо, можно и всем ParamByName('ParamХ').AsString:=strValue;

А на такое вообще Delphi 7 изругалась. Сказало, что Prepare и ParamByName неопределенные переменные.

[movnet]

Сообщение от Aristarh Dark

Кавычки однако нужны...

Код:

Parameters.ParamByName('param1').Value := #39+ComboBox1.Text+#39;