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