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