由于本机系统不准确,所以决定从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时间服务器获取标准时间相关推荐

  1. 从Internet时间服务器获取标准格林尼治时间

    从Internet时间服务器获取标准格林尼治时间 由于本机系统时间不准确,所以决定从Internet 时间服务器获取标准时间来校正  系统时间,说干就干. 程序设计步骤如下: 1.  新建一个工程: ...

  2. c# Internet时间服务器同步

    需要用到的名空间 using System.Net; using System.Net.Sockets; using System.Runtime.InteropServices; 建立一个结构 pu ...

  3. 计算机时间与网络时间无法同步,终于解决了本地计算机时间无法与Internet时间服务器同步的难题...

    一:如何更新 本地计算机时间与Internet时间服务器同步的操作方法如下,首先在任务栏右边那里找到时间图标,直接双击,弹出如下的对话框: 如上图,切换到"Internet 时间" ...

  4. 修改Windows的Internet时间服务器使时间同步

    Windows自带的Internet时间服务器会出现不能同步时间的毛病,我选择了上海交通大学网络中心NTP服务器来同步时间,速度很快. 方法:桌面右下角,时钟,点击,调整日期/时间, 日期和时间--- ...

  5. 自动与Internet时间服务器同步

    自动与Internet时间服务器同步 Windows默认的二个Internet时间服务器:time.windows.com和time.nist.gov大家肯定经常用,反正在我这里是经常时间同步失败,大 ...

  6. 让Windows 时间与Internet 时间服务器同步

    很多新机器开装后发现时间不对,很多人下意识会拿手机或者手表来修改时间.对无法使用Internet的机器来说,手工核对是唯一的解决办法,但是对于连接Internet的机器来说,手工核对时间是完全没有必要 ...

  7. 微软时间源服务器,Windows的Internet时间服务器使时间同步 – 运维那些事

    Windows自带的Internet时间服务器会出现不能同步时间的毛病,我选择了上海交通大学网络中心NTP服务器来同步时间,速度很快. 方法:桌面右下角,时钟,点击,调整日期/时间, 日期和时间--- ...

  8. c++语言怎么从internet上某个时间服务器获取时间信息,在VC++中实现同步Internet时间...

    写作目的:(此段可跳过) 同步Internet时间,即通过Internet的校时网站传来的数据校准本机时间.但是现在网络上查到的相关编程资料并不多,且其中多是VB和Delphi的代码,VC的代码我还没 ...

  9. 从网络时间服务器获取并打印当前时间

    很多程序要求设备的时间精准,例如Unix系统中的make命令.设备上的时间可能不够准确,需要和网络中的时间服务器同步.可以编写一个Python客户端,让设备上的时间和某个网络时间服务器同步.要完成这一 ...

最新文章

  1. 占据栅格地图(Occupancy Grid Map)
  2. pip更换国内镜像源
  3. http://blog.csdn.net/fanzhonglei
  4. Noj-589 --糖果
  5. 多快好省的预训练模型:你丢我也丢
  6. python调用gpu进行运算_tensorflow指定CPU与GPU运算的方法实现
  7. android对象申明,Kotlin中的对象表达式和对象声明的具体使用
  8. 计算机视觉中的Transformer的最新进展!
  9. 三大运营商5G基站大单纷纷落地:华为、中兴、爱立信、大唐移动收获大
  10. 最受白领欢迎的12大办公软件
  11. 跨域推荐: 迁移学习和推荐系统的火花碰撞
  12. python学习--面向过程程序设计实例
  13. 2. Mysql 升级 与 升级后 mysql --version 和 select version() 不一致问题
  14. AIML相关内容学习整理
  15. Java FTP 下载文件和文件夹
  16. 【js练习】鼠标按下和松开事件
  17. linux配置4g网络命令_[4G]Linux平台上实现4G通信
  18. Windows下GetLastError()返回值介绍
  19. python交互编程模式_进入python交互模式的方法
  20. 免费的云数据库平台Planetscale

热门文章

  1. Retrofit详解(一)(Retrofit创建过程)
  2. 10年百度的T6,现在应该挣几两银子?
  3. windows下安装mongodb时报错verify that you have sufficient privileges to start system services解决方法
  4. ubuntu添加自定义vga输出分辨率
  5. [Android App] 内涵段子最新5.5.5 去广告去更新修改版
  6. 【异常处理】com.mchange.v2.async.ThreadPoolAsynchronousRunner$DeadlockDetector@390508 --nb
  7. 参加AWS技术峰会的收获与思考
  8. SiteServer CMS 响应式模板中心上线啦
  9. linux top 命令
  10. 【手把手带你刷好题】—— 34.求a+aa+aaa+aaaa+aaaaa之和(非初学者勿看)(作业、非力扣)