Вложение конструкторов

← →
wam (2003-02-04 18:11) [0]

Есть класс с несколькими конструкторами. Является ли корректным вызов конструктора1 в теле конструктора2?

← →
Игорь Шевченко © (2003-02-04 18:16) [1]

Пример в студию

← →
malkolinge © (2003-02-04 18:20) [2]

> Игорь Шевченко © (04.02.03 18:16)
> Пример в студию

Inherited Create(Aowner); :))

← →
Игорь Шевченко © (2003-02-04 18:21) [3]

malkolinge © (04.02.03 18:20)

> Есть класс с несколькими конструкторами.

type
TMyCollClass = class
...
constructor Create;
constructor CreateBlahBlah;
end;

Я так понял...

← →
han_malign © (2003-02-04 18:26) [4]

When a constructor is called using an object reference (rather than a class reference), it does not create an object or return a value. Instead, the constructor operates on the specified object, executing only the statements in the constructor’s implementation. A constructor is typically invoked on an object reference in conjunction with the reserved word inherited to execute an inherited constructor.

← →
wam (2003-02-04 18:31) [5]

www = class
constructor c1;
constructor c2;
end;

constructor www.c1;
begin
inherited create;
...
end;

constructor www.c2;
begin
c1;
...
end;

Корректно это?

Корректно

program Project1;

// System in "..\..\..\..\Source\Rtl\Sys\System.pas";
type
TA=class
Constructor DF;
constructor ad;
end;

{ TA }

constructor TA.ad;
begin
df;
{}
end;

constructor TA.DF;
var a:Integer;
begin
a:=5;
end;
var a:ta;
begin
a:=Ta.ad;
end.

Специально брек поинт в Classes.pas на NewInstance Поставил. Экзепляр создаеться только тогда когда исп. запись
ТИмяКласса.Create ^)

Так что можно вызывать конструктор из конструктора :)))

Вложение конструкторов Найти похожие ветки