Si quieres una solución rápida:
Crea una nueva clase diagamos "TFormTool" del tipo TObject
Crea un método "EnableControl(aComponent:TComponent);
En el metodo EnableControl pones lo que quieras hacer con el componente que le pases.
Guarda la unidad.
Ahora puedes usar este control para manipular cualquiera de las forms que mencionas, solo tendrias que instanciar el objeto antes de abrir cualquiera de las dos forms o bien instanciarlo dentro de cada form. Da lo mismo.
Es decir nuestra clase FormTool podrá manipular forms según necesites sin necesidad de saber que contienen ni de que son.
|