Ver Mensaje Individual
  #2  
Antiguo 22-02-2022
Avatar de escafandra
[escafandra] escafandra is offline
Miembro Premium
 
Registrado: nov 2007
Posts: 2.197
Reputación: 20
escafandra Tiene un aura espectacularescafandra Tiene un aura espectacular
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.

Última edición por escafandra fecha: 22-02-2022 a las 23:13:02.
Responder Con Cita