@@ -1509,7 +1509,7 @@ begin
Result:=TryEncodeDate(AYear,AMonth,ADay,AValue);
Result:=Result and TryEncodeTime(AHour,AMinute,ASecond,Amillisecond,Tmp);
If Result then
- Avalue:=AValue+Tmp;
+ Avalue:=ComposeDateTime(AValue,Tmp);
end;
{ ---------------------------------------------------------------------