Maximizar ventana

[Bibiana Cacciaguerra]

Buenos días,

Tengo una app con un formulario redimensionable en tiempo de ejecución. Para ello, el comando resize contine la ubicación y tamaño de todos los objetos en función del alto y ancho del form.

Sucede que si estiro los bordes o presiono el botón maximizar, va todo perfecto.

Sin embargo si en el evento Activate (probé en otros) coloco WindowsState = 2, se maximiza, se redimensionan los objetos pero se superponen. 

Si coloco un wait windows '...' en el evento resize, cuando doy clic se muestra bien.

Es decir, si no hay una intervención interactiva, no funciona

¿Alguna idea?

Desde ya, muchas gracias! 

[Kisko]

Hola Bibiana.

No lo he probado, pero puedes intentar crear una propiedad en el formulario que controle que se esté "creando" (en realidad que no se a visualizado aún), llamada, por ejemplo CreandoFormulario y definida como .T.

Luego en el evento Activate ejecutas lo siguiente:

    If Thisform.CreandoFormulario

        Thisform.WindowsState = 2

        Thisform.Resize()                                     &&  Donde se ubican cada uno de los controles del formulario

         Thisform.CreandoFormulario = .F.        &&  Con esto evitamos que se vuelva a ejecutar este código

    EndIf

Espero que funcione.

Saludos.

Francisco Lorente.

Murcia. España.