如何在delphi 中修改机器的系统时间和日期。

[anh]

如何在delphi 中用程序修改机器的系统时间和日期。

[hjd_cw]

win32 api
SetSystemTime

[dongxsoft]

var
SLT: SYSTEMTIME;
begin
SLT.wYear:= 2002;
SLT.wMonth:= 8;
SLT.wDay:= 27;
SLT.wHour:= 10;
SLT.wMinute:= 10;
SLT.wSecond:= 10;
SetLocalTime(SLT);
end;

[dongxsoft]

var
SLT: SYSTEMTIME;
begin
SLT.wYear:= 2002;
SLT.wMonth:= 8;
SLT.wDay:= 27;
SLT.wHour:= 10;
SLT.wMinute:= 10;
SLT.wSecond:= 10;
SetLocalTime(SLT);
end;

[foreveryday007]

//Windows
function SetLocalTime(const lpSystemTime: TSystemTime): BOOL; stdcall;

PSystemTime = ^TSystemTime;
_SYSTEMTIME = record
wYear: Word;
wMonth: Word;
wDayOfWeek: Word;
wDay: Word;
wHour: Word;
wMinute: Word;
wSecond: Word;
wMilliseconds: Word;
end;

[anggogo]

SystemParametersInfo

具体如何读取和修改，你要查API手册

[zhuoyuesky]

setlocaltime楼上说得都对

[shine_yzl]

学习