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