Question

delphi 时间控件DatetTimePicker 读取数据库？

如题，如何使用DatetTimePicker控件读取数据库里面的时间啊？急急急！！！小弟新手请哪位大虾给帮帮忙啊。

Answer 1

filectime(filename:string):tdatetime;
var
vSearchRec: TSearchRec;
LocalFileTime: TFileTime;
I: Integer;
begin
if FindFirst(filename, faAnyFile, vSearchRec) = 0 then

FileTimeToLocalFileTime(vSearchRec.FindData.ftLastWriteTime, LocalFileTime);
FileTimeToDosDateTime(LocalFileTime, LongRec(I).Hi, LongRec(I).Lo);
// Memo1.Lines.Values['修改时间'] := DateTimeToStr(FileDateToDateTime(I));
FindClose(vSearchRec);
result:=FileDateToDateTime(I);
end;