Thema: Delphi Observer-Pattern

Einzelnen Beitrag anzeigen

Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.453 Beiträge
 
Delphi 12 Athens
 
#3

AW: Observer-Pattern

  Alt 15. Dez 2011, 20:44
statt TInterfaceList IInterfaceList verwenden (spart ein FreeAndNil im Destruktor)
Schlimmer noch: da TInterfaceList von TInterfacedObject abgeleitet ist, steht nach dem Create der Referenzzähler auf 0, wenn man die erzeugte Instanz keiner Interface-Variablen zuweist. Erfolgt nun irgendwie ein AddRef, führt das ausgleichende Release zur sofortigen Freigabe der Instanz. Das Ganze ist somit eine Art Zeitbombe, deren Ursache später nur schwer zu finden ist.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat