Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - Dynamische Objekte mit Ereigniss


eraser_seb - Do 29.04.10 14:32
Titel: Dynamische Objekte mit Ereigniss
Hallo

Ich habe a mal ne Frage.

Ich erzeuge ein Objekt dynamisch zum Beispiel ein Button oder Edit.


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
procedure TForm1.Button1Click(Sender: TObject); 
var 
edit: tedit; 
begin 
edit := tedit.Create(self); 
end;


Wie kann ich auf die Ereignisse Reagieren von der var/Objekt "edit"?

danke euch


elundril - Do 29.04.10 14:44

Indem du dir nen eigenen Eventhandler zusammenbaust. Das schaut dann ca. so aus:


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
procedure TForm1.Button1Click(Sender: TObject); 
var edit: tedit; 
begin 
  edit := tedit.Create(self); 
  edit.onclick := dynEditClick;
end;

procedure TForm1.dynEditClick(Sender: TObject);
begin
  //Hier kommt dann das rein was du in dem OnClick haben willst.
end;


lg elundril


eraser_seb - Fr 30.04.10 12:31

Danke dir.
Eigentlich total simpel.