【文件属性】：
文件名称：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)