Error EDatabase Error

[ecfisa]

Hola Leandro.

Creo que el problema se te presenta al no componer la consulta para cada cambio del TEdit, yo haría de este modo:

Código Delphi [-]
procedure Tform_buscarcliente.ed_nombreChange(Sender: TObject);
begin
  with modulo_db.consulta_cliente do
  begin
    Close;
    SQL.Clear;
    SQL.Add('SELECT * FROM CLIENTE WHERE NOMBRE LIKE :PNOMBRE');
    ParamByName('PNOMBRE').AsString:= ed_nombre.Text + '%';
    Open;
    ...
  end;
end;

(el espacio entre ":" y "pnombre" es por que me salia esto por eso)

Para evitar las 'caritas' usa las etiquetas [noparse] [/noparse], en el caso anterior sería: 'SELECT * FROM CLIENTE WHERE NAME LIKE [noparse]:P[/noparse]NOMBRE'

Saludos.