Hola,
Llevas razón en los dos mensajes que publicaste antes
roman. Y otra vez digo que me metí en donde no debí, porque quien sabe, sabe, y ya se ve que yo no sé. Respecto de tu penúltimo mensaje, sí, comprendo que lo que estaba haciendo no era, precisamente, copiar, sino solamente asignar la referencia a otro objeto, que no es lo que se pretende con el método "Assing".
Lo que ocurre es que me pierdo, entonces. Quiero decir, ¿habría entonces que hacer algo como lo siguiente? Va a ser que no, pero, ¿qué tal parece esto? ¿Mejor que lo anterior?
Código Delphi
[-]
procedure TMiForm.Assign(Source: TPersistent);
begin
inherited;
if Source is TForm then
begin
FForm.Assign(Source);
end;
inherited Assign(Source);
end;