比较日期语句这么写怎么不对？

Question

formatdatetime('yyyy-mm-dd',Date);
  if Date>#2003-01-31# then
  begin  end;

Answer 1

Date>StrToData(2003-01-31)
可不可以呀

Answer 2

没有这个函数，StrToData，日期字符怎么写？是#2003-01-31#吗？

Answer 3

t := Now ;
  Sleep(2000) ;
  t1 := Now ;
  if t < t1 then ShowMessage('ok') ;

Answer 4

t := Now ;
//  Sleep(2000) ;
//  t1 := Now ;
  T1 := Now + StrToDateTime('2001-11-10') ;
  if t < t1 then ShowMessage('ok') ;