var
  obj: TObject;
  ctx: TRttiContext;
  prop: TRttiProperty;
  view: NSView;
begin
  obj := TObject(FmxHandleToObjC(Self.Handle));
  ctx := TRttiContext.Create;
  prop := ctx.GetType(obj.ClassType).GetProperty('View');
  view := prop.GetValue(obj).AsInterface as NSView;
end;