Komponente erstellen und Ereignis zuweisen

[Stevie]

Hallo,

ich hab mir das Tutorial zum Erstellen einer Komponente schon durchgelesen, das schonmal vorweg! :D
Ich versuche nun verzeifelt eine Komponente zu erstellen und einem Ereignis eine Methode zuzuweisen. Wie mache ich das?

[Nalincah]

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  button :TButton;
begin
  button := TButton.Create(Form1);
  button.Parent := Form1;
  button.Caption := 'Test';
  button.Top := 100;
  button.Left := 100;
  button.OnClick := self.Button2Click
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  ShowMessage('test');
end;

[Stevie]

Nein, nicht zu Laufzeit!!!
Ich will eine neue Komponente erstellen, die das macht.
Wie könnte ich jetzt zum Beispiel einen neuen Button erstellen, der immer, wenn ich draufklicke irgendwas macht??

[Nalincah]

Delphi-Quellcode:

  btn2 := TButton.Create(Form1);
  btn2.Parent := Form1;
  btn2.Caption := 'btn2';
  btn2.OnClick := button.OnClick;

Das unter die Zeile

Delphi-Quellcode:

button.OnClick := self.Button2Click;

schreiben. Deklaration nicht vergessen. Und der Btn2 führt das OnClick ereignis des buttons aus den du vorher erstellt hast

[Nalincah]

Ups..Sorry...Moment..Ich guck mal

[Nalincah]

Komponenten-Tutorial
Hoffe das hast du nicht schon gelesen. Das ist eigentlich ganz gut für den anfang

[Stevie]

Ok, gelesen. :D Wie weise ich jetzt einem Ereignis meiner abgeleiteten Komponente bereits im Konstruktor eine Routine zu?

[Christian Seehase]

Moin Stevie,

schau Dir doch noch mal Kapitel 6 des genannten Tutorials an.
Der Unterschied ist nur, dass Du keine published property daraus machst. Ein internes Feld genügt, und diesem weist Du dann eben die Routine zu.
Ist genau das gleiche, als würdest Du eine Kompo dynamisch erzeugen.

[Stevie]

1.) Wenn ich es doch published mache, und ein Benutzer dann im OI eine neue Routine dafür anlegt, wird dann meine "interne" überschrieben?
2.) Wenn ich ein bereits vorhandenes Ereignis mit einer Routine belege, müsste doch im OI dann doch was stehen, oder?
3.) Wenn ich als Eigenschaft der Vorgänger-Komponente eine Liste von Komponenten habe, ich im Konstruktor meiner Komponente einige Komponenten in diese Liste einfüge, kann ich dann auch so einfach diesen einzelnen Komponenten Ereignisroutinen zuweisen?

[Christian Seehase]

Moin Stevie,

1. Ja, aber Du könntest ja den Wert in der Eigenschaft mit dem Deiner internen Methode vergleichen. Sind die unterschiedlich wurde im OI eine Routine zugewiesen.
2. Weiss nich'. Probier's am Besten mal aus ;-)
3. Falls ich das richtig verstanden habe: Ja, warum nicht. (ggf. wäre vielleicht eine ausführlichere Erklärung nötig, was Du genau meinst)