AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Algorithmen, Datenstrukturen und Klassendesign Delphi Daten sollen im Chart hervorgehoben/markiert werden

Daten sollen im Chart hervorgehoben/markiert werden

Ein Thema von delphicoder123 · begonnen am 14. Mär 2019 · letzter Beitrag vom 15. Mär 2019
Antwort Antwort
delphicoder123

Registriert seit: 14. Feb 2019
43 Beiträge
 
#1

Daten sollen im Chart hervorgehoben/markiert werden

  Alt 14. Mär 2019, 07:37
Hallo,
wenn ich mich in einem Grid auf einer Zelle befinde, dann soll der dazugehörige Wert im Chart hervorgehoben(markiert) werden.
Ist das irgendwie möglich?
  Mit Zitat antworten Zitat
Benutzerbild von newIndy
newIndy

Registriert seit: 18. Dez 2018
Ort: Bad Dürkheim
17 Beiträge
 
Delphi XE3 Professional
 
#2

AW: Daten sollen im Chart hervorgehoben/markiert werden

  Alt 14. Mär 2019, 17:07
Hallo,
wenn ich mich in einem Grid auf einer Zelle befinde, dann soll der dazugehörige Wert im Chart hervorgehoben(markiert) werden.
Ist das irgendwie möglich?
Ja. Den Index holst du über 'OnCellClick' des DBGrid oder über 'OnDataChange'.
Zeichnen kannst du dann mit 'TChartSeries.AfterDrawValues'
und bei '3D-Ansicht' mit 'TChartSeries.BeforeDrawValues'.
Die Zeichenkoordinaten holst du mit
x := DeltaESeries.CalcXPos(1); // x-Position von ValueIndex
y := DeltaESeries.CalcYPos(1); // y-Position von ValueIndex
x := DeltaESeries.CalcXPosValue(1); // x-Position von Value
y := DeltaESeries.CalcYPosValue(1); // y-Position von Value
// Beispiel in etwa so:
procedure TMainForm.SeriesAfterDrawValues(Sender: TObject);
var x, y:Integer;
begin
x := Series.CalcXPos(Index); // x-Position von ValueIndex
y := Series.CalcYPos(Index); // y-Position von ValueIndex
Chart.Canvas.Pen.Width := 3;
Chart.Canvas.Pen.Style := psSolid;
Chart.Canvas.Pen.Color := clRed;

Chart.Canvas.MoveTo(x, y);
Chart.Canvas.LineTo(x, y +10);
end;

mfG newIndy

Geändert von newIndy (14. Mär 2019 um 17:22 Uhr)
  Mit Zitat antworten Zitat
delphicoder123

Registriert seit: 14. Feb 2019
43 Beiträge
 
#3

AW: Daten sollen im Chart hervorgehoben/markiert werden

  Alt 15. Mär 2019, 07:01
Live-Bindings sind nicht möglich, da man keine Komponente auf eine andere Komponente binden kann, sondern nur Daten auf eine andere Komponente binden?
  Mit Zitat antworten Zitat
hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
6.920 Beiträge
 
Delphi XE4 Professional
 
#4

AW: Daten sollen im Chart hervorgehoben/markiert werden

  Alt 15. Mär 2019, 07:32
Hallo,
die Antwort hatte doch nichts mit Live-Bindung zu tun.
Du hast ein (DB?)-Grid, darunter liegt ein DataSource->DataSet.
Ein Klick auf das Grid setzt den Datensatz-Zeiger im DataSet um.
Vom DataSet holst Du dir die Daten des ausgewählten Datensatzes.
Und danach aktualisiert du dein Chart.
Heiko
  Mit Zitat antworten Zitat
delphicoder123

Registriert seit: 14. Feb 2019
43 Beiträge
 
#5

AW: Daten sollen im Chart hervorgehoben/markiert werden

  Alt 15. Mär 2019, 09:14
Hallo,
wenn ich mich in einem Grid auf einer Zelle befinde, dann soll der dazugehörige Wert im Chart hervorgehoben(markiert) werden.
Ist das irgendwie möglich?
Ja. Den Index holst du über 'OnCellClick' des DBGrid oder über 'OnDataChange'.
Zeichnen kannst du dann mit 'TChartSeries.AfterDrawValues'
und bei '3D-Ansicht' mit 'TChartSeries.BeforeDrawValues'.
Die Zeichenkoordinaten holst du mit
x := DeltaESeries.CalcXPos(1); // x-Position von ValueIndex
y := DeltaESeries.CalcYPos(1); // y-Position von ValueIndex
x := DeltaESeries.CalcXPosValue(1); // x-Position von Value
y := DeltaESeries.CalcYPosValue(1); // y-Position von Value
// Beispiel in etwa so:
procedure TMainForm.SeriesAfterDrawValues(Sender: TObject);
var x, y:Integer;
begin
x := Series.CalcXPos(Index); // x-Position von ValueIndex
y := Series.CalcYPos(Index); // y-Position von ValueIndex
Chart.Canvas.Pen.Width := 3;
Chart.Canvas.Pen.Style := psSolid;
Chart.Canvas.Pen.Color := clRed;

Chart.Canvas.MoveTo(x, y);
Chart.Canvas.LineTo(x, y +10);
end;

mfG newIndy
CalcXPos bzw. CalcXPosValue erwartet Integer als Parameter. Was kann ich aber machen, wenn ich auf der x-Achse Datumsfelder habe?
  Mit Zitat antworten Zitat
hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
6.920 Beiträge
 
Delphi XE4 Professional
 
#6

AW: Daten sollen im Chart hervorgehoben/markiert werden

  Alt 15. Mär 2019, 09:31
Hallo,
CalXPos wird doch der Index übergeben, also der wie vielte X-Eintrag (beginnend bei 0).
Heiko
  Mit Zitat antworten Zitat
delphicoder123

Registriert seit: 14. Feb 2019
43 Beiträge
 
#7

AW: Daten sollen im Chart hervorgehoben/markiert werden

  Alt 15. Mär 2019, 10:50
* Den Index hab ich mit grid.DataSource.DataSet.RecNo -1; geholt
* AfterDrawValues und BeforeDrawValues hat der Chart als Ereignis nicht. Dafür aber onBeforeDrawAxes, onBeforeDrawChart und onBeforeDrawSeries
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:21 Uhr.
Powered by vBulletin® Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2019 by Daniel R. Wolf