Consulta con "or" en Delphi

[The Cid James]

No se si esto va en esta sección, de no ser asi pido disculpas y que muevan el psot.
Tengo una duda respecto a ejecutar una consulta en Delphi teniendo OR en ella
Esta es la consulta que hice, para buscar en la tabla clientes por nombre o apellido

Código SQL [-]
Cliente.direccion,
Cliente.cuit_cliente,
Cliente.notas
FROM
    Cliente
WHERE
  Cliente.estado = 1 AND
  Cliente.apellido like :ape
OR
 Cliente.estado = 1 AND
 Cliente.nombre like :nom

Ahora lo que no se es como reglejar esto en delphi, esta es la manera en que he estado ejecutando las consultas, pero siempre con un solo parametro

Código Delphi [-]
procedure Tfcliente.BCbuscarClick(Sender: TObject);
begin
  if ECcliente.text = ''
    then
      exit
    else
      begin
      fmodulo.qCliente.ParamByName('ape').AsString := Eccliente.Text+'%';
      fmodulo.qCliente.Refresh;
      end;
end;

[ecfisa]

Hola.

Cuando en la consulta SQL sólo hay involucrada una tabla, de modo que no debería haber concurrencia con los nombres de columnas, no es necesario calificarlos:

Código SQL [-]
SELECT  DIRECCION, CUIT_CLIENTE, NOTAS
FROM CLIENTE CL
WHERE ESTADO = 1 AND (APELLIDO LIKE :APE OR NOMBRE LIKE :NOM)

Y desde Delphi:

Código Delphi [-]
procedure Tfcliente.BCbuscarClick(Sender: TObject);
begin
  if ECcliente.text = '' then exit
  else
  begin
    fmodulo.qCliente.SQL.Clear;
    fmodulo.qCliente.SQL.Add('SELECT DIRECCION, CUIT_CLIENTE, NOTAS');
    fmodulo.qCliente.SQL.Add('FROM CLIENTE WHERE ESTADO = 1 AND');
    fmodulo.qCliente.SQL.Add('(APELLIDO LIKE :APE OR NOMBRE LIKE :NOM)');
    fmodulo.qCliente.ParamByName('APE').AsString := tu_EditApellido.Text + '%';
    fmodulo.qCliente.ParamByName('NOM').AsString := tu_EditNombre.Text + '%';
    fmodulo.qCliente.Open;
  end;
end;

Saludos

[The Cid James]

Como siempre muchas gracias!