Aufgerufene Methode erkennt aufrufendes Objekt nicht.

[Bummi]

Du kannst den Konstruktor wie jede Prozedur auch Überladen

Delphi-Quellcode:

  TMyClass=Class(TButton)
    Constructor Create(Aowner:TComponent;AParent:TWinControl);overload;
  End;

//____________
constructor TMyClass.Create(Aowner: TComponent; AParent: TWinControl);
begin
  inherited Create(AOwner);
  Parent := AParent;
end;

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  with TMyClass.Create(self) do
    begin
    left := 100;
    Parent := Self;
    end;
  with TMyClass.Create(self,self) do
    begin
    left := 200;
    end;
end;