Delphi è basato su object pascal e implementa le classi.
In questo frammento di codice stai dichiarando un nuovo tipo di dato, una classe, che hai chiamato TDate (borland fa precedere i nomi di classe dalla lettere T, ma non è essenziale), i suoi membri e i suoi metodi.
Dopo la end di type stai definendo un metodo di questa classe.

Hai però diversi errori di trascrizione nel codice che hai postato.

ciao
sergio