Tchart打印预览

 

uses

  TeePrevi;

   

procedure TFMainChart.AtnPrintExecute(Sender: TObject);

begin

  myChart.PrintOrientation(poLandscape);//poPortrait

end;

   

procedure TFMainChart.AtnPreviewExecute(Sender: TObject);

begin

TeePreview(self,myChart);

  //ChartPreview(self,myChart);

end;

 

Tchart打印预览

 

猜你喜欢

转载自www.cnblogs.com/jspdelphi/p/9070619.html