Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Ventana modal que muestra un diálogo al abrirse (no se ve la ventana) (https://www.clubdelphi.com/foros/showthread.php?t=66297)

Lord Delfos 12-02-2010 03:57:11

Ventana modal que muestra un diálogo al abrirse (no se ve la ventana)
 
A ver, no sabía qué título poner... El tema es el siguiente.

Tengo una ventana que es mostrada con ShowModal.

Esta ventana al abrirse hace algunas comprobaciones y dependiendo de las circunstancias, muestra un cuadro de diálogo (en realidad otra ventana, pero para el caso es lo mismo).

Problema: el cuadro de diálogo se ve ANTES de que la ventana modal se muestre en pantalla, con lo que uno ve una ventanita chiquitita sin saber qué pasó.

La verdad es que no sé cómo solucionarlo. Lo que he probado, y porqué no ha funcionado:

- Usar el OnShow. Nop, se ve el cuadro antes que la ventana.

- Sobrescribir el método ShowModal, para llamar a inherited primero y después mostrar el diálogo. Pasa lo mismo que con el OnShow.

- Evento OnActivate. Funciona, pero claro, el evento se dispara cada vez que la ventana se vuelve activa. Así que hay que programarse algún condicional...


Si alguno tiene alguna idea, pues agradecido.

Saludongos.

roman 12-02-2010 04:18:57

El formulario modal no puede mostrarse hasta que no termina el evento OnShow. Fijate en lo que pongo aquí. Sólo tendrías que poner en el procedimiento CMAfterShow las comprobaciones y la apertura del cuadro de diálogo.

// Saludos

Lord Delfos 12-02-2010 04:50:30

¡Uejeie! ¡Gracias mil!

Y, ya que estamos, mis disculpas por no buscar en el foro... Es que estaba enojadísimo porque a la compu se le apaga el disco cada quince minutos y...


La franja horaria es GMT +2. Ahora son las 08:27:37.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi