Muchas gracias. Cambie TObject por TPersistent y coloqué un nuevo procedimiento
Código:
procedure Individuo.Assign(IndiEnviado:Individuo);
begin
VCoordenadas:= IndiEnviado.VCoordenadas;
VClasificacion:=IndiEnviado.VClasificacion;
VDistancias:=IndiEnviado.VDistancias;
Inercia:=IndiEnviado.Inercia;
TieneClasesVacias:=IndiEnviado.TieneClasesVacias;
end;
y todo parece funcionar bien.
Gracias por su aporte y su valioso tiempo.