Справочник функций и процедур Delphi: EndOfAMonth

  Навигация по первой букве:

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

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

  Реклама:

|  модульные Понтоны.  |

EndOfAMonth
Функция
Генерация значения TDateTime, установленное на самый конец месяца DateUtils unit
  function EndOfAMonth ( const Year, Month : Word ) : TDateTime;

Google  
 
Описание
Функция 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
 


Copyright © 2004-2016 Delphi Sources (источник – "DelphiBasics.ru")
 


Группа ВКонтакте   Ссылка на Twitter   Группа на Facebook