From Clomosy Docs

No edit summary
No edit summary
Line 1: Line 1:
function StrToDateTime(const DateTime string):TclDateTime;
<div class="alert alert-ligth border border-3 border-primary-subtle rounded-5 p-4 shadow-sm" role="alert">
function StrToDateTime(const S: string):TclDateTime;
</div>


The StrToDateTime function attempts to convert a date plus time as a string DateTime into a TclDateTime value. The first, date part of the string must adhere to the format of the ShortDateFormat value, and use the DateSeparator character to separate the day, month and year values.<br>
 
The StrToDateTime function attempts to convert a date plus time as a string S into a TclDateTime value. The first, date part of the string must adhere to the format of the ShortDateFormat value, and use the DateSeparator character to separate the day, month and year values.<br>
   
   
The second, time part, separated by a blank from the date must adhere to the format of the LongTimeFormat value, and use the TimeSeparator character to separate the hour, minute and second values.<br>
The second, time part, separated by a blank from the date must adhere to the format of the LongTimeFormat value, and use the TimeSeparator character to separate the hour, minute and second values.<br>
Line 14: Line 17:
:The second must be 0..59 (optional)
:The second must be 0..59 (optional)


'''Example:'''<br>
<b>Example</b><br>
:'''Base Syntax'''
<b>TRObject Syntax</b><br>
  var
<pre>
    myDateTime : TclDateTime;
var
 
  myDateTime : TclDateTime;
  begin
 
{
    myDateTime := '''StrToDateTime'''('23.02.75  12');
    ShowMessage('23.02.75  12      = '+DateTimeToStr(myDateTime));
  myDateTime = StrToDateTime('23.02.75  12');
 
  ShowMessage('23.02.75  12      = '+DateTimeToStr(myDateTime));
    myDateTime := Now;
    ShowMessage('Now  = '+DateTimeToStr(myDateTime));
  myDateTime = Now;
 
  ShowMessage('Now  = '+DateTimeToStr(myDateTime));
  end;
}
</pre>
<b>Base Syntax</b><br>
<pre>
var
  myDateTime : TclDateTime;
begin
  myDateTime := StrToDateTime('23.02.75  12');
  ShowMessage('23.02.75  12      = '+DateTimeToStr(myDateTime));
  myDateTime := Now;
  ShowMessage('Now  = '+DateTimeToStr(myDateTime));
end;
</pre>


:'''TRObject Syntax'''
<b>Output:</b><br>
  var
<div class="alert alert-success" role="alert" data-bs-theme="light">
    myDateTime : TclDateTime;
23.02.75  12     = 23.02.1975 12:00:00<br>
 
Now  = 28.02.2023 14:50:56
  {
</div>
 
    myDateTime = '''StrToDateTime'''('23.02.75  12');
    ShowMessage('23.02.75  12     = '+DateTimeToStr(myDateTime));
 
    myDateTime = Now;
    ShowMessage('Now  = '+DateTimeToStr(myDateTime));
 
  }


'''Output:'''<br>
<h2> See Also </h2>
23.02.75  12      = 23.02.1975 12:00:00
* [[System_Library#Type_Conversion_Functions | Type Conversion Functions]]
Now  = 28.02.2023 14:50:56

Revision as of 13:57, 8 October 2024


The StrToDateTime function attempts to convert a date plus time as a string S into a TclDateTime value. The first, date part of the string must adhere to the format of the ShortDateFormat value, and use the DateSeparator character to separate the day, month and year values.

The second, time part, separated by a blank from the date must adhere to the format of the LongTimeFormat value, and use the TimeSeparator character to separate the hour, minute and second values.

The default format is day.month.year hour:minute:second, where :

The day must be 1..31 (depending on month/year)
The month must be 1..12
The year must be 0..9999 (optional)
The hour must be 0..23
The minute must be 0..59 (optional)
The second must be 0..59 (optional)

Example
TRObject Syntax

 var
   myDateTime : TclDateTime;
 
 {
 
   myDateTime = StrToDateTime('23.02.75   12');
   ShowMessage('23.02.75   12      = '+DateTimeToStr(myDateTime));
 
   myDateTime = Now;
   ShowMessage('Now   = '+DateTimeToStr(myDateTime));
 
 }

Base Syntax

 var
   myDateTime : TclDateTime;
 
 begin
 
   myDateTime := StrToDateTime('23.02.75   12');
   ShowMessage('23.02.75   12      = '+DateTimeToStr(myDateTime));
 
   myDateTime := Now;
   ShowMessage('Now   = '+DateTimeToStr(myDateTime));
 
 end;

Output:

See Also