Ver Mensaje Individual
  #2  
Antiguo 24-02-2004
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Reputación: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Prueba poner la propiedad Position del mdi child en poDeafultPosOnly y abrirla con el siguiente código:

Código:
var
  Placement: TWindowPlacement;
  ClWidth, ClHeight: Integer;

begin
  GetWindowPlacement(Self.ClientHandle, @Placement);
  ClWidth := Placement.rcNormalPosition.Right - Placement.rcNormalPosition.Left;
  ClHeight := Placement.rcNormalPosition.Bottom - Placement.rcNormalPosition.Top;
  with TForm2.Create(Self) do
  begin
    Left := (ClWidth - Width) div 2;
    Top := (ClHeight - Height) div 2;
  end;
Esto centrará el formulario hijo en el área del fromulario principal que no esté ocupada por toolbars, panels, etc.

// Saludos
Responder Con Cita