文档章节

WinAPI: GetLocalTime、SetLocalTime、SetSystemTime - 获取与设置系统时间

涂孟超
 涂孟超
发布于 2014/09/26 15:37
字数 162
阅读 19
收藏 0
//声明
GetLocalTime(
  var lpSystemTime: TSystemTime {TSystemTime 结构}
);                              {无返回值}

//设置本地时间
SetLocalTime(
  const lpSystemTime: TSystemTime {TSystemTime 结构}
): BOOL;

//SetSystemTime 设置的是格林尼治时间
SetSystemTime(
  const lpSystemTime: TSystemTime {TSystemTime 结构}
): BOOL;

//TSystemTime 是 _SYSTEMTIME 结构的重定义:
_SYSTEMTIME = record
  wYear: Word;         {年}
  wMonth: Word;        {月}
  wDayOfWeek: Word;    {周}
  wDay: Word;          {日}
  wHour: Word;         {时}
  wMinute: Word;       {分}
  wSecond: Word;       {秒}
  wMilliseconds: Word; {毫秒}
end;

 
 
 
 
 

 

 

  
//举例: procedure TForm1.FormCreate(Sender: TObject); var T: TSystemTime; begin GetSystemTime(T); Memo1.Clear; with Memo1.Lines do begin add(Format('年: %d',[T.wYear])); add(Format('月: %d',[T.wMonth])); add(Format('周: %d',[T.wDayOfWeek])); add(Format('日: %d',[T.wDay])); add(Format('时: %d',[T.wHour])); add(Format('分: %d',[T.wMinute])); add(Format('秒: %d',[T.wSecond])); add(Format('毫秒: %d',[T.wMilliseconds])); end; end;
//效果图:

本文转载自:http://www.cnblogs.com/del/archive/2008/02/13/1067753.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
时间的处理--与网络时间同步

时间准确的重要性不言而喻,有时候我们对时间的要求非常严格,有时候也要求不允许用户调整系统时间,有时候。。。等等情况下,我们都需要时间的同步,虽然Windows也有DOS命令来保持和时钟服务...

长平狐
2012/06/11
70
0
C语言获取SYSTEMTIME

C语言中如何获取时间?精度如何?1 使用timet time( timet timer ) 精确到秒2 使用clockt clock() 得到的是CPU时间精确到1/CLOCKSPERSEC秒3 计算时间差使用double difftime( timet timer1,t...

二胡艺
2014/03/24
0
0
VC/MFC中计算程序运行时间

在我们实际的编程工作中,经常要测量程序的运行时间,比如衡量算法的运行时间等等。在这里我收集了网上集中测量程序运行时间的方法。 通过网上查阅资料,找到以下几种VC中求取程序运行时间的...

长平狐
2013/12/25
977
0
在windows下如何设置精确到微秒级的时间

咨询下大神,在下在做一个windows平台上的时间同步系统,测量延迟可以达到微秒级,现在是不知道怎么修正,找了下系统函数,能找到的只有毫秒级的设置,setlocaltime(),

老高0511
2017/12/22
54
1
[Beautifulzzzz的博客目录] 快速索引点这儿O(∩_∩)O~~,红色标记的是不错的(⊙o⊙)哦~

3D相关开发 [direct-X] 1、direct-X最小框架 [OpenGL] 1、环境搭建及最小系统 [OpenGL] 2、企业版VC6.0自带的Win32-OpenGL工程浅析 51单片机 [51单片机] 1602液晶显示控制代码 [51单片机] 1...

史迪奇2号
2017/08/01
0
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

OSChina 周日乱弹 —— 种族不同,禁止交往

Osc乱弹歌单(2018)请戳(这里) 【今日歌曲】 @小小编辑:推荐歌曲《苏菲小姐》- 鱼果 《苏菲小姐》- 鱼果 手机党少年们想听歌,请使劲儿戳(这里) @貓夏:下大雨 正是睡觉的好时候 临睡前...

小小编辑
今天
183
6
Python 搭建简单服务器

Python动态服务器网页(需要使用WSGI接口),基本实现步骤如下: 1.等待客户端的链接,服务器会收到一个http协议的请求数据报 2.利用正则表达式对这个请求数据报进行解析(请求方式、提取出文...

代码打碟手
今天
1
0
Confluence 6 删除垃圾内容

属性(profile)垃圾 属性垃圾的定义为,一个垃圾用户在 Confluence 创建了用户,但是这个用户在自己的属性页面中添加了垃圾 URL。 如果你有很多垃圾用户在你的系统中创建了属性,你可以使用...

honeymose
今天
0
0
qduoj~前端~二次开发~打包docker镜像并上传到阿里云容器镜像仓库

上一篇文章https://my.oschina.net/finchxu/blog/1930017记录了怎么在本地修改前端,现在我要把我的修改添加到部署到本地的前端的docker容器中,然后打包这个容器成为一个本地镜像,然后把这...

虚拟世界的懒猫
今天
1
0
UML中 的各种符号含义

Class Notation A class notation consists of three parts: Class Name The name of the class appears in the first partition. Class Attributes Attributes are shown in the second par......

hutaishi
今天
1
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

返回顶部
顶部