La verdad me es muy difícil leer tu mensaje.
Yo te recomendaría que leyeras la
Guía de Estilo de los foros y que
utilizaras TAG's en los mensajes cuando coloqes código Delphi.
Prueba a eliminar el Application.Terminate y dejar que la aplicación acabe por sí sóla. Creo que la estás forzando a terminar antes de que se p`rocesen todos los mensajes que hay en la cola.