anchor.diff:  	Result := False;
   End;
   
  -Function Widget.OnRegion(X,Y:Integer): Boolean;
  +Function Widget.OnRegion(X,Y:Single): Boolean;
  +Var
  +  V:Vector2D;
   Begin
     {$IFDEF DEBUG_GUI}Log(logDebug, 'UI', 'X:'+IntToString(X)+' Y:'+IntToString(Y));{$ENDIF}
     {$IFDEF DEBUG_GUI}Log(logDebug, 'UI', _Name+ '.OnRegion called');{$ENDIF}
  
positive.code: 
        Procedure NullEventHandler(Src:Widget);
  
        Function OnRegion(X,Y:Integer): Boolean; Virtual;
        Function OnCustomRegion(X,Y:Integer; X1,Y1,X2,Y2:Single):Boolean;
        
        Procedure AddChild(W:Widget);
  
negative.code:   Self._UI._Widgets.Reindex(Self);
  End;
  
  Function Widget.OutsideClipRect(X, Y: Single): Boolean;
  Var
    X1, Y1, X2, Y2:Single;
  Begin
  