No funciona LockWindowUpdate en XP

[senpiterno]

roman vi e implemente lo del hilo al cual que merivaste, pero aun sigue sin funcionar. Cuando me refiero al molesto efecto del formulario al crearce, hago referecia, a que cuando un form hijo se crea en un MDI, este se crea con un tamaño mas reducido que el contenedor de este y al ejecutarse la accion de maximizarce (ya que asi la tengo definida) este da unos parpadeos. Lo que quiero lograr es que el form aparesca ya maximizado, sin que se vea su tamaño original de creacion y el molesto efecto de maximizacion, espero haber aclarado mas las cosas...

Saludos.

[roman]

Vamos a ver, creo que esto te debe funcionar en cualquier caso:

Código Delphi [-]
type
  TForm2 = class(TForm)
  private
    procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND;
  end;

implementation

procedure TForm2.WMSysCommand(var Msg: TWMSysCommand);
begin
  case Msg.CmdType and $FFF0 of
    SC_ZOOM, SC_RESTORE:
    begin
      EnableAnimation(false);
      LockWindowUpdate(Handle);

      inherited;

      LockWindowUpdate(0);
      EnableAnimation(true);
    end;

    else
      inherited;
  end;
end;

end.

donde Form2 es el formulario hijo y EnableAnimation es como en el otro hilo.

// Saludos

[roman]

Y bueno, siguiendo con las pruebas veo que en el código anterior puedes quitar LockWindowsUpdate y funciona perfecto. Total, que LockWindowsUpdate termina siendo innecesario y habría que cambiar el título a este hilo.

// Saludos