Hola nemo.
Bienvenido a estos foros, ya que eres relativamente nuevo.
Te recomiendo que leas la
Guía de estilo y que
utilices TAG's en tus mensajes cuando coloques código Delphi.
NOTA: Mira el código que has añadido tú y el que ha añadido Seoane. ¿Cual se lee mejor?