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

請問關於時間運算問題?

答題得分者是:mephise
icjh3238
一般會員


發表:2
回覆:0
積分:0
註冊:2010-11-28

發送簡訊給我
#1 引用回覆 回覆 發表時間:2011-06-09 13:45:36 IP:140.127.xxx.xxx 訂閱
各位先進:
我現在有個問題就是例如時間:2011/6/9 下午01:20 ,要在加上N分鐘後,直接運算其結果,程式應該如何撰寫?

發文者才剛入門寫程式,請各位先進不吝賜教,謝謝
Victor4022
中階會員


發表:0
回覆:76
積分:90
註冊:2011-02-20

發送簡訊給我
#2 引用回覆 回覆 發表時間:2011-06-09 23:21:07 IP:122.126.xxx.xxx 訂閱

試試這個:

uses DateUtils

IncMinutes

===================引 用 icjh3238 文 章===================
各位先進:
我現在有個問題就是例如時間:2011/6/9 下午01:20 ,要在加上N分鐘後,直接運算其結果,程式應該如何撰寫?

發文者才剛入門寫程式,請各位先進不吝賜教,謝謝
mephise
高階會員


發表:4
回覆:149
積分:205
註冊:2004-02-09

發送簡訊給我
#3 引用回覆 回覆 發表時間:2011-06-23 16:51:24 IP:220.137.xxx.xxx 訂閱
補充一下關於 Delphi 及 BCB 中的時間相關知識

在 TDateTime 這個資料型態中, 時間其實是以浮點數的方式呈現
時間的計算從 1899/12/30 開始, 每天加1.

也就是說
12/30/1899 12:00 am = 0
12/31/1899 12:00 am = 1
Now() 1/86400 = 現在的時間加1秒 (因為一天有86400秒 所以 1/86400 = 1秒) 以此類推

當然 Delphi 中也有許多早就幫你寫好的日期時間函數,
你可以直接在 Help 中打上 Datetime routines 就會列出來



------
Mephise Chen
前興德工程師
cancer
高階會員


發表:58
回覆:319
積分:190
註冊:2004-07-31

發送簡訊給我
#4 引用回覆 回覆 發表時間:2011-07-01 08:54:10 IP:220.128.xxx.xxx 未訂閱
我一直在想,為甚麼會是 1899/12/30 ?為甚麼不用 1900/01/01(二十世紀第一天)?而 1899/12/30 也不是十九世紀的最後一天,真是有點奇怪。
===================引 用 mephise 文 章===================
補充一下關於 Delphi 及 BCB 中的時間相關知識

在 TDateTime 這個資料型態中, 時間其實是以浮點數的方式呈現
時間的計算從 1899/12/30 開始, 每天加1.

也就是說
12/30/1899 12:00 am = 0
12/31/1899 12:00 am = 1
Now() 1/86400 = 現在的時間加1秒 (因為一天有86400秒? 所以 1/86400 = 1秒)? 以此類推

當然 Delphi 中也有許多早就幫你寫好的日期時間函數,
你可以直接在 Help 中打上 Datetime routines 就會列出來



mephise
高階會員


發表:4
回覆:149
積分:205
註冊:2004-02-09

發送簡訊給我
#5 引用回覆 回覆 發表時間:2011-07-01 10:25:25 IP:220.137.xxx.xxx 訂閱
這我也不知道, 好像是根據CMOS裡面的Clock的計數就是從這時間開始的
此外, M$ SQL, ASP .NET 也都是從這時間開始計算的

===================引 用 cancer 文 章===================
我一直在想,為甚麼會是 1899/12/30 ?為甚麼不用 1900/01/01(二十世紀第一天)?而 1899/12/30 也不是十九世紀的最後一天,真是有點奇怪。
===================引 用 mephise 文 章===================
補充一下關於 Delphi 及 BCB 中的時間相關知識

在 TDateTime 這個資料型態中, 時間其實是以浮點數的方式呈現
時間的計算從 1899/12/30 開始, 每天加1.

也就是說
12/30/1899 12:00 am = 0
12/31/1899 12:00 am = 1
Now() 1/86400 = 現在的時間加1秒 (因為一天有86400秒? 所以 1/86400 = 1秒)? 以此類推

當然 Delphi 中也有許多早就幫你寫好的日期時間函數,
你可以直接在 Help 中打上 Datetime routines 就會列出來



------
Mephise Chen
前興德工程師
系統時間:2024-04-27 12:57:37
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!