Einzelnen Beitrag anzeigen

Benutzerbild von Corelgott
Corelgott

Registriert seit: 11. Apr 2003
Ort: Lübeck
213 Beiträge
 
Delphi 2006 Enterprise
 
#1

TCustomControl mit ohne runtime Button

  Alt 4. Aug 2005, 10:57
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
  Mit Zitat antworten Zitat