blob: 95ee75864d7c141f122d557e2ff97b336321f741 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
Program Example24;
{ This program demonstrates the StartOfTheYear function }
Uses SysUtils,DateUtils;
Const
Fmt = '"First day of this year : "dd mmmm yyyy';
Begin
Writeln(FormatDateTime(Fmt,StartOfTheYear(Today)));
End.
|