怎样设置系统时间(30分)

小咪 · 1999-08-28

怎样设置系统时间。

Another_eYes · 1999-08-28

var
systime: TSystemTime;
begin
systime.wyear := ...;
systime.wmonth := ...;
systime.wday := ...;
....
setsystemtime(systime);
end;

menxin · 1999-08-28

用setsystemtime!例如：

var mytime:TSystemTime;
begin
GetSystemTime(mytime);
mytime.wYear:=mytime.wYear-1;
SetSystemTime(mytime);

menxin · 1999-08-28

怎么又晚了？

Another_eYes · 1999-08-28

嘿嘿.
eYes还等了1分半钟才回答呢

menxin · 1999-08-28

只有30分嘛，给你了！

Another_eYes · 1999-08-28

别客气别客气. 分分的又不是我(都给你也行)

pegasus · 1999-08-28

请参考下列问题
<a href="DispQ.asp?LID=114494">怎样设置系统时间，我试了几个函数都不行</a><br>
<a href="DispQ.asp?LID=62542">如何设置系统时间的格式？</a><br>
惨呀，发了半个小时都没有发出去，

小咪 · 1999-08-28

多人接受答案了。

小咪 · 1999-08-28

事实上应该用SetLocalTime(dt: TSystemTime)来设置系统时间，
用SetSystemTime好象设置的时间为世界标准时间。