_Date

(    Den : Byte;
     Mes : Byte;
     Rok : Word) : Date;

Funkce _Date umožňuje složit typ Date z jednotlivých prvků: Den, Měsíc a Rok.

Podívejte se na: Procedury a funkce - Datumy

Příklad:

if Dat1 <> _Date(1, 1, 2008) then
  ...
endif