Komponenten Erstellung

[Kellerassel]

Hallo,
ich komme gerade nicht weiter.
Ich schreibe eine Komponente. Die Komponente soll Prozesswerte als Kurve darstellen.


folgender Code wird zwar vom compiler akzeptiert, ich kann aber im Projekt nicht auf VisuKurve1.Kurve[xy] zugreifen.
wo ist mein Denkfehler?




wäre schön wenn mir jemand einen Tip geben kann

Delphi-Quellcode:

Type TKurve =record
  aktiv       :Boolean;
  Farbe:      TColor;
  Brush:      TBrush;
  Pen:        TPen;
  Zoom:       Integer;
  Text:       String;
  Text_Pos:   Integer;
  Werte:      Array [0..1000]of Integer;
  X:          TAxis;
  Y:          TAxis;
end;


type
  TVisuKurve = class(TCustomControl)
  private
    FCanvas                   :TCanvas;
    FBGColor                  :Tcolor;
    FKurven                   :Array [1..10] of TKurve;
    FZoom                     :Real;
    FRun                      :Boolean;
    Ftimer                    :TTimer;
    function  GetKurve(Index: Integer): TKurve;
    procedure PutKurve(Index: Integer; Value:TKurve);

  protected
    procedure Paint;  override;
    property  Canvas: TCanvas read FCanvas;
    procedure TickEvent(Sender: TObject);
    procedure SaveKurveToFile(Filename:String);

  public
    property    Kurve[Index:integer]      :TKurve                         read GetKurve                 write PutKurve;

.....


function TVisuKurve.GetKurve(Index: Integer): TKurve;
begin
Result:=FKurven[index];
end;


procedure TVisuKurve.PutKurve(Index: Integer; value: TKurve);
begin
 FKurven[index]:=value;
end;