Einzelnen Beitrag anzeigen

Benutzerbild von Shivan
Shivan

Registriert seit: 5. Mär 2003
Ort: Ravensburg
131 Beiträge
 
Delphi 6 Enterprise
 
#9

Re: Ergänzung zu "Events in einer Liste"

  Alt 29. Mär 2007, 12:53
Jetzt habe ich endlich rausgefunden, warum sich meine Prozeduren nicht 1:1 zuweisen ließen...
Man muss den Umweg über eine Variable gehen...
bspw:
Delphi-Quellcode:
procedure myObj.test(Sender: TObject);
begin
  //....
end;

//...
var
  l_Event: TNotifyEvent;
begin
  l_Event := test;
  EventList.Add(TMethod(l_Event));
end;
Erst dann lässt sich so ein Event als TMethod casten.

Btw. die Unit GpLists enthält auch eine Klasse für das Verwalten von Methoden... jedoch finde ich die Variante als Ableitung von TList schicker, da dabei nur eine Liste verwendet wird...
Markus Stein