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
 



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