Se me ocurre que antes de cambiar la resolución puedes guardarte la actual (para eso puedes revisar las propiedades Height y Width del objeto Screen).
En lugar de cerrar como haces ahora, primero oculta el form (Hide), luego cambia la resolución a la original (con los valores que has guardado antes)
y luego cierra.
No lo he probado, pero debería funcionar.
NOTA:
Utiliza TAG's cuando añadas código delphi.