actualizar y mostrar hora con wwDBDateTimePicker1
 

actualizar y mostrar hora con wwDBDateTimePicker1 o con cualquier otro componente db que me permita manejar la hora en mi programa.
Utilizo ms sql server como base de datos y ademas los tradicionales componentes ado. tengo dos campos uno fecha tipo datetime y otro otra de timpo date time. Cuando grabo la fecha lo expreso de la siguiente forma.
adoquery1.fieldbyname('Fecha').value := wwDBDateTimePicker1.date, perfectamente solo me guarda la fecha. pero cuando lo intento hacer del modo hora adoquery1.fieldbyname('Fecha').value := wwDBDateTimePicker1.time, me actualiza la hora, pero tambien me muestra la fecha. Estos son los resultados que quisiera me ayuden lograr.
fecha 10/02/2005 hora 04:00 P.M.

lo he intentado todo... gracias de antemano y ojala consiga respuestas pronto.

Perdon.. tengo dos campos

Fecha datetime allow null
hora datetime allow null, espero colaboración

El componente que nombras no lo conozco, pero en las RXLibs, por ejemplo, tienes un datetimePicker con varias propiedades:

Format:= 'hh:mm am/pm' para mostrar la hora
Format := 'dd/mm/yyyy'

Kind: dtDate/ dtTime para mostar solo la hora o solo la fecha.

Mira haber si tu componente tiene propiedades de esta índole.

Saludos

Aplica este ejemplo:

Código Delphi [-]
 procedure TForm1.Button1Click(Sender: TObject);
 Var
 FechaYhora:TDateTime;
 Hora:TTime;
 begin
 FechaYhora:=Now;
 Hora:=Frac(FechaYhora);
 Edit1.Text:=TimeToStr(hora);
 end;

Un Saludo.