Delphi - [Lazarus] Ottenere orario di sistema

Come faccio ad ottenere l'orario in atto del sistema?
Io ho trovato

var Time: TDateTime;
...
Label1.Caption:= TimeToStr(Time);

Risultato: 0.00.00

Avete qualche consiglio?

Nell'evento che ti fa visalizzare l'ora, prima di tutto, devi inizializzare l'ora con:

Time := Now;