Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi TChart Series-Wertepaare speichern (https://www.delphipraxis.net/99757-tchart-series-wertepaare-speichern.html)

oki 17. Sep 2007 13:35


TChart Series-Wertepaare speichern
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hi Leute,

ich habe ein TChart unter D5 an welchem der Nutzer Werte zur Laufzeit erstellen kann. Das ganze funzt so, dass er eine Wertekurve für Tageszeiten erstellt. Diese will ich abspeichern. Nun liefert mir die Hilfe eine Methode SaveCharttoFile für TChart.
Erstens kennt mein TChart diese Methode aber nicht(Compiler meckert), und zweites glaube ich, dass dann eher die Chart-Einstellungen gespeichert werden, aber nicht die Series-Werte, so es den vorhanden wäre.

Kann mir jemand sagen, ob ich die Werte aus TChart oder TLineSeries heraus speichern und laden kann, oder muß ich mir eigene Funktionen schreiben?

Im anhang eine kleiner ScreenShot, wie das aussieht.

Dank und Gruß

oki

[edit] nachträglich Benachrichtigung gesetzt. [/edit]

marabu 17. Sep 2007 14:15

Re: TChart Series-Wertepaare speichern
 
Hallo oki,

bei SaveChartToFile() wird laut Dokumentation der momentane Zustand des Chart persistent gemacht, d.h. auch die Werte aus den Serien sollten gespeichert werden. Die Werte einer einzigen (beliebigen) Serie könntest du so in einer CSV-Datei speichern:

Delphi-Quellcode:
procedure SaveValues(series: TChartSeries; s: TStrings);
var
  iList, iValue: Integer;
  sl: TStrings;
begin
  sl := TStringList.Create;
  with series do
    for iValue := 0 to Pred(Count) do
    with ValuesLists do
    begin
      for iList := 0 to Pred(Count) do
        sl.Add(FloatToStr(ValueList[iList].Value[iValue]));
      s.Add(sl.CommaText);
      sl.Clear;
    end;
  sl.Free;
end;
Freundliche Grüße

oki 17. Sep 2007 15:28

Re: TChart Series-Wertepaare speichern
 
Hi marabu,

soory, war grad 'ne zeit nicht am Platz.

ok, deine Function habe ich verstanden, du übergibst das Chart und eine Variable vom Typ TStrings, in die du alle Werte aller LineSeries schreibst.

Das wäre dann der Weg der eigenen Funktion. Aber warum finde ich die Function SaveCharttoFile nicht?


Gruß oki

marabu 17. Sep 2007 17:08

Re: TChart Series-Wertepaare speichern
 
Hi oki,

Zitat:

Zitat von oki
... soory, war grad 'ne zeit nicht am Platz. ...

ja gibt es denn sowas!

Zitat:

Zitat von oki
... Aber warum finde ich die Function SaveCharttoFile nicht? ...

Ich finde die ja auch nur in der Dokumentation. Offensichtlich hast du auch keine Vollversion gekauft: klick

Freundliche Grüße

oki 17. Sep 2007 18:18

Re: TChart Series-Wertepaare speichern
 
Und ich war schon wieder unterwegs :lol:


Zitat:

Zitat von marabu
Ich finde die ja auch nur in der Dokumentation. Offensichtlich hast du auch keine Vollversion gekauft: klick

Jooop,
werd ich für das bischen aber auch nicht tun :wink:

dann besten Dank und Gruß

oki


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:35 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz