Utilizando DataTimePicker

Utilize o código no onChange do seu DataTimePicker.

var
v_data:tdate;
begin
v_data:=DateTimePicker1.Date;
DBEdit1.Text:=DateToStr(v_data);