Localizar Y Posicionarse En Un Adodataset

[sorianolloret]

Buenas, soy nuevo aquí, necesito que alguien me ayude con un tema sencillo que no puedo resolver
Tengo un adodatasetempleado, adodatasetcalendario, adodatasetcondiciones, todos con masterfield DNI, asi cuando selecciono un empleado me aparece su calendario y sus condiciones.
Pero necesito que esto funcione correctamente
adodatasetcalendario.locate('DNI;FECHA',Vararrayof(['DNI','FECHA']),[loCaseInsensitive, loPartialKey]); NO SE POSICIONA EN NIGUN SITIO DE LA TABLA,pero si busco ADODATASETCALENDARIO.Locate('FECHA',FECHA,[loCaseInsensitive, loPartialKey]);
con esto solo se posiciona en el primer registro que cumple la condición fecha
el problema es que cuando cambio de empleado y vuelvo a localizar no localiza nada o se localiza en el primero que al estar como masterfield el dni no se ve.
es decir
tengo
dni fecha
1 01/02/2003
1 02/03/2004
1 03/04/2005
2 01/02/2003
2 02/03/2004
2 03/04/2005
al tener como masterfield dni el dbgrid solo muestra las fechas del empleado seleccionado en la tabla empleados, es decir si silecciono el empleado 2 solo muestra sus fechas.
necesito hacer adodatasetcalendario.locate('DNI;FECHA',Vararrayof(['DNI','FECHA']),[loCaseInsensitive, loPartialKey]);
siendo dni=1 y fecha=02/03/2004 que se posiciona correctamente.o al buscar dni 2 y misma o distinta fecha
por cierto la base de datos es de Access y dni y fecha son claves principales
El código es este:

Código Delphi [-]
procedure Tfrmcalculoparcial.Button1Click(Sender: TObject);
var
  DNI : String;
  FECHA : String;
begin
  //DNI := ADODATASETEMPLEADOS.FieldByName('DNI').Value;
  FECHA := DATETOSTR(NOW());
  DNI := ADODATASETEMPLEADOS.FieldByName('DNI').AsString;
  //ADODATASETCALENDARIO.Locate('DNI',DNI,[]);
  //ADODATASETCALENDARIO.Locate('FECHA',FECHA,[loCaseInsensitive, loPartialKey]);//funciona pero al cambiar de empleado con dbnavigatorempleados no funciona
  adodatasetcalendario.locate('DNI;FECHA',Vararrayof(['DNI','FECHA']),[loCaseInsensitive, loPartialKey]);//no funciona
end;

me puede ayudar alguien?