как правильно использовать виртуальные конструкторы

[hpple]

У меня имеется некая иерархия классов:

TAbstractClass
|
...- TConcreteClassA
....|
.... -TConcreteClassA1
....|
...
|
...- TConcreteClassB
....|
.... -TConcreteClassB1
....|
...
|
...

Я планирую хранить все экземпляры в списке как TAbstractClass. И для их создания пользоваться виртуальными конструкторами,
причем у каждой ветви конкретного класса они будут отличаться (по аргументам, по их типам), а у каждой конкретной ветви иметь одинаковый набор. Как мне грамотно организовать процесс создания этих объектов извне? Грубо говоря, если бы все конструкторы
имели одинаковый вид я мог бы писать, как пример:

type 
  RefType = class of AbstractClass;
var
  Ref: RefType 
...

if ... then
  Ref:= TConcreteClassA1
else
  Ref:= TConcreteClassB1  

List.Add(Ref.Create);

Но в данном случае нет однозначного вида, как мне поступить?

[Человек_Борща]

Посмотрите примеры этих классов в delphi, их там великое множество.
TObject, TThread

вот вам пример:

type
  TMyAbstractClass = class
  public
    constructor Create; overload; virtual; abstract;
    constructor Create(WithSuperData: INTEGER); overload; virtual; abstract;
  end;

  TAbstractionGoesHere = class(TMyAbstractClass)
  public
    constructor Create; overload;
    constructor Create(WithSuperData: INTEGER); overload;
  end;

...

{ TAbstractionGoesHere }

constructor TAbstractionGoesHere.Create;
begin
  //Construct me fully!
end;

constructor TAbstractionGoesHere.Create(WithSuperData: INTEGER);
begin
  //Construct me fully with INTEGER!!!11111
end;

Для TMyAbstractClass не нужна реализация его конструкторов, конструктора там кстати 2.
А вот родившемуся от него TAbstractionGoesHere необходимо точно так же описать конструкторы(оставить только overload ибо конструктора у нас 2), и создать эти методы и описать их.


Лучше к интерфейсам присмотритесь, там есть уже готовая реализация TInterfaceList у интерфецсов и абстрактных классов есть... ну они чем-то схожи.

[hpple]

Суть вопроса была в другом: меня интересует, как написать универсальный код именно для создания конкретных экземпляров в каком-то месте сторонней программы, которая их будет использовать, при условии, что сделать, как я привел выше нельзя, в силу того, что у разных подклассов разный вид конструкторов.

Только с помощью разделения процесса создания на использование конструктора без параметров и последующей инициации только что созданного объекта этими дополнительными данными?

[evg_m]

if ... then begin
  Ref:= TConcreteClassA1;
  Add(ref.Create(p1);
end
else begin
  Ref:= TConcreteClassB1  
  Add(ref.Create(p1,p2);
end;

//List.Add(Ref.Create);