delphi 定义变量同时赋值初始值

只有全局变量才能在定义的时候赋初值，局部变量不可以！

var
  Form1: TForm1;
  Present: TDateTime;
  year_   :string= '0'; //只有全局变量才能赋初值
  month_  :string= '0';
  day_    :string= '0';
  hour_   :string= '0';
  minute_ :string= '0';
  second_ :string= '0';
implementation

{$R *.dfm}