delphi中设置系统时间方法


本文整理自网络,侵删。

 

//delphi中设置系统时间方法

var       
    systemtime:Tsystemtime;  
  DateTime:TDateTime;  
begin  
  DateTime:=StrToDateTime(Edit1.text);   //获得时间(TDateTime格式)  
  DateTimeToSystemTime(DateTime,systemtime);   //把Delphi的TDateTime格式转化为API的TSystemTime格式  
  SetLocalTime(SystemTime);   //设置系统时间  
  GetLocalTime(SystemTime);   //读取系统时间  
  DateTime:=SystemTimeToDateTime(SystemTime);   //把API的TSystemTime格式   转化为   Delphi的TDateTime格式  
  Edit2.Text:=DateTimeToStr(DateTime);   //显示当前系统的时间  
end;  

相关阅读 >>

Delphi 监视剪贴板内容

Delphi tidhttp抓取页面信息

Delphi写的服务程序在服务管理器中显示“描述”

Delphi 使窗口透明,并透过透明的窗口操作下面的窗口

Delphi 用dll实现插件的简单演示

Delphi 把窗体客户区图像保存到文件或剪切板

Delphi中从windows资源管理器中拖放图片到timage控件上

gdi tgpimage 提取 gif 动画

vclzip 3.10.1的简单使用示例

Delphi 字符串反转函数

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...

    正在狠努力加载,请稍候...