Codigo antes de mostrar form - Maximizar

[roman]

Anteriormente había mencionado que quizá funcionaría usando el mensaje WM_SIZE pero no tenía manera de verificarlo en ese momento. Ahora que lo hago veo que no es el mejor lugar. De hecho, según leo en la documentación, WM_SIZE ocurre después de que la ventana cambia de tamaño por lo que es lógio que no funcione.

Según pruebo ahora, puedes intentar con el mensaje WM_SYSCOMMAND:

Código Delphi [-]
procedure TForm2.WMSysCommand(var Msg: TWMSysCommand);
begin
  if (Msg.CmdType and $FFF0 = SC_MAXIMIZE) or (Msg.CmdType and $FFF0 = SC_RESTORE) then
  begin
    EnableAnimation(false);
    //LockWindowUpdate(Application.MainForm.Handle);

    inherited;

    //LockWindowUpdate(0);
    EnableAnimation(true);
  end
  else
    inherited;
end;

Como ves, he comentado las líneas de LockWindowUpdate pues al inhabilitar la animación, parece que no son necesarias.

// Saludos