From Clomosy Docs

(Created page with " function EncodeTime(const Hour, Min, Sec, MSec Word):TclDateTime; The EncodeTime function generates a TclDateTime return value from the passed Hour, Min, Sec and MSec (millisecond) values.<br> The permitted parameter values are :<br> Hour = 0..23<br> Min = 0..59<br> Sec = 0..59<br> MSec = 0..999<br> '''Example:'''<br> '''var''' myDate : TclDateTime;<br> '''begin''' // Set my date variable using the EncodeTime function myDate := '''EncodeTime'''(12, 50...")
 
No edit summary
Line 9: Line 9:


'''Example:'''<br>
'''Example:'''<br>
:'''Base Syntax'''
  var
    myDate : TclDateTime;
 
  begin
    // Set my date variable using the EncodeTime function
    myDate := '''EncodeTime'''(12, 50, 40, 231);
    ShowMessage('Date set to '+TimeToStr(myDate));
  end;
:'''TRObject Syntax'''
  var
    myDate : TclDateTime;
 
  {
    // Set my date variable using the EncodeTime function
    myDate = '''EncodeTime'''(12, 50, 40, 231);
    ShowMessage('Date set to '+TimeToStr(myDate));
  }


'''var'''
  myDate : TclDateTime;<br>
'''begin'''
  // Set my date variable using the EncodeTime function
  myDate := '''EncodeTime'''(12, 50, 40, 231);
  ShowMessage('Date set to '+'''TimeToStr'''(myDate));
'''end;'''


'''Output:'''<br>
'''Output:'''<br>
  Time set to 12:50:40
  Time set to 12:50:40

Revision as of 11:35, 13 February 2024

function EncodeTime(const Hour, Min, Sec, MSec Word):TclDateTime;

The EncodeTime function generates a TclDateTime return value from the passed Hour, Min, Sec and MSec (millisecond) values.
The permitted parameter values are :
Hour = 0..23
Min = 0..59
Sec = 0..59
MSec = 0..999

Example:

Base Syntax
 var
   myDate : TclDateTime;
 
 begin
   // Set my date variable using the EncodeTime function
   myDate := EncodeTime(12, 50, 40, 231);
   ShowMessage('Date set to '+TimeToStr(myDate));
 end;
TRObject Syntax
 var
   myDate : TclDateTime;
 
 {
   // Set my date variable using the EncodeTime function
   myDate = EncodeTime(12, 50, 40, 231);
   ShowMessage('Date set to '+TimeToStr(myDate));
 }


Output:

Time set to 12:50:40