Como Imprimir um Gráfico Exibido na Tela?

Para imprimir apenas o gráfico, a melhor maneira é utilizar o print preview do próprio TeeChart. Em tempo de desenvolvimento ele aparece apertando o botão da direita sobre ele e clicando em Print Preview. Para chama-lo em tempo de execução faça o seguinte:

uses TeePrevi;

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
ChartPreview(Self,Chart1);
end;

veja o help do delphi
Printer.Canvas.Draw((PageWidth - Bmp.Width) div 2, (PageHeight - Bmp.Height) div 2,Bmp);