Delphi справочник - Форум программистов - Навигация  
 A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z      По первой букве  
System     SysUtils     StrUtils     DateUtils     FileCtrl     ConvUtils     StdConvs     Math     Classes     Dialogs     Types     Variants    ПО Unit   Compiler directives     Directives     Keywords     Types     Variables     Constants     Functions     Procedures    По категории  


Основы Delphi
EndOfAMonth
Функция
Генерация значения TDateTime, установленное на самый конец месяца DateUtils unit
  function EndOfAMonth ( const Year, Month : Word ) : TDateTime;
Описание
Функция EndOfAMonth генерирует значение TDateTime, установленное на данный Год (Year) и Месяц (Month) с днём установленным на последнее число месяца, и времени, установленного на 1 миллисекунду перед полуночью.

Значение Года (Year) должно быть между 0 и 9999.

Значение Месяца (Month) должно быть между 1 (Январь) и 12 (Декабрь).
Примечания
Ошибки в значениях параметра выдают EConvertError.
Похожие команды
EndOfADay  Генерирует значение TDateTime, установленное на самый конец дня

 
Пример кода : Установка даты на последнюю миллисекунду февраля 2000
var
  mydate : TDateTime;

begin
  myDate := EndOfAMonth(2000, 2);

  // Гарантируем, что Миллисекунды будут показаны
  LongTimeFormat := 'hh:mm:ss.zzz';
  ShowMessage('Конец февраля 2000 = '+DateTimeToStr(myDate));
end;

Конец февраля 2000 = 29/02/2000 23:59:59.999
 



© Форум Delphi   |  Блог программистов   |  Создание и продвижение сайтов - "Веб сателлит"  |  Ссылки   |  Английская версия