Pascal/Turbo Pascal - Necesito ayuda, quiero saber como meter fechas en if then else

Filtrado por el usuario: thessen
<<>>
Filtrado por el usuario 'thessen' (Eliminar fitro)
 
Vista: