Выборка из 3-х таблиц

SQL.Clear;
SQL.Add('SELECT ПрограммноеОбеспечение.Наименование,ПрограммноеОбеспечение.Лицензия From ПрограммноеОбеспечение as PO  inner join Связка on PO.Код6=Связка.КодПО');
SQL.Add('inner join НаименованиеТехники as NT on Связка.КодТехники=NT.Код3 where NT.Наименование= "Ноутбук Irbis NB24" ');

SQL.Add('inner join НаименованиеТехники as NT on Связка.КодТехники=NT.Код3 where NT.Наименование= '+QuotedStr('Ноутбук Irbis NB24'));

procedure TForm8.FormShow(Sender: TObject);
 var
i:String;
begin
 
i:=Form1.DBGrid1.DataSource.DataSet.FieldByName('Íàèìåíîâàíèå').AsString;
 
 
with DataModule3.ADOQuery2 do
begin
Close;
SQL.Clear;
SQL.Add('SELECT ПрограммноеОбеспечение.Наименование,ПрограммноеОбеспечение.Лицензия From ПрограммноеОбеспечение as PO inner join (Связка ');
SQL.Add('inner join НаименованиеТехники as NT on Связка.КодТехники=NT.Код3) on PO.Код6=Связка.КодПО where NT.Наименование= i');
  Open;
end;
  end;

i:=Form1.DBGrid1.DataSource.DataSet.FieldByName('Íàèìåíîâàíèå').AsString;

with DataModule3.ADOQuery2 do
begin
Close;
SQL.Clear;
SQL.Add('SELECT ПрограммноеОбеспечение.Наименование,ПрограммноеОбеспечение.Лицензия From ПрограммноеОбеспечение as PO inner join (Связка ');
SQL.Add('inner join НаименованиеТехники as NT on Связка.КодТехники=NT.Код3) on PO.Код6=Связка.КодПО where NT.Наименование= [COLOR="Red"]Form1.DBGrid1.DataSource.DataSet.FieldByName('Наименование').AsString[/COLOR]');
Open;
end;

'where NT.Наименование= '+IntToStr(i)

'where NT.Наименование= '+QuotedStr(i)

Sql.Add('SELECT PO.Наименование,PO.Лицензия From');
Sql.Add('ПрограммноеОбеспечение as PO,Связка as SV,НаименованиеТехники as NT');
Sql.Add('where SV.КодТехники=NT.Код3 AND PO.Код6=SV.КодПО AND NT.Наименование='+QuotedStr(i));