Указатели

← →
RDA © (2002-06-11 15:41) [0]

Вопрос такой - мне необходимо создать заранее неизвестное количество экземпляров класса TImage. Как бы это реализовать в программе?
Предпологается использовать их по принципу страниц в MS Word.

← →
Kaban (2002-06-11 15:46) [1]

вопросы какие-то сегодня
хочу выделить неизвестное количество памяти
хочу создать неизвестное количество объектов

← →
Kaban (2002-06-11 15:47) [2]

используйте динамический массив

← →
Кулюкин Олег © (2002-06-11 16:00) [3]

> Вопрос такой - мне необходимо создать заранее неизвестное количество экземпляров класса TImage. Как бы это реализовать в программе?
TImage.Create :)

Хранить созданные экземпляры можно в TList.

> Предпологается использовать их по принципу страниц в MS Word.
Это как?

← →
Mike_Goblin © (2002-06-11 17:00) [4]

>Кулюкин Олег
>Хранить созданные экземпляры можно в TList.
а так же в TObjectList и TComponentList :)))

← →
Atyka (2002-06-11 17:01) [5]

Попробуй списками сделать.
Примерчик имеет один глюк будет создавать указатели до тех пор пока память не переполнится ;) :
Type PImageRecord=^TImageRecord;
TImageRecord=Record
Image:TImage;
NextImage:PImageRecord;
End;

Var Image:PImageRecord;

Procedure CreateNewTImage(Image:PImageRecord)
Begin
If Assigned(Image) Then
Begin
If Not Assigned(Image^.Image) Then Image^.Image:=TImage.Create;
If Assigned(Image^.NextImage) Then
CreateNewImage(Image^.NextImage);
End Else
Begin
New(Image);
Image^.NextImage:=nil;
Image^.Image:=TImage.Create;
End;
End;

Пока ничего лучше списков и массивов не предумано, файловые закорюючки тоже можно отнести к ним

Указатели Найти похожие ветки