代码如下:
var
    datetime1:Tdatetime;    
begin
     ADODataSet1.Close;
     ADODataSet1.CommandText:='USE Computer Select * From 表名 Where ID='+inttostr(1);
     ADODataSet1.Open;
     datetime1:=ADODataSet1.FieldValues['ID'];
     ADODataSet1.Close;     label1.Caption:=datetimetostr(datetime1);
end;读取数据库表中ID号为1的时间为  2011-08-26 10:02:10 ,为什么读取出来label中显示的时间按为1899-12-31