Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Базы данных и репортинг > Ошибка при запросе

Автор: Rondo 13.5.2006, 00:42

Делаю запрос чтобы найти запись. Использую таблицы Access и подключение через ADO

procedure TForm1.Button1Click(Sender: TObject);
begin
  case combobox1.ItemIndex of
    0: begin
         with ADOQuery1 do
         begin
           Active:= false;
           SQl.Clear;
           SQL.Add('SELECT * FROM tblPhoneBook');
           SQL.Add('WHERE name= :'+edit1.Text);
           Active:= true;
         end;
       end;
  end;

Выдает ошибку -> Отсутствует значение для одного или нескольких параметров   smile

Скажите где накосячил smile

Автор: Kesh 13.5.2006, 01:21

Rondo, двоеточие не нужно...

Автор: Rondo 13.5.2006, 01:26

То же самое...

Автор: Vas 13.5.2006, 07:14

Код


procedure TForm1.Button1Click(Sender: TObject);
begin
  case combobox1.ItemIndex of
    0: begin
         with ADOQuery1 do
         begin
           Active:= false;
           SQl.Clear;
           SQL.Add('SELECT * FROM tblPhoneBook');
           SQL.Add('WHERE name='+QuotedStr(edit1.Text));
           Active:= true;
         end;
       end;
  end;

Автор: Savek 13.5.2006, 08:26

Или так

Код


procedure TForm1.Button1Click(Sender: TObject);
begin
  case combobox1.ItemIndex of
    0: begin
         with ADOQuery1 do
         begin
           Active:= false;
           SQl.Clear;
           SQL.Add('SELECT * FROM tblPhoneBook');
           SQL.Add('WHERE name= :Name';
           Parameters.ParamByName('Name').Value:=Edit1.Text;
           Active:= true;
         end;
       end;
  end;

Автор: Rondo 13.5.2006, 14:14

Спасибо, разобрался