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

Вниз

Контейнер объектов   Найти похожие ветки 

 
Goorus   (2004-04-26 11:01) [0]

Вот хотел создать универсальный контейнер объектов, чтобы не переписывать одно и тоже для разных типов, но возникла проблема, я делаю так:

type
TConteiner=class
 objs:array of TObject;
 UsingType:TClass;
 ...
end

TSomeCont=class(TConteiner)
 ...
 Constructor Create;
 ...
end;

...

TSomeCont.Create;
begin
UsingType:=TSomeType;
end;

Так вот, елси создается объект:
Objs[i]:=UsingType.Create;
то у него не вызывется Create (ну который описывается как Constructor Create в TSomeType), а это очень нужно.


 
Гаврила   (2004-04-26 11:07) [1]

objs:array of TObject;
Объяви потомка от TObject с виртуальным конструктором, и храни в массиве именно его. Все классы дожны быть его потомками



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

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

Наверх




Память: 0.46 MB
Время: 0.028 c
1-1082637756
killer
2004-04-22 16:42
2004.04.11
Столбцы в StringGrid


4-1079444425
BillyJeans
2004-03-16 16:40
2004.04.11
Окно без title bar...


3-1081923210
Balamut
2004-04-14 10:13
2004.04.11
Проблема блокировки таблиц в Delphi


1-1080145525
Larry Laffer
2004-03-24 19:25
2004.04.11
Main Menu


3-1081941938
SergeyB
2004-04-14 15:25
2004.04.11
Не генерируется событие TDatabase.OnAfterDisconnect