[Delphi]Odczyt daty

Witam,
robie program w aplikacji konsolowej w delphi i napotkalem pewien problem. Chcialbym zeby program wyswietlal aktualny rok. Potrzebny mi odpowiednik pascalowego GetDate.

YearOf(Now);

polecam helpa

Dziekuje za pomoc, ale wciaz mam pytania. Prawdopodobnie rozumuje, zle, ale taki jest przywilej poczatkujacego ;).
Tworze nowy typ TDateTime=word i zmienna rok typu TDateTime.
W helpie bylo zapisane, ze YearOf to funkcja, tworze nowa funkcje function YearOf(const rok: TDateTime): Word;
I tu nastepuje moje pytanie. Co ta funkcja ma zwracac? Zapisalem cos takiego:

function YearOf(const rok: TDateTime): Word;
begin
  YearOf:=rok(Now);
end;

Tylko te now nie dziala. Wiem, ze to musi byc dla wiekszosci banalne, ale zrozumnie mnie. Poprosze jakas podpowiedz, a nie gotowe rozwiazanie :).

eeee.
YearOf to funkcja z modułu DateUtils (trzeba go do uses dodać). Nie deklarujesz tej funkcji! Podobnie z rokiem - przecież rok to cztery cyfry więc po co typ TDateTime (BTW TDateTime to Double nie Word i też jest już zadeklarowany)

A w kodzie to wygląda tak

var
  Rok: Word;

begin
  //tu robisz co chcesz
  Rok := YearOf(Now);
  //a tu masz już w zmiennej Rok aktualny rok
end;

poczytaj jakiś podstawowy kurs czegokolwiek, bo to chyba pierwsze uruchomienie Delphi i pierwsze podejście do programowania jako takiego

Dziekuje za odpowiedz. Wszystko pieknie dziala :)