actualizar y mostrar hora con wwDBDateTimePicker1

[Jorge Taveras]

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.

[Jorge Taveras]

Perdon.. tengo dos campos

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

[Lepe]

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

[marcoszorrilla]

Aplica este ejemplo:

procedure TForm1.Button1Click(Sender: TObject);
Var
FechaYhora:TDateTime;
Hora:TTime;
begin
FechaYhora:=Now;
Hora:=Frac(FechaYhora);
Edit1.Text:=TimeToStr(hora);
end;


Un Saludo.