var
   strlist:array[0..250] of Tstringlist;
begin
   strlist:=Tstringlist.create;
   strlist[0].add('mmm');
   strlist[1].add('xxx') ; end;