如何给一个日期型的参数赋空值？

Question

各位同道中人：
　
　　请教：First  如何如何给一个日期型的参数赋空值？　　　　　Second 如何给一个短整型的参数赋空值？　　备注：如果用Null，会提示类型不匹配，因为把Null认做字符串型！

Answer 1

1)ParamByName('First').Clear;
2)ParamByName('Second').Clear;

Answer 2

各位：
　　好像把我的意思理解错了！
下面是我的程序：
If Trim(Edit1.text)<>'' then
   DataModule2.Query1.ParamByName('Psex').assmallint:=Trim(Edit1.text)
Else DataModule2.Query.ParamByName('Psex').Assmallint:=?;  //赋空值
If Trim(Edit2.text)<>'' then
   DataModule2.Query1.ParamByName('Pbir').Asdate:=Trim(Edit2.text)
Else DataModule2.Query1.ParamByName('Pbir').Assmallint:=?; //赋空值   多谢各位大虾！

Answer 3

不能给NULL，应该给Nil。你试试，在以后的Delphi中不再有NULL了。

Answer 4

If Trim(Edit1.text)<>'' then
   DataModule2.Query1.ParamByName('Psex').assmallint:=Trim(Edit1.text)
Else DataModule2.Query.ParamByName('Psex').Clear;  //赋空值
If Trim(Edit2.text)<>'' then
   DataModule2.Query1.ParamByName('Pbir').Asdate:=Trim(Edit2.text)
Else DataModule2.Query1.ParamByName('Pbir').Clear;

Answer 5

Datetime可以赋0；
smalldatetime不能赋0。