wie fügt man in ein zwedimensionales array werte ein

[felix1806]

hallo ich habe bis jetzt folgendes geschrieben

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, Buttons, Grids, ExtCtrls;

type
  TForm1 = class(TForm)
    BitBtn1: TBitBtn;
    GroupBox1: TGroupBox;
    EdSparbetrag: TEdit;
    EdFestzins: TEdit;
    EdMindestlaufzeit: TEdit;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    Label5: TLabel;
    Label6: TLabel;
    procedure BitBtn1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.BitBtn1Click(Sender: TObject);
var i,Mindestlaufzeit:Integer;
 Festzins,Zinsen,Ende,Anfang:Real;
begin
  Anfang:=StrToFloat(EdSparbetrag.Text);
  Festzins:=StrToFloat(EdFestzins.Text)/100;
  Mindestlaufzeit:=StrToInt(EdMindestlaufzeit.Text);
  StringGrid1.RowCount:=Mindestlaufzeit+1;
  for i:=1 to Mindestlaufzeit do
   with StringGrid1 do
    begin
     Cells[0,i]:=IntToStr(i);
     Cells[1,i]:=FloatToStrF(Anfang,ffFixed,10,3);
     Zinsen:=Anfang*Festzins;
     Cells[2,i]:=FloatToStrF(Zinsen,ffFixed,10,3);
     Ende:=Anfang+Zinsen;
     Cells[3,i]:=FloatToStrF(Ende,ffFixed,10,3);
     Anfang:=Ende;
     end;
   end;

procedure TForm1.FormCreate(Sender: TObject);
begin
 with StringGrid1 do
  begin
   Cells[0,0]:='Jahr';
   Cells[1,0]:='Anfang';
   Cells[2,0]:='Zinsen';
   Cells[3,0]:='Ende';

   end;

 end;
procedure Einspeichern;
begin
end;
end.

ich will jetzt das ganze so umändern dass ich die daten nicht mehr direkt in ein stringgrid sondern erst in ein array einspeise(weil ich dann noch die werte für einen graphen brauche), das will ich mit der procedure Einspeichern tun, allerdings weiß ich jetzt nicht wie ich das mit den globalen variablen und dem 2D-array
machensoll: Meine Probleme sind: -Erzeugung des Arrays mit den globalen variablen
-Erzeugung des Arrays mit i vielen Cells
Ich habe leider so gut wie keine Erfahrung mit Arrays und hatte schon mal nachgefragt wie man die Arrays erstellt(http://www.delphipraxis.net/internal...t.php?t=110225, konnte das auch nachvollziehen kann das aber nicht auf meinen Fall anwenden.
Vielen Dank für Eure Hilfe
Gruß Felix