Agregar objetos a TstringList

[patorecalde]

Hola gente del foro, he intentado y probado pero todo sin un resultado feliz en algo que para mi en un pricipio creia ser una soncera y ahora me doy cuenta de que no.
Supongamos tengo una clase persona con dni y nombre, y creo 3 instancias de esa clase y quiero agregarlas a un tstringlist por medio de addobject('nombre', puntero al objeto')es asi no?
Esto tan facil no lo puedo hacer, alguien podria decirme como es, y si es posible algo de codigo.

Muchas gracias