forum.boolean.name - Как N классам присвоить один и тот же конструктор?

Код:

MyTForm = class(TForm)

public

  constructor Create(AOwner: TComponent); override;

  destructor Destroy; override;

end;



MyTButton = class(TButton)

public

  constructor Create(AOwner: TComponent); override;

  destructor Destroy; override;

end;



MyTEdit = class(TEdit)

public

  constructor Create(AOwner: TComponent); override;

  destructor Destroy; override;

end;

Подскажите, как можно избежать описания одних и тех же процедур классов!?
Как можно сделать так, чтобы все классы юзали один описанный конструктор, но классы не наследуют друг друга...
Нужно чтобы в конструкторе вызвался мой код и потом конструктор родителя.

Как мне нужно построить код, чтобы не получилось типа такого !?

Чтобы процедуры были описаны единожды для все классов, чтобы не копипастить процедуры...