如何在delphi XE和XE4中初始化对象

type
  TLoadoption = class
  private
    FAutoSearch: Boolean;
  public
    property AutoSearch: Boolean read FAutoSearch write FAutoSearch;
  end;

在其中一个函数中,我在堆栈中创建类的对象

procedure MyView.InitializeForm(const aMsg: Mymsg);
//---------------------------------------------------------------------------
var
  Options: TLoadoption;
begin

  if aMsg.optionalObject <> nil then
   Options := aMsg.optionalObject as TLoadoption;

  if Assigned(Options) and Options.AutoSearch then
    Dorefresh;
end;

我没有在aMsg中传递任何内容,所以理想情况下没有设置选项.

在Delphi XE中默认选项设置为nil,因此不会调用此Dorefresh但是当我在Delpi XE4中执行相同的代码时,选项会使用一些随机值进行初始化,并且AutoSearch始终变为true,这会导致调用此Dorefresh函数,这是不需要.

我想知道是否有任何编译器选项将默认值设置为未初始化的变量.我现在唯一的解决方案就是这样

procedure MyView.InitializeForm(const aMsg: Mymsg);
    //---------------------------------------------------------------------------
    var
      Options: TLoadoption;
    begin
      Options := nil;

      if aMsg.optionalObject <> nil then
       Options := aMsg.optionalObject as TLoadoption;

      if Assigned(Options) and Options.AutoSearch then
        Dorefresh;
    end;

这是正确的方法吗？