Contar Lineas de Codigo Logicas y Fisicas

[[Lepe]]

Aunque lo que te he comentado es bueno, realmente no es así, es decir, no
se quedan ninguno en el Limbo, ninguno de los tres. ¿Por qué?

Porque una linea de código se me escapó a la vista:

Código Delphi [-]
   FTrashList.Add(Trash);

La variable Trash, si se queda apuntando al tercer Trash creado, pero los 2
anteriores, se añaden a FTrashList, realmente no se quedan en el limbo, pero
que conste, en esa rutina tienes 3 objetos Trash distintos. ¿hasta ahí de
acuerdo?

El error que tienes ahora, es que estas

//Si ya termine de utilizar la variable TRASH, por que al decirle
TRASH.Destroy en la lista se almacenan valores distintos a los que le entre?

1º - No veo en ningún sitio que llames a Destroy.
2º- Como te dije, no debes usar Destroy, usa FreeAnnil(Trash).
3º- Has dejado de usar la variable Trash (el puntero de color azul), pero el
objeto realmente (color rojo o verde) sigue en memoria, y puedes acceder a
él a traves de FTrashList.
4º- No puedes ni debes usar Trash.Free, porque destruirías el objeto de la
memoria RAM. Si liberas el objeto con Trash.Free, y despues intentas acceder
desde FTrashList.Items[i] a ese mismo objeto, tendrás un Access Violation.

No conozco realmente la implementación de FTrashList; por el nombre parece
una lista de objetos, y si es así, en realidad es una lista de punteros.

Solo puedes destruir el Trash, desde un sólo sitio, yo lo haría al liberar el FTrashList.

Edito: Pon la implementación de FTrashList, cuando lo creas y como lo destruyes.

saludos