Eso es normal.
El calendario empieza justo en el 01/01/1900, por tanto, una fecha nula (sin valor) se toma como el 31/12/1899.
En el evento OnNewRecord asígnale una fecha por defecto, normalmente se usa las funciones Now o Date, según corresponda.
Código Delphi
[-]
procedure TForm1.Table1NewRecord(...);
begin
table1Fecha.AsDate := Date;
end;