4programmers.net 4p Delphi Obliczenia EndOfADay
Delphi » Obliczenia

EndOfADay

Adam Boduch
EndOfADay
Moduł: DateUtils
```delphi function EndOfADay(const AYear, ADayOfYear: Word): TDateTime; overload; function EndOfADay(const AYear, AMonth, ADay: Word): TDateTime; overload; ``` [[Delphi/Funkcje|Funkcja]] zwraca ostatnie możliwy moment dnia (czas) na podstawie parametrów przekazanych w funkcji. AYear określa rok; AMonth - miesiąc, natomiast ADay - dzień. Możliwe jest użycie [[Delphi/Overload|przeciążonej]] funkcji, w której należy podać parametr ADayOfYear, który określa dzień w roku.

Przykład:

Kopiuj
program FooApp;

{$APPTYPE CONSOLE}

uses
  SysUtils, DateUtils;

var
  A : TDateTime;
begin
  A := EndOfADay(2006, 06, 20);
  Writeln(DateTimeToStr(A));

  Readln;
end.

Zobacz też:

DateUtils Obliczenia Delphi

0 komentarzy