[Pascal] Data e ora del sistema

[tiratardi]

Originariamente inviato da king64
Sono contenute in SysUtils

var
  today : TDateTime;
begin
  today := Now;
  ShowMessage('Oggi è '+DateToStr(today));
  ShowMessage('Sono le ore '+TimeToStr(today));
end;

ok, perfetto... Grazie mille...

e se io ora volessi sapere la data in giorni, mesi e anni in 3 variabili diverse di tipo integer?

grazie mille