Orden formularios

[[escafandra]]

Empezado por newtron

Amigo escafandra.

Esto se ha quedado estupendamente pero hay un pequeño detalle que rompe mi "paz interior" y es que si tengo un formulario abierto encima del menú y minimizo el menú, al volver a maximizarlo el formulario se queda detrás del menú. ¿Hay forma de arreglar eso?

Gracias y un saludo.

Haber si te entiendo. ¿Dices que si tienes un formulario abierto delante del Form Principal (al que tu, perece ser, llamas menú) y minimizas el Form Principal, al restaurarlo éste tapa al Form secundario?

Con el ejemplo que he usado eso no ocurre , es posible que no te entienda bien o que tengas incluidas cosas en tu código distintas a las mías.

Saludos.

[[newtron]]

Solucionado.

El problema es que tenía ya redireccionado los mensajes del programa y no podía usar tu código tal cuál entonces puse la instrucción para pasar el formulario principal al fondo en el evento "activate" pero claro, este evento no se dispara al volver al formulario después de minimizarlo, he capturado el evento OnRestore y ahí si que me funciona.

Gracias y un saludo

[[escafandra]]

Si quieres simplificarte, no trabajes con los eventos VCL, captura el mensaje WM_WINDOWPOSCHANGED con un procedimiento tal que así:

Código Delphi [-]
procedure WMWindowPosChanged(var Message: TWMWindowPosChanged); message WM_WINDOWPOSCHANGED; 
//.......................

procedure TForm1.WMWindowPosChanged(var Message: TWMWindowPosChanged);
begin
    SetWindowPos(Handle, GetBackForm(self).Handle, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE);
end;

Sería el equivalente al código que anteriormente puse, sólo que lo hice en el WndProc(var Message: TMessage); para manejar varios mensajes en un sólo procedimiento.


Saludos.

[[newtron]]

Estupendo.

Gracias.

[alsn]

Hola, ya sé que este hilo es muy antiguo, pero es que un enlace reciente de Newtron me ha llevado hasta aquí.

No sé si entiendo bien lo que Newtron quería, pero ¿No hubiera bastado con dejar el formulario principal (llamado menú) con su propiedad FormStyle en fsNormal y establecer esa propiedad en fsStayOnTop para todos los demás formularios?

Un saludo