I tried using Placed[] for the legends. When off the chart body they were orphaned. At the Center they became part of the image. Right-click and save everything works. Center was an unaesthetic position so I tried a few numbers (in a positioning system yet to be decoded). Zero (0) did a fair job.

mychart = 
 BarChart[{1, 2, 3}, ChartStyle -> "Pastel", 
  ChartLegends -> Placed[{"John", "Mary", "Bob"}, {0, Center}]]

The Head of mychart is still Legended.

Attachments:

The root of the behavior, I believe, is that that the Head of mychart is not Graphics but, rather, Legended

In[6]:= Head[mychart]

Out[6]= Legended

Hence the selection of the Graphics within the Legended'd displayed graph. This behavior then will occur whenever one uses Legended around a graphic or any other expression.

I noticed this some while ago and wondered about the design decision to have an option to a graphics function yield something with a head that is not Graphics. The main issue is that the inclusion of a Ledgending option to a Graphics function has the unexpected side effect of changing the resulting output's Head. Side effects generally are a no-no in software design.