数据转换(100分)

[!][red][/red]在vc中把时间存在数据库中为一整形数，如997243818，问如何把该数转换为Delphi中可用的yyyy-mm-dd格式的时间，请给出转换方法？

MyDate:= StrToDate(DateStr); //转换字符串为日期
DateStr:= FormatDateTime('yyyy-mmmm-dd',MyDate);

我已找到答案，谢谢各位，分数照给
function ChangeInttoTime(IntTime: integer): String;
var
; MyLargeInteger:LARGE_INTEGER;
; MyFileTime:FileTime;
; MySystemTime:SystemTime;
begin
; MyLargeInteger.QuadPart:=int64(IntTime+3600*8)*int64(10000000)+116444736000000000;
; MyFileTime.dwLowDateTime:=MyLargeInteger.LowPart;
; MyFileTime.dwHighDateTime:=MyLargeInteger.HighPart;
; FileTimeToSystemTime(MyFileTime,MySystemTime);
; Result:=inttostr(MySystemTime.wYear)+'-'+inttostr(MySystemTime.wMonth)+'-'
; +inttostr(MySystemTime.wDay)+' '+inttostr(MySystemTime.wHour)+':'
; +inttostr(MySystemTime.wMinute)+':'+inttostr(MySystemTime.wSecond);
end;