Perdona, pero de momento no pienso leer ese código, edita tu mensaje y añade las
etiquetas delphi, para que se distinga en el código la identación, palabras reservadas, etc. (igual que el código delphi que yo puse.
Después le echaré un vistazo.
Espero que entiendas que es muy incómodo leer ese código así puesto, sé que solo cuentas con 5 mensajes y por ello es lógico que no sepas usarlas. No lo tomes como un reproche, sino como crítica constructiva
.
Saludos.