[Frag] - TChart, wie mehrere Y-Achsen?

[McDoT]

Nabend,

Problem an der Sache wird sein, dass nicht jeder die TeeChart Komponenten besitzen wird

Ohne diese könnte man es auch noch so machen:

Mehr als zwei Y-Achsen

Delphi-Quellcode:

procedure TForm1.ButtonXClick(Sender: TObject);
var TA : TChartAxis;
begin
  TA:=TChartAxis.Create(Chart1);
  TA.Assign(Chart1.LeftAxis);
  TA.StartPosition := 0;
  TA.EndPosition := 100;
  TA.Horizontal := False;
  TA.Visible := True;
  //Die zweite Achse etwas weiter links positionieren
  TA.PositionPercent := -4;
  Series2.CustomVertAxis := Ta;

  Chart1.LeftAxis.EndPosition := 45;
end;

MfG McDoT