Puedes usar TInterfaceObject de forma segura, de hecho para ello existe.
_AddRef, _Release y RefCount permiten un "recolector de basura" que funciona mediante el conteo de referencias.
La idea es que cada vez se toca un objeto que lo implementa se "aumenta" la cantidad de referencias y luego cuando se suelta el objeto se "decrementa". Cuando el # de referencias llegue a 0, automaticamente se libera el objeto (esto significa que en la practica no es necesario llamar a .Free).
Lo que pasa es que como sabes Delphi (excepto la version .NET) no es un lenguague con GC incorporado y si no se tiene en cuenta las reglas que hay que seguir termina haciendo uno unas vainas muy mal hechas (ej: No se deben mezclar llamadas a interfaces con las de objetos).
TInterfacedObjet es una clase que por decirlo asi, permite a las clases "normales" (que no manejan recolector de basura por referencia) beneficiarse de las ventajas de las interfaces.
Otra nota, es convencion (aunque no obligatoria) llamar las interfaces asi:
IUno
IDos
Y las clases
TUno
TDos
|