Forms dentro de otro

[mRoman]

Empezado por ecfisa

Hola.

Seguramente por que te he entendido mál, intenté reproducir la situación que mencionas pero no lo logro, el formulario fsNormal siempre se ajusta al cliente del fsMDIChild:

Lo único que veo extraño en tu código es que dos líneas quedan invalidadas por el valor que recibió la propiedad Align:

Código Delphi [-]
  frmTransferencias.Align  := alClient;           // <- 
  // -> estas dos:
  frmTransferencias.Width  := frmMovtosAlmacen.Width;
  frmTransferencias.Height := frmMovtosAlmacen.Height div 2;

Aunque no explica el comportamiento que comentas...

Saludos

Que tal.

Gracias por contestar.

Al formulario fsNormal, agregale una panel....y ejecuta tu aplicación. No sé si tenga algo que ver, pero veo q manejas una versión delphi mayor a la q yo uso q es Delphi6, siento q no, pero podrá ser la causa?.

Con respecto al Align, los quitaré de mi código. Hice una prueba con mis formularios fsNormal, si ningun PANEL....Y SÍ SE AJUSTA AUTOMATICAMENTE!!!...esto me hace pensar que los paneles influyen en ese comportamiento que te comento.

Saludos y gracias por tu tiempo. Seguiré buscando.

[ecfisa]

Hola.
Con el panel sigue alineando:

Tal vez sea la versión... lamento no tener Delphi 6 para probar.

Saludos

[mRoman]

Empezado por ecfisa

Hola.
Con el panel sigue alineando:

Tal vez sea la versión... lamento no tener Delphi 6 para probar.

Saludos

Gracias.

Fijate q los paneles los tengo alineados a TOP o BOTTOM, bueno tengo 3 paneles 1 a TOP el 2 al CLIENT y el 3 a BOTTON...intentalo asi...a ver q efecto te da?

Gracias.

[ecfisa]

Hola.

Sigue alineando:


Saludos

[mRoman]

Empezado por ecfisa

Hola.

Sigue alineando:


Saludos

Pues entonces es mi versión de Delphi.....que lástima, me había gustado esta forma para mostrar las pantallas al usuario...ni modo, tendré que mostrarlas por separado y no en un mismo formulario o bien seguir viendo el comportamiento con PageControl, ya habia empezado ahi, pero quize explorar esta opción...ya que con el PageControl me estaba liando mas...con los datos, abrir, cerrar...en fin.

En fin...te agradezco enormemente tu apoyo y tu tiempo.

Saludos !!!

[mRoman]

Empezado por ecfisa

Hola.

Sigue alineando:


Saludos

Fijate, así me muestra la pantalla.

[mRoman]

Empezado por mRoman

Fijate, así me muestra la pantalla.

Bueno el problema, se resolvió con esto:

Código Delphi [-]
    frmMovtosAlmacen.Height:=449;
    frmMovtosAlmacen.Height:=450;

Código del procedimiento:

Código Delphi [-]
procedure TfrmMovtosAlmacen.sBtnTransfClick(Sender: TObject);
begin
    if frmEntradas.Visible then
         frmEntradas.Close;
    frmTransferencias := TfrmTransferencias.Create(Self);
    frmTransferencias.Show;
    frmTransferencias.Parent := ScrollBox1;
    frmTransferencias.Align  := alClient;
    frmTransferencias.Width  := frmMovtosAlmacen.Width;
    frmTransferencias.Height := frmMovtosAlmacen.Height;
    frmTransferencias.WindowState:=wsMaximized;
    frmMovtosAlmacen.Height:=449;
    frmMovtosAlmacen.Height:=450;
end;

Tuve que re dimensionar por código el formulario MDChild para que el formulario fsNormal, mostrara sin problemas los paneles....