[defcon1_es]

Se me olvidó poner que en el Create de tu aplicación debes poner el código:

Código Delphi [-]
  
// Guarda la resolución original de windows antes forzarla a la que queramos
    Windows.EnumDisplaySettings(Nil, Cardinal(-1), Varios.ResOriginal);

Para guardar la resolución de windows antes de forzarla, y restaurarla al salir de tu programa.