Einzelnen Beitrag anzeigen

v2afrank

Registriert seit: 9. Mai 2005
Ort: Bocholt
573 Beiträge
 
Delphi XE2 Professional
 
#2

Re: TChart- oder TeeChart-Frage...

  Alt 19. Okt 2006, 14:03
Erst einmal zu Deiner zweiten Frage
Füge jeder Series ein Afteraddereignis hinzu
Delphi-Quellcode:
procedure TMakrofenster.Series1AfterAdd(Sender: TChartSeries;
  ValueIndex: Integer);

var
 step:Double;
Const
 ZEITRAUM=30;
  begin

    step:=DateTimeStep[dtOnesecond]*ZEITRAUM;
     With Sender.GetHorizAxis do { <-- with the Horizontal Axis... }
     Begin
      Automatic := False;
      //always show the last time
      Maximum := Sender.XValues.MaxValue;
      // show only last desired interval
      Minimum := Maximum - step;
     end;
     // Delete all "invisible" points
     While (Sender.Count>0) and
      (Sender.XValues[0] < Sender.GetHorizAxis.Minimum) do
      Sender.Delete(0);

end;
Zu deiner zweiten Frage Hast Du auch automaticminimum auf false gesetzt ?
  Mit Zitat antworten Zitat