关于有效datetime的问题(80分)

我用的是delphi5 和interbase6
现在我想在文本框中输入（2001-12-3 4：00：00），可以存在数据库里
其中俩句是这么写的
datamodule2.IBQuery1.SQL.add('update phone set lastrpttm=:t,p306='''+edit13.text+'''where phoneno='''+treeview1.selected.text+'''');
datamodule2.IBquery1.ParamByName('t').asdatetime:=strtotime(edit6.text);

但是当我输入时(2001-12-3 4:00:00)，说time格式是无效的（interbase中lastrottime是timestamp类型的）

如果我只输入4:00:00就可以承认，但在数据库里存的是1899-12-30 4:00:00
我想让日期和时间我都可以输入

试一试
datamodule2.IBQuery1.SQL.add('update phone set lastrpttm=:t,p306='''+edit13.text+'''where phoneno='''+treeview1.selected.text+'''');
datamodule2.IBquery1.ParamByName('t').asdatetime:=strtodatetime(edit6.text);

strtotime-->strtodatetime

tczxm的方法是可行的
请问interbase里当只输入4:00:00时，里面是1899-12-30 4：00：00
我如何设置使为当前日期呢？

没有办法,因为日期缺省值为0,即1899-12-30

用now()取当前日期，再FormatDateTime()插入

多人接受答案了。