Now

function Now():TclDateTime;

The Now function returns the current date and time in the local time zone.

Example:

Base Syntax

 var
   today : TclDateTime;
 
 begin
 
   today := Now(); // or Now
   ShowMessage('Today has date = '+DateToStr(today));
   ShowMessage('Today has time = '+TimeToStr(today));
 
 end;

TRObject Syntax

 var
   today : TclDateTime;
 
 {
   today = Now(); // or Now
   ShowMessage('Today has date = '+DateToStr(today));
   ShowMessage('Today has time = '+TimeToStr(today));
 
 }

Example Output:

Today has date = 28.02.2023
Today has time = 13:08:53