delphi如何将一个日期类型的数据字段清空

delphi如何将一个日期类型的数据字段清空
,到期日期是一个时间.不是字符串

ADOQuery1['到期日期'] := ''; //这样清空会出错

ADOQuery1['到期日期'] := 0; //这样为0的话不出错,但是时间变成了1899-12-30

求教,怎么让他变成空的

ADOQuery1.Fields[1].Text 这样的格式可以清空

但是这要下标..数据太多不想用下标

ADOQuery1.FieldByName('字段名').Text

ADOQuery1.FieldByName('').Clear;
ADOQuery1.FieldByName('').Value := nil;
应该也有可以的, 你试下。

主要代码如下:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Label1.Caption := DateTimeToStr(now());
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Label2.Caption := FormatDateTime('yyyy年mm月dd日 hh时nn分ss秒',now());
end;

 

Copyright © 2007-2012 www.chuibin.com 六维论文网 版权所有