Holas, espero que puedan darme una mano, tengo un problema con una aplicacion MDI que estoy desarrollando, el problema se da cuando tengo mas de una ventana hija y quiero mostrarlas a ambas en pantalla(Tile) pero paralelas verticalmente, lo que pasa es que la una de las ventanas queda fuera del area visible del documento y me pone Scrolls en la ventana principal.
Ahora bien, lo curioso es que si presiono nuevamente la opcion del menu, las ventanas se acomodan perfectamente y desaparecen las Scrollbars.
En el caso de la division horizontal no tengo problemas, me muestra las ventanas correctamente.
el codigo que uso para hacer esto es:
Código Delphi
[-]
procedure TFormMain.TBItem3Click(Sender: TObject);
var i: integer;
begin
for i:=0 to MDIChildCount-1 do begin
MDIChildren[i].WindowState := wsNormal;
MDIChildren[i].top:= 0;
MDIChildren[i].Left:=0;
MDIChildren[i].Height:= Height - ToolBar.Height - panel12.Height - 100;
MDIChildren[i].HorzScrollBar.Range := ClientWidth ;
MDIChildren[i].VertScrollBar.Tracking:= true;
MDIChildren[i].HorzScrollBar.Tracking:= true;
end;
TileMode := tbVertical;
Tile;