Objekte gezielt aufrufen

[Tod787]

Guten Morgen Sherlock, danke, hab es dann auch gemerkt

Jetzt hab ich allerdings doch noch ein Problem das in der Hilfe nciht geschildert wird.

Ich möchte nämlich in jeder Zeile der Liste ein Array of TObject haben.

Delphi-Quellcode:

Interface 

(...)

type TObject = class(TObject)
    // Felder
    Field1: Single;
    Field2: Single;
    Field3: Integer;
    Field4: Integer;
end;

(...)

var

   MyObject1: array[0..20] of TObject;
   MyObject2: array[0..20] of TObject;
   MyObject3: array[0..20] of TObject;
   MyObject3: ...
   

   liste: TObjectlist;

Implemetation:
   MyObject1 := TObject.create;
   MyObject2 := TObject.create;
   MyObject3 := TObject.create;
   MyObject4 := ...

Wie kann ich das jetzt mit einer Objectlist realisieren?

Meine bescheide Anfänge wären:

Delphi-Quellcode:

Interface 

(...)

type TObjectList = class (Classes.TList)
    // Felder
    Field1: Single;
    Field2: Single;
    Field3: Integer;
    Field4: Integer;
end;

(...)

var

   liste: TObjectlist;

Implemetation:

(...)   

begin 
    liste.add(TObjekt.create('Test1')); 
    liste.add(TObjekt.create('Test2')); 
end;

Aber wie bekomme ich das mit Arrays hin?