从Internet时间服务器获取标准时间
由于本机系统不准确,所以决定从Internet 获取来校正系统,说干就干。
程序设计步骤
1、新建一个工程;
2、在窗体上放一个TEdit控件和一个TClientSocket(在Internet页下)控件。TEdit用来显示取得的格林尼治转化成北京后的,TClientSocket用来从Internet 获取的格林尼治;
3、程序代码
procedure TForm1.FormCreate(Sender: TObject);
begin
ClientSocket1.Host :=‘tick.usno.navy.mil‘;// 美国海军天文台;
ClientSocket1.Port :=13;
ClientSocket1.Open;
end;
procedure TForm1.ClientSocket1Read(Sender: TObject;
Socket: TCustomWinSocket);
var
TempTime: TDateTime;
hh,mm,ss,ms: word;
sTime : string;
begin
sTime := Socket.ReceiveText;// 取得格林尼治;
sTime:=Copy(sTime,12,8);// 取得部分;
DecodeTime(StrToTime(sTime),hh,mm,ss,ms);
hh:=(hh+8) mod 24;// 转化成北京;
TempTime:=EncodeTime(hh,mm,ss,ms);
Edit1.Text :=TimeToStr(TempTime);
end;
4、编译运行,稍微等几秒钟(和你的网络速度有关,等了大概一秒钟),TEdit控件就显示出了由格林尼治转化得到的北京。
怎么样?很简单吧。赶快试一下吧!需要说明一点:由于网络延时的缘故,这
个程序得到的会和有几秒的误差,但除非你用来控制火箭的发射,否
则,这无妨大碍。
是从美国海军天文台得到,你还可以从别的上获间,但由于每个的格式不同,所以在编写程序时要注意作相应的处理。
域名组织
Clock.sgi.comSGI
Tick.mit.edu麻省理工学院
Time.nist.govNIST
从Internet时间服务器获取标准时间相关推荐
- 从Internet时间服务器获取标准格林尼治时间
从Internet时间服务器获取标准格林尼治时间 由于本机系统时间不准确,所以决定从Internet 时间服务器获取标准时间来校正 系统时间,说干就干. 程序设计步骤如下: 1. 新建一个工程: ...
- c# Internet时间服务器同步
需要用到的名空间 using System.Net; using System.Net.Sockets; using System.Runtime.InteropServices; 建立一个结构 pu ...
- 计算机时间与网络时间无法同步,终于解决了本地计算机时间无法与Internet时间服务器同步的难题...
一:如何更新 本地计算机时间与Internet时间服务器同步的操作方法如下,首先在任务栏右边那里找到时间图标,直接双击,弹出如下的对话框: 如上图,切换到"Internet 时间" ...
- 修改Windows的Internet时间服务器使时间同步
Windows自带的Internet时间服务器会出现不能同步时间的毛病,我选择了上海交通大学网络中心NTP服务器来同步时间,速度很快. 方法:桌面右下角,时钟,点击,调整日期/时间, 日期和时间--- ...
- 自动与Internet时间服务器同步
自动与Internet时间服务器同步 Windows默认的二个Internet时间服务器:time.windows.com和time.nist.gov大家肯定经常用,反正在我这里是经常时间同步失败,大 ...
- 让Windows 时间与Internet 时间服务器同步
很多新机器开装后发现时间不对,很多人下意识会拿手机或者手表来修改时间.对无法使用Internet的机器来说,手工核对是唯一的解决办法,但是对于连接Internet的机器来说,手工核对时间是完全没有必要 ...
- 微软时间源服务器,Windows的Internet时间服务器使时间同步 – 运维那些事
Windows自带的Internet时间服务器会出现不能同步时间的毛病,我选择了上海交通大学网络中心NTP服务器来同步时间,速度很快. 方法:桌面右下角,时钟,点击,调整日期/时间, 日期和时间--- ...
- c++语言怎么从internet上某个时间服务器获取时间信息,在VC++中实现同步Internet时间...
写作目的:(此段可跳过) 同步Internet时间,即通过Internet的校时网站传来的数据校准本机时间.但是现在网络上查到的相关编程资料并不多,且其中多是VB和Delphi的代码,VC的代码我还没 ...
- 从网络时间服务器获取并打印当前时间
很多程序要求设备的时间精准,例如Unix系统中的make命令.设备上的时间可能不够准确,需要和网络中的时间服务器同步.可以编写一个Python客户端,让设备上的时间和某个网络时间服务器同步.要完成这一 ...
最新文章
- Squid如何提高命中率
- 【转载】 C#使用Math.Abs返回数值的绝对值
- Silverlight中使用控件模板的问题(自己添加控件的方法)
- mysql有个数据用or语句有相同条件_MySql带OR关键字的多条件查询语句
- Commons net实现 FTP上传下载
- Git学习文档之一 学习文档-上传下载
- UNIX会被取代吗?来听听UNIX诞生的见证者怎么说~
- JQuery-Ztree 树插件下载 与 快速入门
- 象棋名手3.26版本32位六核完美破解版,含第四代无敌开局库。
- 学习日记:scipy库的版本差异
- 口布杯花的60种叠法_10种餐巾折花杯花的步骤用文字解说怎么折
- C语言52单片机串口中断,52单片机的中断及其使用方法
- 欧洲游记之—— 路过荷兰
- office2003、2010、2013下载资源
- 电脑重装系统引导方式不是BIOS 不能引导MBR磁盘怎么办
- 雷军的本命年:轮回中的挫败、幸运和逆袭
- Vue框架中常见的前端UI库
- Spring Cloud之(十一)服务调用Feign
- (绝对防御勒索病毒)装机员 ghost win7 Sp1 64位纯净6月版
- 24-哈希碰撞攻击是什么?
热门文章
- 独家 | 利用深度学习来预测Spotify上的Hip-Hop 流行程度
- 东大22春电子政务X《电子政务》在线平时作业3参考非答案
- web前端期末大作业 HTML+CSS+JS 游戏介绍【学生网页设计作业源码】
- 联想Y400怎么样在插入鼠标时自动禁用触摸板
- el-input-number 默认值设置失效
- EXCEL双击文件打开是空白的
- 关于意志力,不得不说的十二件事
- react - 利用a标签,完成下载及跳转
- 450分学计算机能上的二本学校,高考考了450分能上什么大学 450分左右的理科大学有哪些...
- awgn函数 matlab measure 什么意思,Matlab中 awgn 函数输入参数带有‘measured’ 时snr的含义...