Error General SQL en Fecha

[uberos]

jeje, el problema es que no lo he programado yo...

Pongo algo más de código:

Código SQL [-]
uses Windows, Messages, SysUtils, Classes, Graphics, Controls,
Forms, Dialogs,   Fin1, ExtCtrls, Gauges, Mask, DBCtrls, StdCtrls,
Buttons, Db, DBTables,   DBClient, Provider, ObjReporting;  

type     
Datos: TQuery;     
(más código...)  

procedure Fichero.Visualizar(); 
begin   
  Datos.SQL.Clear;
  Datos.SQL.Add('SELECT * FROM DATOS WHERE FECHA <= :FECHA AND M.TIP IN (''01'',''02'',''91'',''92'')');
  Datos.Params[0].asDate := StrToDate(eFecha.Text);
  Datos.Open;
end;

eFecha.Text es una caja de texto que contiene la fecha 28/02/2015

Tan solo me gustaría saber si la función StrToDate me debería devolver una fecha o los días, estoy seguro que el que lo programó le devolvia la fecha en formato dd/mm/yyyy, no se porque a mi me devuelve los días que hay desde el 30/12/1899 hasta el 28/02/2015.