如何优雅的给TDatetimePicker控件赋值(Delphi)