const
 {$include common.pas}在delphi 2006下,是可以运行的,但是在delphi 2007 下这句却无效,调不出common.pas 里定义的常量