Posición de los formularios MDIChild minimizados
 

Hola colegas.


Tengo una aplicación MDI, y quisiera controlar la posición de los formularios MDIChild, una vez que se minimicen, es decir, mediante código pasarle las coordenadas.



Desde ya muchas gracias.

Antonio.

Hola.

Un ejemplo:

Código Delphi [-]
...
uses Unit2;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Randomize;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
 if Form2.WindowState = wsMinimized then
    SetWindowPos(Form2.Handle,
                 0,
                 Random(300), // X
                 Random(200), // Y
                 GetSystemMetrics(SM_CXMINIMIZED),
                 0,
                 0);
end;

Resultado:


Saludos :)

Muchas gracias ecfisa.
Ya puedo agrupar los formularios que se minimicen, acorde al menú de origen (contienen información de contante consulta).



Lo único que me faltaría es que al pasar el mouse por la ventana minimizada, esté informe su caption. Similar cuando pasamos el mouse y el showHint, está activo.


Muchas gracias.


Antonio

Crea un hilo con tu pregunta, recuerda nuestra guía de estilo, gracias.