Nel tipo TDateTime i giorni sono la parte intera del numero. Quindi basta fare "trunc(VariabileTDateTime)" per avere i giorni.
Ciao