Select En Delphi
 

tengo un problema en esto

ADOQuery2.Close;
ADOQuery2.SQL.Clear;
ADOQuery2.SQL.Add('SELECT vchMarca FROM TB_Marca where smlMarca IN (SELECT smlMarca FROM TB_Relacion WHERE smlLinkup like'+Char(39)+DBedit1.Text+'%'+Char(39));
ADOQuery2.Open;

se que no cierro el parentesis de el subselect pero no se donde cerrarlo

Select En Delphi
 

tengo un problema en esto

ADOQuery2.Close;
ADOQuery2.SQL.Clear;
ADOQuery2.SQL.Add('SELECT vchMarca FROM TB_Marca where smlMarca IN (SELECT smlMarca FROM TB_Relacion WHERE smlLinkup like'+Char(39)+DBedit1.Text+'%'+Char(39));
ADOQuery2.Open;

se que no cierro el parentesis de el subselect pero no se donde cerrarlo

Hola, creo que deberías cerrarlo asi:

Char(39))');

Espero que te sirva.
Un saludo.

>.<
 

no no me funciono
[Error] AxFLImpl1.pas(383): Illegal character in input file: '%' ($25)

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;

Un saludo.

Al final...

Código Delphi [-]
ADOQuery2.Close;
ADOQuery2.SQL.Clear;
ADOQuery2.SQL.Add('SELECT vchMarca FROM TB_Marca where smlMarca IN (SELECT smlMarca FROM TB_Relacion WHERE smlLinkup like'+Char(39)+DBedit1.Text+'%'+Char(39)+')');
ADOQuery2.Open;

No repitas hilos.
Bienvenido a clubdelphi, ¿ya leiste nuestra guía de estilo?, gracias por tu colaboración.

Gracias compañeros me ayudaron en mucho aquie estare constantemente en este foro