Perform a Locate on a date field

Problem/Question/Abstract:

How to perform a Locate on a date field

Answer:

{ ... }
var
  dr: TDateTime;
begin
  dt := EncodeDate(2003, 01, 31);
  yourDataset.Locate('yourDTFieldName', dt, [])
end;