Выдает ошибку ADOQuery1: Field " not found

[Dux]

На форме ADOConnection, ADOQuery. База данных Access - data.laccdb

При клике на листбокс следующий код:

procedure TForm1.ListBox1Click(Sender: TObject);
var selected_item, sql_line, APath:string;
begin
selected_item:=listbox1.Items[listbox1.itemIndex];
if selected_item<>'' then
begin
sql_line:='SELECT * FROM Articles WHERE AName = "' +selected_item+'"';
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add(sql_line);
ADOQuery1.Open;
APath:=ADOQuery1.FieldByName(APath).AsString;
end;
end;

Выдает ошибку ADOQuery1: Field " not found

Что-то не могу найти где я что упустил.

[Stilet]

sql_line:='SELECT * FROM Articles WHERE AName = ' +QuotedStr(selected_item);

Потому что двойные ковычки как правило говорят, что в них не строка а имя поля

[pu4koff]

Смотрите чего у вас там в APath

APath:=ADOQuery1.FieldByName(APath).AsString;

[Dux]

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

sql_line:='SELECT * FROM Articles WHERE AName = ' +QuotedStr(selected_item);

Потому что двойные ковычки как правило говорят, что в них не строка а имя поля

Изменил на Ваш вариант. Ошибка не ушла.

[pu4koff]

В строчке, на которую я сослался и выделил красным, в кавычки чтоли оберните уже свой APath.

APath:=ADOQuery1.FieldByName("APath").AsString;

[Dux]

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

В строчке, на которую я сослался и выделил красным, в кавычки чтоли оберните уже свой APath.

APath:=ADOQuery1.FieldByName("APath").AsString;

Ой туплю.... Конечно же!!! Спасибо!

[Stilet]

А-а-а... Акцесс... Там имена полей в [] берутся. Я и забыл