Date cuenta que si hubieras dicho esto desde un principio, no habría habido necesidad de que dec y Neftali escribieran algo que tú ya sabes.
Assign es un método virtual intoducido en TPersistent. El método original no hace nada y sólo las componentes descendientes que así lo decidan, implementarán el método para hacer la asignación. En otras palabras, la VCL introduce Assign sólo como una sintaxis para asignar pero la asignación en sí debe implementarse en cada caso. Tal implementación, en el caso que nos ocupa, muy posiblemente pasará por un bucle.
// Saludos
|