anchor.diff:  Var
     NoValue :TCloseAction;
   begin
  +  NoValue := caNone;
     if Assigned(OnClose) then
        OnClose(Self, NoValue);
       Hide;
  
positive.code:   INT_NOTIFIER_FORM_WIDTH  = 325;
    INT_NOTIFIER_FORM_HEIGHT = 60;
    INT_NOTIFIER_SCREEN_SPACING = 10;
    INT_NOTIFIER_SPACING = 5;
  
  var
    applicationToaster : TmToast;
  
negative.code: 
  function TmToast.GetColor: TColor;
  begin
    Result := FNotifierForm.Color;
  end;
  
  function TmToast.GetOnClose: TCloseEvent;
  