Cómo definir variables de fecha en Delphi

En el lenguaje Delphi, existen tres tipos de datos relacionados con la fecha y la hora: TDate, TTime y TDateTime. Las definiciones de estos tres tipos de datos están todas en la unidad del sistema, como se muestra en la siguiente figura:

Como se puede ver en la figura, de hecho, estos tres tipos son solo alias del mismo tipo de datos. .

TDateTime utiliza números de punto flotante doble para registrar la fecha y la hora, donde la parte entera del número de punto flotante representa la fecha y la parte después del punto decimal representa la hora. La siguiente es una descripción detallada de este tipo de datos en el documento de ayuda de Delphi:

En el lenguaje Delphi, declarar una variable de fecha es relativamente simple. var se usa para definir variables y const se usa para definir constantes. El siguiente es un código de muestra:

¿Programa? TForm1. Botón1Clic(remitente:?al objeto);

Constante

Cumpleaños:? ¿Fecha? =?33208;? //Definir constantes de fecha.

Definir variables

Fecha:? TDateTime//Definir variables de fecha y hora.

s:? Cadena;

Iniciar

Adat? :=?Hoy;? //¿Obtener la fecha de hoy?

s? :=?¿Qué día es hoy? ? ?FormatDateTime('yyyy? ¿Año? m? ¿Mes? d? Día., aDate)? ?#13#10? ?#13#10?

¿Naciste en? ? ?FormatDateTime('yyyy? ¿Año? m? ¿Mes? d? Día., cumpleaños)? ?#13#10? ?#13#10?

¡Felicitaciones! ¿Has vivido alguna vez en la tierra? ? ?IntToStr(DaysBetween(fecha, cumpleaños))? ?'? Ay dios mío. ;

MessageBox(handle, PChar(s)?, 'Mensaje emergente', ?MB_OK? ?MB_icon información);

Captura de pantalla del código en ejecución:

p>