Hola Fede14lp y bienvenido a Club Delphi
Como a todos los nuevos miembros te invito a que leas nuestra
guía de estilo.
Veo que te has tomado mucho trabajo para presentar tu código con colores por lo que paso a comentarte como usar los TAG's (etiquetas), que dán mayór legibilidad resaltando palabras reservadas e identación y sobre todo, te hará muchísimo más sencilla la edición:
Un saludo.