RT
TDateTime aa, bb;
bb = aa - 6;
TDateTime date = Date();
TDateTime datebefore = date-6;
dt - TDateTime("0000-00-06")
TDateTime nowtime=Now();
TDateTime before6day=nowtime-6;
use IncDay
example:
TDateTime now,before3;
now=Now();
before3=IncMonth(now,-6);