Utiliza las etiquetas DELPHI que el foro pone a disposición para entender mas facilemnte tu codigo.
En cuanto a la respuesta, pues te cuento que estas muy cerca de encontrar la solución, por aqui...
http://www.clubdelphi.com/foros/showthread.php?t=50951