Ver Mensaje Individual
  #3  
Antiguo 12-11-2014
Delphitest Delphitest is offline
Miembro
 
Registrado: sep 2006
Ubicación: Salamanca-España
Posts: 249
Reputación: 18
Delphitest Va por buen camino
Muchas Gracias por tu ayuda.

He intentado probar pero efectivamente algo falla en la sintaxis, uso ADO

He puesto esto:

Código Delphi [-]
    TBuscarCLiente.Close;
    TBuscarCliente.SQL.Clear;
    TBuscarCliente.SQL.Add('SELECT NOMBRE, APELLIDOS, DNI FROM CLIENTES');
    TBuscarCliente.SQL.Add('WHERE NOMBRE LIKE :PNON AND APELLIDOS LIKE :PAPE AND DNI LIKE :PDNI');
    TBuscarCliente.ParamByName('PNOM').AsString:= '%'+Edit1.Text+'%';
    TBuscarCliente.ParamByName('PAPE').AsString:= '%'+Edit2.Text+'%';
    TBuscarCliente.ParamByName('PDNI').AsString:= '%'+Edit3.Text+'%';
    TBuscarCliente.Open;

Pero me da error en las lineas donde uso ParamByName (Lo subraya en rojo)
__________________
Mi proyecto paso a paso (Parte I)
Responder Con Cita