Pues yo propongo un TobjectList de esta forma quedaría algo así:
Código Delphi
[-]
type Tregistro = record
...
end
type TObjeto = class(Tobject)
public
Datos:TRegistro
end;
var TLista :TobjectList;
Básicamente es lo mismo que propone
Roman, pero te ahorras el uso de punteros, siempre trabajas con objetos. Ganas claridad conceptual y de código.
Saludos