delphi語言教程 delphi如何求兩個通過調(diào)用系統(tǒng)得到的時間的時間差?
delphi如何求兩個通過調(diào)用系統(tǒng)得到的時間的時間差?使用以下方法進行測試:程序TForm1。按鈕1click(sender:tobject)vartimestamp:ttimestamptime1,
delphi如何求兩個通過調(diào)用系統(tǒng)得到的時間的時間差?
使用以下方法進行測試:程序TForm1。按鈕1click(sender:tobject)vartimestamp:ttimestamptime1,time2:tdatetimediff:integerbegin time1:=strotime(Edit1)。Text)//轉(zhuǎn)換為時間格式time2:=strotime(edit2。Text)timestamp:=datetimetotimestamp(time2-time1)//計算差值Dec(時間戳日期,TTimeStamp(DateTimeToTimeStamp(0)).Date)timeDiff:=(時間戳日期*24*60*60) ( 時間戳。時間Div 1000)timediff:=round(timediff/60)//轉(zhuǎn)換為分鐘showmessage(“diff in Min=”inttostr(timediff))//顯示結(jié)束
有時工作中會記錄兩次,計算這兩次的總時間需要多少分鐘?今天,讓我們用這個表來計算兩次之間的分鐘數(shù)。
1. 以創(chuàng)建新的EXCEL表為例。
2. 雙擊excel圖標打開應(yīng)用程序。
3. 首先在A1和A2中分別輸入兩次,然后將兩次之差的結(jié)果輸入A3。
4. 假設(shè)A1時間是2018年11月8日下午19:30。
5. A2時間為2018年11月8日下午20:31。
6. 在A3框中輸入以下公式:=(a2-a1)*24*60,輸入后確認。
7. 你可以得到兩次之間有多少分鐘的差別。