[Thales]

Básicamente tienes que tocar los siguientes eventos:

Código Delphi [-]
procedure TForm1.DataSourceDataChange(Sender: TObject; Field: TField);
begin
  DateTimePicker.Date := Table1.FieldByName('Fecha').AsDateTime;
end;
 
procedure TForm1.DataSourceUpdateData(Sender: TObject);
begin
  Table1.FieldByName('Fecha').AsDateTime := DateTimePicker.Date;
end;
 
procedure TForm1.DateTimePickerChange(Sender: TObject);
begin
  DataSource.Edit;
end;

Un saludo