線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:2124
推到 Plurk!
推到 Facebook!

請問如何設定系統日期和時間 ?

 
pcboy
版主


發表:177
回覆:1838
積分:1463
註冊:2004-01-13

發送簡訊給我
#1 引用回覆 回覆 發表時間:2007-01-16 11:17:22 IP:61.219.xxx.xxx 未訂閱
請問如何設定系統日期和時間 ?
這是網路上的範例, 可以執行, 沒有錯誤, 但是也沒有效果
請問問題在哪 ? (小弟在 Windows XP Delphi 7 Enterprise 上測試)
// 設置系統日期和時間
var
MyST:TSystemTime;
begin
with MyST do
begin
wYear:=2000;
// wMonth:=12;
// wDay:=7;
// wHour:=8;
// wMinute:=9;
// wSecond:=10;
end;
SetSystemTime(MyST);
end;
------
能力不足,求助於人;有能力時,幫幫別人;如果您滿意答覆,請適時結案!

子曰:問有三種,不懂則問,雖懂有疑則問,雖懂而想知更多則問!
ChungLin.Net
中階會員


發表:2
回覆:33
積分:52
註冊:2006-07-26

發送簡訊給我
#2 引用回覆 回覆 發表時間:2007-01-16 11:40:20 IP:59.120.xxx.xxx 訂閱
測試了一下,好像需要將參數清空為0
至少需設定以下三個值才能執行成功
wYear:=2000;
wMonth:=12;
wDay:=7;


------
無限的想像,無盡的延伸。
pcboy
版主


發表:177
回覆:1838
積分:1463
註冊:2004-01-13

發送簡訊給我
#3 引用回覆 回覆 發表時間:2007-01-16 14:20:47 IP:61.219.xxx.xxx 未訂閱
不行耶, 小弟測試 6 個全都要設定才行
------
能力不足,求助於人;有能力時,幫幫別人;如果您滿意答覆,請適時結案!

子曰:問有三種,不懂則問,雖懂有疑則問,雖懂而想知更多則問!
ChungLin.Net
中階會員


發表:2
回覆:33
積分:52
註冊:2006-07-26

發送簡訊給我
#4 引用回覆 回覆 發表時間:2007-01-16 14:55:52 IP:59.120.xxx.xxx 訂閱
小弟是用 BCB 6 有先做 memset ,將 MySt 做 '\0' 設定為 0 的動作
所以,除了年、月 、日 無法設定為 0 ,需指定條件才可正常執行
SetSystemTime ,因 MySt 的初始未必為 0 ,如未先做設定為 0
的動作就必須 時、分、秒 也一起指定了
------
無限的想像,無盡的延伸。
系統時間:2024-04-19 11:48:59
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!