求救！datetimepicker的问题！！！

Question

我用了两个datetimepicker，其中一个显示date,第二个显示time.
请问如何把第二个datetimepicker中的date随第一个中显示的date变化。
并能够把第二个datetimepicker的时间和日期都保存到数据库中。
数据库为oracle.
最好能发些代码，谢谢。

Answer 1

datetimepicker2.datetime := trunc(datetimepicker1.datetime)+datetimepicker2.datetime - trunc(datetimepicker2.datetime)

Answer 2

1.在datetimepicker1的change中写:
procedure TForm1.DateTimePicker1Change(Sender: TObject);
begin
  datetimepicker2.Date:=datetimepicker1.Date
end;2.在按钮中写保存到表中:
  query1.close;
  query1.sql.clear;
  query1.sql.add(insert into a1(username,logdate) ');
  query1.sql.add('valuse(:ss,:bb)');
  query1.parambyname('ss').asstring:=edit1.text;
  query1.parambyname('bb').asdatetime:=datetimepicker2.datetime;
  query1.ExecSQL;

Answer 3

你这种方法我已经试过了！显示的是当前月的第一天的日期，时间是对的
我用的是oracle.