Data i czas » Obliczenia

YearOf

YearOf
Moduł: DateUtils

function YearOf(const AValue: TDateTime): Word;

Funkcja zwraca rok zapisany w dacie reprezentowanej przez typ TDateTime. Funkcja zwraca wartość z przedziału od 1 do 9999. Oto przykład:

program Foo;
 
{$APPTYPE CONSOLE}
 
uses
  SysUtils, DateUtils;
 
begin
  Writeln('Dzisiaj jest: ', DateTimeToStr(Now));
  Writeln('-----');
  Writeln('Rok: ', YearOf(Date));
 
  Readln;
end.


Zobacz też: