TdateTimePicker控制元件
kind設為：dtkTime
format設為：yyyy-MM-dd hh:mm
可是它可能是由于kind的關系，只能設定time,
Date設定后，并不改變
我查看了一下源代碼，并沒有發現如何直接控制的介面
據說是直接封裝的Windows的一個元件的的東西
沒辦法就用兩個吧
但是一個很有意思的事情，就是
他們的date和time回傳的居然都是一個完整的DateTime值
下面的函式可以解決這個問題
首部 function Date: TDateTime; $[SysUtils.pas
功能 回傳當前日期
說明 Date - Int(Date)=0;
參考 function SysUtils.DateTimeToString
例子 Edit1.Text := DateToStr(Date);
首部 function Time: TDateTime; $[SysUtils.pas
功能 回傳當前時間
說明 Time - Frac(Time)=0;
參考 function Windows.GetLocalTime;function SysUtils.EncodeTime
例子 Edit1.Text := TimeToStr(Time);
uj5u.com熱心網友回復：
這個控制元件同時使用日期和時間問題太多了，要不你把日期和時間分開設定使用，否則使用中會保留快取的資料，format=' '后，還能讀出上一個資料，防不勝防，我已經不用了。用dbdatetimeediteh吧，目前看用著很不錯。
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/14314.html
標籤：非技術區