我是个新手,我这里查不到取系统时间的函数,哪位知道?????
解决方案 »
- 请问大家一个关于SQL语句的问题。
- 过于RxRichedit插入的动态图片不能在win2000运行的问题(分不够就加)
- 能否在程序中判断焦点所在的组件和位置!
- 有谁对Web Service的应用比较熟悉的请进来看看
- 请问一个有关borland database engine问题
- 请教这个sql语句有没有错,错了应该怎样写
- 各位大虾有没有 Delphi6 传输图片的例子(基于TClientSocket 和TServerSocket的)
- 关于TQuery的一个问题
- 小问题!急!急!!急!!!
- midas问题求救
- 哈哈终于找到一个超全的下载计算机和其他书籍和视频的地方,不敢独享
- 读取结构体数据的问题
procedure TForm1.Button1Click(Sender: TObject);begin
Label1.Caption := DateTimeToStr(Now);end;
time()取当前时间
date()取当前日期返回类型都是tdatetime
即可,返回TDatetime型数值
或者API:GetSystemTime/GetLocalTime
begin
windows.GetLocalTime(t);
ShowMessage(Format('%d-%d-%d %d:%d:%d.%d',[t.wYear,t.wMonth,t.wDay,t.wHour,t.wMinute,t.wSecond,t.wMilliseconds]));
end;还有一个:
Now
tmp:string;
Ftime:TDatetime;
begin
Ftime:=now();
tmp:=datetimetostr(Ftime);
showmessage(tmp);
end;