Menginput Tanngal di Delphi 7 Dengan Database Paradox7

Untuk menginput tanggal ke database paradox pada delphi source code yang bisa di pakai sebagai berikut :

procedure TForm1.Button4Click(Sender: TObject);
begin
//Tombol Simpan
table1['tanggal']:= datetimepicker1.DateTime;
application.MessageBox('Data sudah Disimpan','Pesan',mb_ok);
table1.Post;
end;

Kalo ada yang lebih mudah, monggo di share......