Chart - Balkenbeschriftung ändern

raiha · Beiträge: 152

Hi,

ich erstelle und befülle dyn. ein Chart (TBarSeries) aus einer IBTabelle.

Dazu iteriere ich über alle DS und mache folgendes: (l,r und m sind meine Series)

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:

While ...
            l.Add(Qu.FindField('VAL').AsFloat,
            DateToStr(Qu.FindField('DAT').AsDateTime),clred);
      r.AddNull('');
            m.AddNull('');

...

     Qu.Next;

       MyChart.Chart.AddSeries(l);
       MyChart.Chart.AddSeries(r);
       MyChart.Chart.AddSeries(m);

end; // While

Das funtioniert eigentlich auch ganz gut aber ein Problem habe ich noch. Er schreibt mir jetzt sowohl oben an die Balkenspitze als auch unten an das Balkenende das Datum (klar weil DateToStr(...) wie es oben steht.
Nun hätte ich gern das er an die Balkenspitze den eigentlichen Wert den er auch eingetragen hat schreibt und das unten das Datum erhalten bleibt.

Wie stelle ich das dyn. während der Laufzeit ein?

2 Frage :-)

Delphi legt automatisch eine Legende an der Seite an. Kann ich diese beeinflussen und wenn ja wie kann ich die Bezeichnungen der Series zur Laufzeit in der Legende ändern?

Danke Rainer

Moderiert von AXMD: Delphi-Tags hinzugefügt.

Keldorn · Verfasst: Mi 22.06.05 16:48

raiha hat folgendes geschrieben:

Das funtioniert eigentlich auch ganz gut aber ein Problem habe ich noch. Er schreibt mir jetzt sowohl oben an die Balkenspitze als auch unten an das Balkenende das Datum (klar weil DateToStr(...) wie es oben steht.
Nun hätte ich gern das er an die Balkenspitze den eigentlichen Wert den er auch eingetragen hat schreibt und das unten das Datum erhalten bleibt.

Wie stelle ich das dyn. während der Laufzeit ein?

warum nimmst du nicht addxy statt add?

Zitat:

Delphi legt automatisch eine Legende an der Seite an. Kann ich diese beeinflussen und wenn ja wie kann ich die Bezeichnungen der Series zur Laufzeit in der Legende ändern?

Einfach den Titel der Series ändern.

markieren

Delphi-Quelltext

1:	chart1.Series[0].Title:='Balken1';

Mfg Frank

_________________
Lükes Grundlage der Programmierung: Es wird nicht funktionieren.
(Murphy)

raiha · Beiträge: 152

Danke das mit der Legende funtioniert gut.

Addxy kann ich nicht nehmen da ich ja an der X- Achse ja keinen Zahlenwert sondern ein Datum (oder wenigstens ein String als Datum) haben möchte.

Gibt es da noch die Möglichkeit das Label irgendwie anzusprechen o.ä?

Danke Rainer

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme