AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

FastReport, Chart, Merkwürdigkeiten

Ein Thema von haentschman · begonnen am 6. Okt 2014 · letzter Beitrag vom 2. Dez 2020
Antwort Antwort
Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.757 Beiträge
 
Delphi 12 Athens
 
#1

AW: FastReport, Chart, Merkwürdigkeiten

  Alt 6. Okt 2014, 12:24
Bist du sicher, daß die in dieser Zeile hinzugefügte Series auch die ist, die in der folgenden Zeile angesprochen wird?

Delphi-Quellcode:
Chart.AddSeries(csLine);
Chart.SeriesData[I].DataType:= dtFixedData;

Warum nimmst du nicht gleich den Rückgabewert von AddSeries?

Edit: Ich meine in dieser Zeile:

Serie:= Chart.Chart.Series[I];
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat
Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.458 Beiträge
 
Delphi 12 Athens
 
#2

AW: FastReport, Chart, Merkwürdigkeiten

  Alt 6. Okt 2014, 12:51
Danke für die schnelle Antwort...
Zitat:
Warum nimmst du nicht gleich den Rückgabewert von AddSeries?
...weil es keinen gibt.

Serie:= Chart.Chart.Series[I]; ...sollte korrekt sein. Ich habe den Serien mal Namen verpaßt entsprechend dem Index I. (Bild) Über das FixedData konnte ich es auch kontrollieren.
Delphi-Quellcode:
Serie:= Chart.Chart.Series[I];
Serie.Name:= 'Serie' + IntToStr(I);
Angehängte Grafiken
Dateityp: png Serie.png (31,3 KB, 24x aufgerufen)
  Mit Zitat antworten Zitat
wschrabi

Registriert seit: 16. Jan 2005
456 Beiträge
 
#3

AW: FastReport, Chart, Merkwürdigkeiten

  Alt 2. Dez 2020, 22:31
Hallo,
kann mir jdm sagen was da der Grund ist?
Ich hab genau so ein Problem. Es wird immer 0 ANgezeigt wobwohl ich YDatas manaell habe:
Delphi-Quellcode:
procedure Tform7.DrawRiskChartinFR(MyFRChart: TFrxChartView);
var
  Serie: TChartSeries;
  I: integer;
  Yval: string;
  id1,id2,id3,i1,i2,i3: double;

begin
  if Assigned(MyFRChart) then
  begin
   MyFRChart.Chart.Title.Text[0]:='RC';
   MyFRChart.Chart.Legend.LegendStyle:= lsSeries;
   Serie.BeginUpdate;
   for I := 0 to 1 do
     begin
      MyFRChart.AddSeries(csLine);
      MYFRChart.SeriesData[I].DataType:= dtFixedData;
     
      Serie:= MyFRChart.Chart.Series[I];
      if I = 1 then
         begin
         Serie.Title:= 'Normal';
         MyFRChart.SeriesData[I].XValues:= '1;2;3';
         id1:=RoundTo(Lipo9Satz.Idill1,-3);
         id2:=RoundTo(Lipo9Satz.Idill2,-3);
         id2:=RoundTo(Lipo9Satz.Idill3,-3);
         Yval:=format('%f;%f;%f',[13.2,34.4,5.66]);
         SHowMessage('Y-Vales: '+yval);
         MyFRChart.SeriesData[I].YValues:= Yval;
         end
      else
         begin
         Serie.Title:= 'Risk';
         MyFRChart.SeriesData[I].XValues:= '1;2;3';
         i1:=RoundTo(Lipo9Satz.Idill1,-3);
         i2:=RoundTo(Lipo9Satz.Idill2,-3);
         i2:=RoundTo(Lipo9Satz.Idill3,-3);
         Yval:=format('%f;%f;%f',[113.2,134.5,166.7]);
         SHowMessage('Y-Vales: '+yval);
         
         MyFRChart.SeriesData[I].YValues:= Yval;
         
         end;
      
     end;
   Serie.EndUpdate;
  
  
  end;
end;

Geändert von wschrabi ( 2. Dez 2020 um 22:57 Uhr)
  Mit Zitat antworten Zitat
Antwort Antwort


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 23:22 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz