2 replies to this topic

[look]

Hola compañeros, tengo el siguiente problema ...
tengo mi form principal, el menu de mi aplicacion, de la cual llamo a otras ventanas, el form principal no es un mdi, ni las ventanas childs, el problema que tengo es al minimizar las ventanas que llamo desde el menu principal

como veran la imagen se queda atras, sinemabargo... me encontre un truco por alli :

delphi

SetWindowPos(Handle,
              HWND_TOPMOST,
              0, 0, 0, 0,
              SWP_NOMOVE or SWP_NOSIZE or SWP_SHOWWINDOW);

me queda asi:


pero.... el problema es que , cuando llamo ventanas con efecto modal desde esta, en algunas ocaciones se queda atras y para ver la ventana tinenes que darle alt+tab
¿alguien conoce otro metodo?.

[Wilson]

Una posibilidad es pasar al parámetro Owner del procedimiento create la ventana activa.
No tengo delphi a la mano ( y se me puede pasar algo) pero sería mas o menos así:

delphi

With MiFormModal.Create(Screen.ActiveForm) do
 try
   ShowModal
 Finally
  Free

[look]

este es el codigo que utilizo para llamar mi form, el problema al minimzarlo es uno, el otro problema es cuando llamo alguna ventana desde este form

delphi

    if not Assigned(Form1) then //SI El form no esta creado
    Begin
        Form1 := TForm1.Create(nil);
    END
    ELSE;
    Form1.Show;
    Form1.WindowState:=wsMaximized;