pointer-zugewiesene Kurven in werden nicht mehr gezeichnet

[EccoBravo]

Hallo,

in meinem neuen Prog werden pointer-zugewiesene Kurven nicht mehr in einem Chart gezeichnet.

Delphi-Quellcode:

unit test;

interface

uses ...

type
   ...
TF_Test = class(TForm)
    ....
    CH_Test:TChart;
    Kurv01: TFastLineSeries;
    Kurv02: TFastLineSeries;
    Kurv03: TFastLineSeries;
    
    procedure FormCreate(...);
    procedure Button1: TButton;
    procedure Button2: TButton;
    ....

var
    F_Test: TForm;
    ....
    Kurv: array[1..3] of ^TFastLineSeries;

implementation

...

procedure TF_Test.FormCreate(...);
begin
    ....
    Kurv[1] := @Kurv01;
    Kurv[2] := @Kurv02; 
    Kurv[3] := @Kurv03;
    ....
end; 

procedure TF_Test.Button1Click(...);
begin
    ...
    Kurv[1].AddXY(1,1);
    Kurv[1].AddXY(2,4);
    Kurv[1].AddXY(3,9);
    ...     // geht nicht - unklar !
end;

procedure TF_Test.Button2Click(...);
begin
    ...
    Kurv01.AddXY(1,1);
    Kurv01.AddXY(2,4);
    Kurv01.AddXY(3,9);
    ...     // geht gut
end;

Mit "festverdrahtetem" Code in Button2 läuft die Kurvenzeichnung gut,
mit Button1 läuft die Kurvenzeichnung nicht!

Irgendwie für mich unklar,
in meinen anderen Progs läuft dieser Code.

Falls jemand etwas sieht, weiss oder vermutet...dem vielen Dank!

Grüße

EB.