Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.07.11;
Скачать: CL | DM;

Вниз

Массив объектов класса   Найти похожие ветки 

 
timotei   (2005-06-22 18:55) [0]

Ребята, покажите плиз примерчик (если это вообще возможно сделать)
1. Как объявить массив для хранения объектов класса?
2. Как создать объект в таком массиве?


 
ANB ©   (2005-06-22 18:56) [1]

A : array [1..10] of TMyClass;

A[i] := TMyClass.Create;

Только пофрикать потом не забудь.


 
timotei   (2005-06-22 18:58) [2]

А динамический массив как будет выглядеть?


 
stakan ©   (2005-06-22 19:02) [3]

Я бы использовал TObjectList


 
ANB ©   (2005-06-22 19:17) [4]


> А динамический массив как будет выглядеть?
- точно так же, только без скобок.


> Я бы использовал TObjectList
- я бы тоже, но чел хочет массив. Кстати, массив ничем не хуже. Я сам их частенько юзаю.


 
timotei   (2005-06-22 20:49) [5]

то есть, если я првильно понял:

//объявляю
A: array of TMyClass

//увеличиваю длину
SetLength(A,Length(A)+1);

//создаю объект
A[i]:= TMyClass.Create;

Верно?


 
begin...end ©   (2005-06-22 20:55) [6]

> timotei   (22.06.05 20:49) [5]

Верно. Только увеличивать длину динамического массива каждый раз на единицу нежелательно.


 
timotei   (2005-06-22 20:58) [7]

ОК! Спасибо! :)


 
evvcom ©   (2005-06-23 00:57) [8]


> Только увеличивать длину динамического массива каждый раз
> на единицу нежелательно.

Если этих увеличений всего с десяток или происходят они в час по чайной ложке, то ничего страшного. Ну а если лимон объектов в секунду, то да...



Страницы: 1 вся ветка

Текущий архив: 2005.07.11;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.031 c
11-1102605753
stranger_2004
2004-12-09 18:22
2005.07.11
Наследование в МСК


4-1115847544
NikNet
2005-05-12 01:39
2005.07.11
Как записать в реестр запрещенным администраторам?


1-1118770859
Starcom
2005-06-14 21:40
2005.07.11
Build with Runtime packages


6-1112762797
Solidol
2005-04-06 08:46
2005.07.11
Прямой запуск файла из TWebBrowser1 ..


14-1118328590
PVOzerski
2005-06-09 18:49
2005.07.11
Объявлено о смерти проекта Virtual Pascal...