Ungültige Gleitkommaoperaion trotz Try Except Block

[hoika]

Hallo,

was passiert,
wenn du folgendes machst

Delphi-Quellcode:

if length(XValues) > 0 then
    begin
      try
(*
        Chart.Series[0].XValues.Value := TChartValues(XValues);
        Chart.Series[0].XValues.Count := high(XValues);
        Chart.Series[0].XValues.Modified := true;
        Chart.Series[0].YValues.Value := TChartValues(YValues);
        Chart.Series[0].YValues.Count := high(YValues);
        Chart.Series[0].YValues.Modified := true;
*)
        Chart.Repaint; <-- Hier tritt der besagt Fehler auf.
      except

      end;

Und dann immer eine Zeile mehr reinbringen

Es könnte aber auch daran liegen,
dass Repaint nicht benutzt werden darf (gibt es Invalidate ?)

Ausserdem rpüfst du zwar length(XValues),
arbeitest aber auch mit YValues.

Ich würde mal prüfen, ob die Werte gültig sind.


Heiko