关于Tchart类坐标问题 ( 积分: 50 )

本人要在同一图表（Tchart）画多条曲线，但是每条曲线的Y轴单位值不一样，X轴一样，所以能不能在同一图表有多个Y轴坐标单位。比如Y轴分别表示电压、电流等，X轴表为时间（同一张图表）

本人要在同一图表（Tchart）画多条曲线，但是每条曲线的Y轴单位值不一样，X轴一样，所以能不能在同一图表有多个Y轴坐标单位。比如Y轴分别表示电压、电流等，X轴表为时间（同一张图表）

简单地说就是怎样在一个chart类中创建2个刻度（同为Y轴）

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, TeeProcs, TeEngine, Chart, Series;

type
TForm1 = class(TForm)
Chart1: TChart;
Series1: TLineSeries;
Series2: TLineSeries;
Series3: TLineSeries;
Series4: TLineSeries;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
Axis1,Axis2,Axis3:TChartAxis;
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
series1.FillSampleValues(100);
series2.FillSampleValues(100);
series3.FillSampleValues(100);
series4.FillSampleValues(100);
With chart1.LeftAxis do
begin
StartPosition:=0;
EndPosition:=25;
Axis.Color:=clRed;
end;
Axis1:=TChartAxis.Create(Chart1);
with Axis1 do
begin
StartPosition:=25;
EndPosition:=50;
Axis.Color:=clGreen;
end;
Series2.CustomVertAxis:=Axis1;

Axis2:=TChartAxis.Create(Chart1);
with Axis2 do
begin
StartPosition:=50;
EndPosition:=75;
Axis.Color:=clBlue;
end;
Series3.CustomVertAxis:=Axis2;

Axis3:=TChartAxis.Create(Chart1);
with Axis3 do
begin
StartPosition:=75;
EndPosition:=100;
Axis.Color:=clYellow;
end;
Series4.CustomVertAxis:=Axis3;

end;
end.

TO;Avalon.感谢。。。
你的方法是把纵（Y）坐标分成N份，然后弄成N个刻度，

曾经也遇到过这个问题，当时是根据电流来确定的纵轴范围，因为电流范围最大，大概是0~5000，电压0~1000，同时用不同颜色等区分，这方面TChart做的真好啊。

另外，也可以考虑将不同的坐标范围映射到同一个坐标空间，这可就看具体情况了，
如：destX,destY
x1 :=x1 *destX div (x1Max);
y1 :=y1 *destY div (y1Max);等等.

Tchart类的打印浏览怎么写的？？

TChart对应QuickReport的是TQRchart，应该一样往里面的Series填充数据吧

chart.print好像可以直接打印chart，
在双击chart时弹出的General里可以通过print preview..实行打印浏览，但在程序里
却找不到preview方法实行打印游览？？

qrchart打印，，，好你没有TQRchart这个类啊，，，，