Código Delphi [-]with ADOQuery2 do begin SQL.Clear; SQL.Add('SELECT vchMarca FROM TB_Marca WHERE smlMarca IN (SELECT smlMarca FROM TB_Relacion WHERE smlLinkup LIKE ' + QuotedStr(DBEdit1.Text + '%') + ')'); Open; end;
with ADOQuery2 do begin SQL.Clear; SQL.Add('SELECT vchMarca FROM TB_Marca WHERE smlMarca IN (SELECT smlMarca FROM TB_Relacion WHERE smlLinkup LIKE ' + QuotedStr(DBEdit1.Text + '%') + ')'); Open; end;