El DBDateTimePicker como time

[ANDRES86]

Pues el DBDateTimePicker me lo baje de internet, el delphi no lo trae, y pues para el manejo de fechas tambien tiene ese problema que siempre aparece 1899, esto ya estaba en un foro.

procedure TForm1.ZTable1NewRecord(DataSet: TDataSet);
begin
Dataset['FECHA']:=Now();
DBDateTimePicker2.Kind:=dtkDate;
DBDateTimePicker2.Date:=Now();
DBDateTImePicker2.Kind:=dtkTime;

el campo fecha es de tipo date, no hay problema me funciona muy bien asi para las fechas, pero con el campo tipo Time no he podido ya que hago esto mismo para ver si se cambio la fecha del DBDateTimePicker y pues como el campo pues obviamente es tipo time, no surge ningun efecto.