TCustomControl mit ohne runtime Button

**Corelgott**

Hi @ all,

ich versuche mich gerade an Komponenten:

ich habe eine Comp:

Code:

			type TABC = class(TCustomControl)

  protected

    _btn   : TButton;

  public

    constructor create(AOwner : TComponent);

    procedure makeButton();

end;

-- // --

constructor TABC.create(AOwner : TComponent);

begin

  inherited;

  ControlStyle := ControlStyle + [csAcceptsControls];

end;

procedure TABC.makeButton();

begin

  _btn := TButton.create(Self);

  _btn.parent  := Self;

  _btn.name    := 'foobar';

  _btn.top     := 0;

  _btn.left    := 0;

  _btn.height  := 100;

  _btn.width   := 100;

  _btn.visible := true;

end;

ca. so...

Also ich ziehe in der dt TABC auf die Form... ist ok da soll auch kein button sein weil makeButton ja nicht aufgerufen wird...

So runtime....

makeButton wird aufgerufen...
nu dachte ich ich könnte meinen button sehen....
aber nö...

(Eigentlich ist es intern kein button sondern eine weitere (!= TABC) Komponente die ich dyn-createn will; aber selbst mit TButton kann ich das nicht createn...)

So und nu kommst: wenn ich das in den Constructor meiner Kompo packe...
Dann funzt das! dann habe ich auch nen button... (Das kann ich aber leider nicht so lösen, weil ich selbst zu erst warten muss, bis mir eine andere Kompo ne Datei geladen hat... -> auf Event Warten bevor ich mine Compo anzeigen kann / darf)

Wieso geht das alles auf meiner Kompo nicht?
(habe das ganze auf ner Form versucht... TButton1Click -> und *Zack* war da ein neuer Button...)

Hat da wer man nen Tip für mich?!
Lösungen werden auch gerne genommen ^^ thx!

cya & thx
Corelgott

TCustomControl mit ohne runtime Button

TCustomControl mit ohne runtime Button

Forumregeln