title: Delphi XE3, Get name of current Tabsheet
body: <p>I have multiple page controls that have multiple tabsheets.  I have graphs on each tabsheet that the user can print. I want to have a "Print" button on my tool bar panel.  I want one "Print" button that prints the graph that is on the active tabsheet, I need a way to tell which tabsheet is active.  I know the name of the graph based on the name of the tabsheet.  That way I can tell the "Print" button which graph to print without putting a "Print" button on each tabsheet.  </p>
  
  <p>In pseudo code I want the following</p>
  
  <p>if active tabsheet equals 'today' then print todaygraph ; </p>