Pantalla de proceso y barra de progreso

[Neftali [Germán.Estévez]]

Empezado por elrayo76

Paso a comentarles que al parecer la solución de poner el formulario StayOnTop funcionó, pero no como todos puedan creer.

Habría que ver qué códigos estás utilizando en tu aplicación en los eventos OnCreate, OnShow, ... o cómo estás gestionando los formularios. Ver si estás redefiniendo procedimientos como los CreateParams o similares.
La propiedad fsStayOnTop funciona correctamente. Yo la estoy usando y la he probado en diferentes versiones.
Si la activas para un formulario lo mantendrá por encima del resto de los formularios de la aplicación.

Estaría bien, que si comentas que no te ha funcionado, explicaras el porqué.

Empezado por elrayo76

Para que funcionara cuando se crea el formulario en el evento "formCreate" tuve que poner lo siguiente como primera línea:

Comentaba lo anterior, porque al final si revisas el código de la VCL, la propiedad fsStayOnTop en un formulario acaba haciendo lo siguiente:

Código Delphi [-]
SetWindowPos(Handle, HWND_STYLE[FFormStyle = fsStayOnTop], 0, 0, 0, 0,
          SWP_NOMOVE or SWP_NOSIZE or SWP_NOACTIVATE or SWP_NOOWNERZORDER);

Si te fijas es bastante similar o igual a lo que tú has puesto en tu código.
Si ver tu código (que sólo conoces tú) es difícil saber porqué esa línea no ha funcionado (o no se ha ejecutado) y sí la que tú has puesto en el FormCreate.