【BIOS時間】程式如何擷取BIOS時間?? |
|
尚未結案
|
|
uuujjj
一般會員   發表：31 回覆：59 積分：18 註冊：2002-09-28 發送簡訊給我 |
各位前輩&高手們大家好～
我遇到一個對我而言蠻棘手的問題，
想提出來，希望高手們能幫幫忙解解惑… 問題環境是這樣的：
現在想寫一道程式，是抓資料庫資料的程式…
這是方便大家做為搜尋資料的小程式…
但，資料庫本身會不定時更新及更動…
因此，我想寫的是，指定某一日期時…
程式自動會跑出「日期已超過使用期限」而自動跳離程式，
讓程式抓系統日期算蠻容易的…
因為Delhpi本身就有內儲函式可使用…
但這也是小小缺點，假如今天有一user將右下角的windows系統時間…
叫出來點選任一日期(非設定為無法使用系統之日期)
這樣一來，程式卻又可以正常使用了…
因此，我想寫抓取BIOS時間的程式…
至少user不會這麼方便的修改系統日期…
不知道有沒有高手能替我們解解疑惑呢??? 以下是我寫的只單純抓windows系統時間的程式： procedure TForm1.Timer1Timer(Sender: TObject);
begin
label1.Caption :=DateToStr(Now);
if label1.Caption = '2003/2/19' then
begin
showmessage('此系統期限已過期');
close;
end;
end;
|
|
timhuang
尊榮會員  發表：78 回覆：1815 積分：1608 註冊：2002-07-15 發送簡訊給我 |
|
|
ddy
站務副站長  發表：262 回覆：2105 積分：1169 註冊：2002-07-13 發送簡訊給我 |
|
|
RaynorPao
版主  發表：139 回覆：3622 積分：7025 註冊：2002-08-12 發送簡訊給我 |
引言: 各位前輩&高手們大家好～ 我遇到一個對我而言蠻棘手的問題， 想提出來，希望高手們能幫幫忙解解惑… 問題環境是這樣的： 現在想寫一道程式，是抓資料庫資料的程式… 這是方便大家做為搜尋資料的小程式… 但，資料庫本身會不定時更新及更動… 因此，我想寫的是，指定某一日期時… 程式自動會跑出「日期已超過使用期限」而自動跳離程式， 讓程式抓系統日期算蠻容易的… 因為Delhpi本身就有內儲函式可使用… 但這也是小小缺點，假如今天有一user將右下角的windows系統時間… 叫出來點選任一日期(非設定為無法使用系統之日期) 這樣一來，程式卻又可以正常使用了… 因此，我想寫抓取BIOS時間的程式… 至少user不會這麼方便的修改系統日期… 不知道有沒有高手能替我們解解疑惑呢??? 以下是我寫的只單純抓windows系統時間的程式： procedure TForm1.Timer1Timer(Sender: TObject); begin label1.Caption :=DateToStr(Now); if label1.Caption = '2003/2/19' then begin showmessage('此系統期限已過期'); close; end; end; uuujjj 你好: 只是一點觀念上的建議~~參考看看
------
-- 若您已經得到滿意的答覆，請適時結案!! -- -- 欲知前世因，今生受者是；欲知來世果，今生做者是 -- -- 一切有為法，如夢幻泡影，如露亦如電，應作如是觀 -- |
|
uuujjj
一般會員 發表：31 回覆：59 積分：18 註冊：2002-09-28 發送簡訊給我 |
發表時間：2003-02-19 22:26:25
IP:61.218.xxx.xxx 未訂閱
系統時間：2024-04-24 9:57:43
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |