Delphi修改windows7系统时间.rar

时间:2022-07-30 12:58:35
【文件属性】:

文件名称:Delphi修改windows7系统时间.rar

文件大小:6KB

文件格式:RAR

更新时间:2022-07-30 12:58:35

Delphi源码-系统相关

修改系统时间_Delphi修改windows7系统时间的开源源码,按照提示输入新的时间,点击“修改”按钮后即可改变windows当前时间,主要是学习delphi7和windows之间的时间接口,如何操作等。相关代码如下:   For i := 0 to Form1.ComponentCount -1 do   begin    if ComponentS[i] is TEdit then    begin    if TEdit(Components[i]).Text = '' then    begin    Application.MessageBox('请将日期输入完整!','提示',64);    Exit;    end;    end;   end;   SetDate.wYear := StrToInt(Edit1.Text);   SetDate.wMonth := StrToInt(Edit2.Text);   SetDate.wDay := StrToInt(Edit3.Text);   SetDate.wHour := 5;   SetDate.wMinute := 0;   SetDate.wSecond := 0;   SetSystemTime(SetDate);   ……


【文件预览】:
srcfans.com
----修改系统时间()
--------Project1.res(876B)
--------Unit1.dfm(2KB)
--------Project1.cfg(434B)
--------Unit1.pas(1KB)
--------Project1.dpr(188B)
--------Project1.dof(2KB)
--------Unit1.dcu(5KB)

网友评论