Fórum Campo Lookup: Pesquisar com campo lookup #336339

select ID from tabela dolookup
where ID = ANY(select ID from tabela_q_tem_o_nome
where nome = ´SKOl´)

procedure TfrmProduto.txtConsultaChange(Sender: TObject);
begin
 qry.Close;
 qry.SQL.Clear;
 qry.SQL.Add(´SELECT ID_MARCA FROM PRODUTOS´);
 qry.SQL.Add(´WHERE ID_MARCA = ANY(SELECT ID FROM MARCA WHERE MARCA = ´ + ´´´´ + txtConsulta.Text + ´´´´);
 qry.Open;
end;
end;

procedure TfrmProduto.txtConsultaChange(Sender: TObject); 
var
 Consulta: String;
begin 
   Consulta:= ´Select ID_Marca from Produtos´;
   Consulta:= Consulta + ´ where ID_MARCA = ANY´;
   Consulta:= Consulta + ´(Select ID from MARCA where MARCA = ´;
   Consulta:= Consulta + #39+txtConsulta.text+39;
   qry.Close; 
   qry.SQL.Clear; 
   qry.SQL.Add(Consulta)
   qry.Open; 
end; 
 39 vai colocar o valor do editi entre aspas na consulta preste muita atenção nos espaços, como é uma consulta muito grande vc pode se descuidar e ficar alguma coisa colada na outra.

Outra coisa eu só criei a variável consulta pq ñ sei com qual query vc está trabalhando porque tem componetes query que da para inserir o codigo direto da linha desejada.
 Ex: query1.sql[1]:= ´codigo´;
Isso é possível no ADOQuery que é o que eu estou usando no momento nesse que vc esta usando eu não sei.

Acho q no seu ñ tava funcionando pq quando vc da um add ele limpa automaticamente o q está dentro da propriedade SQL não tenho certeza mais acho q sim e eu numca trabalhei com aspas igual vc colocou mas tenho certeza que com #39 vai funcionar.

tentai ai qualquer coisa estamos ai

vlw!

/*==============================================================*/
/* Table: MARCAS                                                */
/*==============================================================*/
create table MARCAS (
   MARC_ID              int                  not null,
   MARC_NOME            varchar(30)          not null,
   constraint PK_MARCAS primary key  (MARC_ID)
)
go

/*==============================================================*/
/* Table: PRODUTOS                                              */
/*==============================================================*/
create table PRODUTOS (
   PROD_ID              int                  not null,
   MARC_ID              int                  null,
   PROD_DESCRICAO       varchar(60)          not null,
   constraint PK_PRODUTOS primary key  (PROD_ID)
)
go

/*==============================================================*/
/* Index: RELATIONSHIP_1_FK                                     */
/*==============================================================*/
create   index RELATIONSHIP_1_FK on PRODUTOS (
MARC_ID ASC
)
go

alter table PRODUTOS
   add constraint FK_PRODUTOS_RELATIONS_MARCAS foreign key (MARC_ID)
      references MARCAS (MARC_ID)
go

select 
    *
from
    produtos
inner join
    marcas
on
    (produtos.marc_id = marcas.marc_id)
where
    marcas.marc_nome =´MARCA´

select * from produto
where ID_MARCA = ANY(select ID from marca
where marca = ´SKOL´)