Delphi - Escribir en el puerto paralelo LPT1

Estoy un haciendo una aplicación que va a interactuar con otra aplicación en dos maquinas distintas. Para ello, necesito mandarle información por el puerto paralelo (LPT1) o por el puerto serie (COM2).
El problema que tengo es que no encuentro una función en Delphi que me permita escribir en el puerto; he buscado en libros y en la ayuda, pero no encontré nada. Espero que me puedan ayudar...

Puedes hacer dos cosas: o te miras la ayuda del API de Windows, las funciones CreateFile (para abrir el puerto) y read(...) y write(...) para leer y escribir del puerto, o miras por alguna página de componentes de Delphi donde podrás encontrar varios componentes que sirven para la comunicación vía puerto serie.

Saludos.