Ereignisse von dynamisch erzeugte Elementen abfragen!?

|\/|_/\_>< · Verfasst: Do 06.10.05 12:13

Hallo,
ich habe in meinem Programm eine Menüleiste, die ein DropDownMenü mit variabler Anzahl an Einträgen besitzt. Die Einträge in diesem Menü werden also erst zur Laufzeit dynamisch angelegt. Wie kann ich bei solchen Elementen ein OnClick-Ereignis abfragen?

Der (funktionierende!) Code zur Erzeugung eines Elementes lautet:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

  for i := 0 to n-1 do
  begin
    tbTask := TMenuItem.Create(TaskMenu);
    tbTask.visible := true;
    tbTask.caption := TSCTasks(ListOfTasks.Items[i]).getName;
    TaskMenu.Add(tbTask);
  end;

Danke!

Gruß Max

retnyg · Verfasst: Do 06.10.05 12:17

hier www.delphi-forum.de/...console&start=60 findest du die antwort.

_________________
es gibt leute, die sind genetisch nicht zum programmieren geschaffen.
in der regel haben diese leute die regel...

chrisw · Beiträge: 439 Erhaltene Danke: 3 W2K D7

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:

//in der Typendefinition
procedure Hierpassiertwas (Sender:TObject);



//in der implementation

procedure MeinObject.Hierpassiertwas (Sender:TObject);
begin

//Hier das eintragen was OnClick passieren soll !!

end;

for i := 0 to n-1 do  
  begin  
    tbTask := TMenuItem.Create(TaskMenu);  
    tbTask.visible := true;
    tbTask.OnClick := Hierpassiertwas; //!!!!!!!!!!!!! 
    tbTask.caption := TSCTasks(ListOfTasks.Items[i]).getName;  
    TaskMenu.Add(tbTask);  
  end;

_________________
Man sollte keine Dummheit zweimal begehen, die Auswahl ist schließlich groß genug.

|\/|_/\_>< · Verfasst: Do 06.10.05 12:48

cool - danke Euch für die schnelle Antwort!

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme