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 Immer noch Probleme mit TChart (https://www.delphipraxis.net/91329-immer-noch-probleme-mit-tchart.html)

WoTo 3. Mai 2007 14:26


Immer noch Probleme mit TChart
 
Hallo zusammen,
leider habe ich immer noch Probleme mit TChart. :(
Nachdem ich der Serie[0] einige Werte zugewiesen habe und anschließend die Visible-Eigenschaft vom TChart auf true gesetzt habe, kommt folgende Meldung:

Listenindex überschreitet das Maximum (11)

Wenn ich dann den OK-Button des Meldungsfensters drücke und anschließend die gleichen Werte nochmals der Serie[0] zuweise,
ist alles in Ordnung! :gruebel:

Die Zuweisung der Werte erfolgt so:
Delphi-Quellcode:
  try
    AValueList := ATank.ValueList;
    chartTank.Visible := false;
    chartTank.MaxPointsPerPage := ATank.ValueList.Count;
    chartTank.Series[0].Clear;
    for i := 0 to Pred(ATank.ValueList.Count) do
    begin
      ATankValue := TTankValue(ATank.ValueList.Objects[i]);
      AXValue := ATankValue.Value[0];
      AYValue := ATankValue.Value[1];
      chartTank.Series[0].AddXY(AXValue,AYValue,'');
    end;
    ChartTank.Title.Text.Clear;
    chartTank.Title.Text.Add(chartTank.Series[0].Title);
    chartTank.Visible := true;
  except
    on e:exception do
    begin
      ShowMessage(e.Message + #13 + 'Valueindex for Chart : ' + IntToStr(i) + ' !');
    end;
  end;
end;
Was ist da nun wieder falsch ? :wall:

Das komische ist auch, daß keine Exception ausgelöst wird.

MfG
Woto


Alle Zeitangaben in WEZ +1. Es ist jetzt 05:23 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