Busqueda en un Query

[[Caral]]

Hola
Perdon que me meta.
Para empezar la sentencia de un filtro es:

Código Delphi [-]
procedure TFrmProgTallerEntrega.EdBusquedaEspecificaKeyPress(
  Sender: TObject; var Key: Char);
begin
 if key = #13 then
    begin
      key := #0;
      DMinformes.QInfHistoricos.Filter:='CODMOLDE = '+QuotedStr(EdBusquedaEspecifica.Text);
      DMinformes.QInfHistoricos.Filtered:=TRUE;
    end;
end;

Hay que tener en cuenta que se pide un string, si es numerico el dato la sentencia varia, esto en ciertas bases de datos, suele pasar.
Saludos