Código Delphi
[-]hange line 1346 of IBSQL.pas from
varOleStr, varString :
to
varOleStr, varString, varUString:
and statically link in IBSQL.pas to your project (add it to your project).
Esto es lo que tenes que hacer, busca en la linea 1346, del archivo IBSQL.pas y modificas segun dice ahi. luego agregas esa unidad a tu proyecto, a mi si me funciono eso.
Ahora bien si eso no funciona vas a tener que utilizar otro metodo diferente a Locate, yo en lo personal no lo utilizo ya que al haber mucha data se vuelve algo lento por el tipo de busqueda que hace.