Hola JMariano,
he encontrado la solución por fin. Al final encontré otro articulo que me resulto quizas más claro he interesante para dar solucion a mi problema. Además ya lo he probado y funciona muy bien.
Aquí pongo el enlace para que todos puedan echarle un vistazo. Desde luego recomiendo su lectura atentamente.
www.latiumsoftware.com/es/pascal/0011.php
Por último muchas gracias por tu interes y tu ayuda.
Saludos.