chart的打印问题-----诸位大虾帮帮忙 (30分)

  • 主题发起人 主题发起人 蓝潭星跃
  • 开始时间 开始时间

蓝潭星跃

Unregistered / Unconfirmed
GUEST, unregistred user!
dbchart图线如何打印、预览?
 
dbchart自带的,只不过界面是英文的
 
chart-general-print preview
 
在程序运行过程中,怎么使用?
 
建议你把Chart先打印到图片,在打印此图片,否则会产生大小不一样的问题。
 
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Buttons, ComCtrls, ExtCtrls, TeeProcs, TeEngine, Chart,
Series, TeeTools,TeeEdiGene, TeCanvas, TeeEdit, Grids, TeeChartGrid,DB,
Menus, Registry;
以上USES的单元 好象不USES其中的一些单元就不能打印,下面是代码包括 打印预览和打印

procedure TFrmChart.BitBtnPrintViewClick(Sender: TObject);
begin
Chart1.PrintProportional := False; // disable automatic margins
Chart1.PrintMargins := Rect(5,5,5,5); // percentage
ChartPreview( Self, Chart1 );

end;
//------------------------------------------------------------------------------
procedure TFrmChart.BitBtnPrintClick(Sender: TObject);
begin
Chart1.Print ;
end;
 
谢了,搞定!
 
后退
顶部