Edit mit variabler Nummer

[traudl]

Also ich erstelle alle Editfelder mit dem OnCreate Ereignis und bilde daraus einen Array und greife darauf zu. Jetzt habe ich den Fehler Undefinierter Bezeichner: 'Edit'
Ich hoffe ich peil das mal noch.

Delphi-Quellcode:

unit Unit1;

interface

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

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
    procedure FormActivate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

  TEditNew  = class(TEdit)
    public
      procedure CreateParams(var Params: TCreateParams); override;
    end;
var
  Form1: TForm1;
  Edit5: TEditNew;
  Edit6: TEditNew;
  Edit7: TEditNew;

implementation

{$R *.dfm}

{ Editfeld zentriert Ausgerichtet }
procedure TEditNew.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);
  Params.Style := Params.Style or ES_CENTER
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
    Edit5 := TEditNew.Create(Self);
    Edit5.Parent := Self;
    Edit5.Text := '100';
    Edit5.SetBounds(184,96,45,24);
    Edit5.Font.Style := [fsBold];
    Edit5.Font.Name := 'Arial';
    Edit5.Font.Height := 15;
    Edit5.TabStop := True;
    Edit5.TabOrder := 0;
    Edit6 := TEditNew.Create(Self);
    Edit6.Parent := Self;
    Edit6.Text := '10';
    Edit6.SetBounds(184,120,45,24);
    Edit6.Font.Style := [fsBold];
    Edit6.Font.Name := 'Arial';
    Edit6.Font.Height := 15;
    Edit6.TabStop := True;
    Edit6.TabOrder := 0;
    Edit7 := TEditNew.Create(Self);
    Edit7.Parent := Self;
    Edit7.Text := '20';
    Edit7.SetBounds(184,144,45,24);
    Edit7.Font.Style := [fsBold];
    Edit7.Font.Name := 'Arial';
    Edit7.Font.Height := 15;
end;

procedure TForm1.FormActivate(Sender: TObject);
begin
    Edit: Array[5..7] of TEditNew;

end;

end.

Was mache ich falsch. Muss ich Edit noch als var definieren, wenn ja als was ?