Delphi怎么實作登入后開始計算使用時間,然后將時間寫入資料庫,第二次使用的時候,將使用時間與第一次累加
uj5u.com熱心網友回復:
你不是已經寫出思路了嗎?退出時計算時間,并累積到資料表中。
uj5u.com熱心網友回復:
參考 1 樓 秋天之落葉 的回復: 你不是已經寫出思路了嗎?退出時計算時間,并累積到資料表中。 有思路 但是不會寫代碼 我Delphi基礎不是太好 能幫一下忙嗎 急著交作業
uj5u.com熱心網友回復:
參考 1 樓 秋天之落葉 的回復: 你不是已經寫出思路了嗎?退出時計算時間,并累積到資料表中。 或者你告訴我該用什么組件 在資料庫中該如何相加
uj5u.com熱心網友回復:
什么控制元件都不用。最簡單的做法:
主表單啟動的時候,在OnActivate事件中寫
starttime:=now;
應用退出按鍵(視窗退出時間聯動一下)中先寫
overtime:=now;
time:= SecondsBetween(starttime, overtime);
寫入如資料表:
"update 資料表 set 時間=時間+time";
修改成功后,然后再退出;
大致這樣,細節你在補充一下吧。
uj5u.com熱心網友回復:
參考 4 樓 秋天之落葉 的回復: 什么控制元件都不用。最簡單的做法:
主表單啟動的時候,在OnActivate事件中寫
starttime:=now;
應用退出按鍵(視窗退出時間聯動一下)中先寫
overtime:=now;
time:= SecondsBetween(starttime, overtime);
寫入如資料表:
"update 資料表 set 時間=時間+time";
修改成功后,然后再退出;
大致這樣,細節你在補充一下吧。 好的 我去試試
uj5u.com熱心網友回復:
更正
1、視窗退出事件聯動一下
2、time:= SecondsBetween(overtime,starttime,);
uj5u.com熱心網友回復:
參考 6 樓 秋天之落葉 的回復: 更正
1、視窗退出事件聯動一下
2、time:= SecondsBetween(overtime,starttime,); Undeclared identifier:’starttime’
uj5u.com熱心網友回復:
定義一下變數,做成全域變數,或者做成函式呼叫,這是基本的。
uj5u.com熱心網友回復:
參考 8 樓 秋天之落葉 的回復: 定義一下變數,做成全域變數,或者做成函式呼叫,這是基本的。 該用什么變數型別 integer和string都與TDateTime不匹配
uj5u.com熱心網友回復:
TDateTime 型別
uj5u.com熱心網友回復:
參考 4 樓 秋天之落葉 的回復: 什么控制元件都不用。最簡單的做法:
主表單啟動的時候,在OnActivate事件中寫
starttime:=now;
應用退出按鍵(視窗退出時間聯動一下)中先寫
overtime:=now;
time:= SecondsBetween(starttime, overtime);
寫入如資料表:
"update 資料表 set 時間=時間+time";
修改成功后,然后再退出;
大致這樣,細節你在補充一下吧。
太有才了,改教教我!
uj5u.com熱心網友回復:
參考 4 樓 秋天之落葉 的回復: 什么控制元件都不用。最簡單的做法:
主表單啟動的時候,在OnActivate事件中寫
starttime:=now;
應用退出按鍵(視窗退出時間聯動一下)中先寫
overtime:=now;
time:= SecondsBetween(starttime, overtime);
寫入如資料表:
"update 資料表 set 時間=時間+time";
修改成功后,然后再退出;
大致這樣,細節你在補充一下吧。
不要在OnActivate寫,應該在FormShow寫
轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/11204.html
標籤:數據庫相關
上一篇:delphi10的資料庫問題
下一篇:delphi Xe10.3 單元參考windows、Messages 打紅色波浪線求助