dyn. array oder records oder tstrinlist bitte um rat

[elyesa]

hallo,
könnte das etwa so funktionieren:

Delphi-Quellcode:

type

Tgroup = record
   fgroupno: integer
   fgroupquote : TStringlist
  end;

Tgroups = array of Tgroup  
 
 
Tgroupevent = record
   feventno : Integer;
   feventlist : eventlist;
   
Tgroupeventlist = array of Tgroupevent;    
 
 
var 
lliste    : tstringlist  --- die L Liste
grouplist : Tstringlist  ---> die groupenliste
eventlist : tstringlist ---> die eventliste

1.) den tgroups array mit den group record füllen

2.) die group liste mit den groupen füllen
grouplist.addobject('groupeno', Tgroups[indeger]);

3.) dann die eventliste mit der groupliste und der lliste füllen
eventlist.addobject('groupno',grouplist);
eventlist.addobject('llist',lliste);


4.) den array tgroupevents mit dem record tgrouprecord füllen


gruss
ismail