Thema: Delphi TAdvChart Probleme

Einzelnen Beitrag anzeigen

zeras

Registriert seit: 11. Mär 2007
Ort: Saalkreis
1.524 Beiträge
 
Delphi 11 Alexandria
 
#3

AW: TAdvChart Probleme

  Alt 21. Mai 2011, 16:02

Wenn es Dir um das Zeichnen der X-Achse und individueller Beschriftung geht, kannst Du Dir eine

procedure anlegen:
Danks für die Info. Wenn ich mit Bordmitteln nicht weiterkomme, werde ich mit deiner Hilfe weitermachen.
Ich bin schon ein wenig weiter. In einer Testumgebung geht es nun.

Delphi-Quellcode:
 XAxis.UnitType := utMilliSecond;
    XAxis.Size := 130;

    Range.StartDate := trunc(Date);


    with Series[0] do
    begin
      AutoRange := arEnabled;
      ChartType := ctXYLine; //ctXYLine ist wichtig für Datum/Zeitfunktionen
      XAxis.MajorUnitTimeFormat := 's,zzz';
      XAxis.TextBottom.Angle := 50;
      XAxis.MajorUnitSpacing := 20;
      XAxis.XYValuesOffset := 60;
      XAxis.AutoUnits := false;
      d := EncodeDate(2010, 05, 1) + I * 5;

      AddSingleXYPoint(0, 0, Date );

      AddSingleXYPoint(0, 1, Date + EncodeTime(0, 0, 0, 4));

      AddSingleXYPoint(0, 10, Date + EncodeTime(0, 0, 0, 8));

      AddSingleXYPoint(0, 3, Date + EncodeTime(0, 0, 0, 12));


    end;
    Range.RangeTo := 15;
  end;


Und Du hast Recht, diese Demos funktionieren nicht oder nicht mehr.
Mal sehen, ob sie die Demos anpassen.
Matthias
Es ist nie falsch das Richtige zu tun!
- Mark Twain
  Mit Zitat antworten Zitat