// als TTime
TTime currentTTime;
currentTTime.HomeTime();

// als TDateTime
TDateTime currentTDateTime;
currentTDateTime=currentTTime.DateTime();