Einzelnen Beitrag anzeigen

McDoT

Registriert seit: 29. Mär 2010
3 Beiträge
 
Delphi 7 Professional
 
#10

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

  Alt 29. Mär 2010, 23:04
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
  Mit Zitat antworten Zitat