Einzelnen Beitrag anzeigen

Benutzerbild von Kedariodakon
Kedariodakon

Registriert seit: 10. Sep 2004
Ort: Mönchengladbach
833 Beiträge
 
Delphi 7 Enterprise
 
#17

Re: "inherited" für umgeleitetes Event

  Alt 19. Mär 2007, 21:47
Autsch

Deine If-Abfrage:
if (Assigned(MyEventReceiver)) then EvRecvList.Add(MyEventReceiver); Wird bei einem Fehler dein Freigegebenes Objekt trotzdem aufnehmen...

MyEventReceiver.Free; Zerstört nähmlich nur das Objekt und setzt es nicht Nil, was du aber mit Assigned abfragst...

Nimm stattdesen: FreeAndNil( MyEventReceiver )

Nunja Zerstören musst du das Object ja eh, ob du das nun im Exvept Teil machst oder am Programmende

Bye Christian
Christian
  Mit Zitat antworten Zitat