Cita:
tango01 comentó:
va pensando lo bien, no me sirve crear un atributo nuevo.
tiene que ser un atriburo de la clase TForm ya que como el metodo es generico tengo que pasar como parametro un TForm.
|
Pues no sé en qué forma estás diseñando la aplicación ni a qué método te refieres. Si te refieres al TCustumizer.SaveForm no veo cuál es el problema, simplemente verificas que el parámetro sea del tipo adecuado:
Código:
if fm is TChildForm then
begin
if TChildForm(fm).IsVisible then
reg.WriteInteger(self.Cifrar('VISIBLE'),1)
else
reg.WriteInteger(self.Cifrar('VISIBLE'),0)
end
Por otro lado, IsWindowVisible funciona en mi caso.
Ahora que, en el peor de los casos, si no deseas agregar una nueva propiedad a los formularios, aún te queda la opción de la propiedad Tag del formulario. Ponla en 0 al ocultarlo y en 1 al mostrarlo.
// Saludos