list:=Tlist.create;

For i:= 1 to 1000 do
begin
  SSObject:=TSSObject.create;
  {поместите куда-нибудь ссылку на созданный объект - например, в Tlist}
  list.add(SSObject);
end;