Einzelnen Beitrag anzeigen

Benutzerbild von newIndy
newIndy

Registriert seit: 18. Dez 2018
29 Beiträge
 
Delphi XE3 Professional
 
#2

AW: Daten sollen im Chart hervorgehoben/markiert werden

  Alt 14. Mär 2019, 18: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 18:22 Uhr)
  Mit Zitat antworten Zitat