数据库中如何输入时间？

Question

getdate()
Delphi中，Now，就是系统的现在时间精确到秒

Answer 1

不行，执行到Table1['开户时间']:=DateTimeToTimeStamp(DateTimePicker1.Date+DateTimePicker2.Time);
时出错，提示：[Error] Unit5.pas(68): Incompatible types: 'Variant' and 'TTimeStamp'

Answer 2

用DateTimeToTimeStamp(datetimepicker.DateTime);
不过你要精确到秒，最好用系统当前事件函数Now;
—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”等字样，删除它们';
I.Desire := '加不加分随你';
—————————————————————————————————
　　　　　　　

Answer 3

Table1['开户时间']:=DateTimeToTimeStamp(DateTimePicker1.Date+DateTimePicker2.Time);
左边改为：
Table1.FieldByName('开户时间').AsDateTime
—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”等字样，删除它们';
I.Desire := '加不加分随你';
—————————————————————————————————
　　　　　　　

Answer 4

不行，字段类型是TimeStamp，问题是怎样把DateTime类型转换成TimeStamp