Posición de los formularios MDIChild minimizados

[Antonio Cardero]

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.

[ecfisa]

Hola.

Un ejemplo:

...
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:
https://i.postimg.cc/1zxgrTcX/maskEdt.gif

Saludos :)

[Antonio Cardero]

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

[Casimiro Notevi]

Crea un hilo con tu pregunta, recuerda nuestra guía de estilo (https://www.clubdelphi.com/foros/guiaestilo.php), gracias.