如何设一个日期类型的字段的值为空或为零???

Question

//出生日期
   if self.Edit4.Text='' then
      DataModule1.Table1Birthday.Value:=???????    //空
   else
      DataModule1.Table1Birthday.Value:=self.DateTimePicker1.Date;试过用DataModule1.Table1Birthday.Value:=NULL 不行，还有什么办法？
数据库是paradox.

Answer 1

if self.Edit4.Text <> '' then
  DataModule1.Table1Birthday.Value:=self.DateTimePicker1.Date;
为空的时候不对那个字段进行负值，那个字段的值自然是空的。

Answer 2

DataModule1.Table1Birthday.AsString := '';饥渴————————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
————————————————————————————————————

Answer 3

DataModule1.Table1Birthday.Value:=Null