Показать сообщение отдельно
  #1  
Старый 12.10.2012, 21:33
Red_Garry Red_Garry вне форума
Начинающий
 
Регистрация: 07.07.2011
Сообщения: 126
Репутация: 10
По умолчанию Вопрос по ADOQuery

Здравствуйте!
Задача: посредством ADOQuery и SQL-запроса осуществить ввод записи в таблицу oborud полей ur1,ur2,ur3,ur4,n_u,isp,rik,tim
Вот такой вот код
Код:
procedure TForm4.Oborud_sql2Execute(Sender: TObject);
begin

form4.Query2_oborud.SQL.Clear;
form4.Query2_oborud.SQL.Add('INSERT INTO oborud (ur1,ur2,ur3,ur4,n_u,isp,rik,tim) VALUES (:ur1,:ur2,:ur3,:ur4,:n_u,:isp,:rik,:tim)');
form4.Query2_oborud.Parameters.ParamByName('ur1').Value := ur1;
form4.Query2_oborud.Parameters.ParamByName('ur2').Value := ur2;
form4.Query2_oborud.Parameters.ParamByName('ur3').Value := ur3;
form4.Query2_oborud.Parameters.ParamByName('ur4').Value := ur3;
form4.Query2_oborud.Parameters.ParamByName('n_u').Value := form5.Memo1.Text;
form4.Query2_oborud.Parameters.ParamByName('isp').Value := form3.polz;
form4.Query2_oborud.Parameters.ParamByName('rik').Value := StrToInt(form5.Edit1.Text);
form4.Query2_oborud.Parameters.ParamByName('tim').Value := now;
form4.Query2_oborud.Active := true;


end;
выдаёт ошибку 'Query2_oborud: Parameter 'ur1' not found
В чём накрутил, не подскажете?
Ответить с цитированием