Hola.
He editado tu post original para añadir la etiqueta [delphi]. Verás que la presentación del código publicado está mucho mejor ahora.
Para ver cómo funciona la etiqueta, te recomiendo presionar el botón de "editar" tu mensaje original.
hasta luego.
