~~~~~~~~~~~~~~~~~~~~~~~~~
var
DateValue : TDate;
TimeValue: TTime;
OutDateTime : TDateTime;
...
// OutDateTime combines DateValue and TimeValue
OutDateTime := Int(DateValue) + Frac(TimeValue) ;
~~~~~~~~~~~~~~~~~~~~~~~~~
Delphi tips navigator:
» How to show week numbers in a TDateTimePicker
« Implementing C#'s foreach loop in Delphi 8

