Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Abrir MDI child al máximo tamaño disponible. (https://www.clubdelphi.com/foros/showthread.php?t=95582)

Casimiro Notevi 22-02-2022 17:54:54

Abrir MDI child al máximo tamaño disponible.
 
Aprovechando esta imagen de otro hilo, hago una pregunta: ¿cómo se puede hacer para que cada una de las ventanas se abra al tamaño máximo del espacio disponible?
No maximizada, sino ocupando todo el espacio del contenedor.
Con "Tile" se ajusta la primera, pero luego las siguientes van adaptando el tamaño de todas para que quepan.
La idea es que cualquiera de ellas se abra siempre al máximo del espacio disponible.
Por supuesto, teniendo en cuenta distintos windows, temas, bordes, etc. etc. etc.




escafandra 22-02-2022 23:09:30

Imagino que pretendes llenar el área cliente del MDIForm con un MDIChild. El proceso ha de comenzar calculando el área cliente verdadera del Parent para luego asignarle los valores al nuevo MDIChild:

Código Delphi [-]
var
  Child: TMDIChild;
  Rect:  TRect;
begin
  Child := TMDIChild.Create(Application);
  //...... Ajustar valores, Caption...

  // Calculando el área cliente
  Windows.GetClientRect(ClientHandle, Rect);
  
  // Asignando la posición y el tamaño al nuevo Child.
  Child.Top := 0;
  Child.Left := 0;
  Child.Width := Rect.Right;
  Child.Height := Rect.Bottom;
  //.......
end;



Saludos.

Casimiro Notevi 23-02-2022 10:55:07

¡¡¡PERFECTO!!! ^\||/
Gracias.



La franja horaria es GMT +2. Ahora son las 13:27:27.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi