Delphi - Cómo saber si tua aplicación ya estaba corriendo

Hola de nuevo, tengo este otro caso, estoy trabajando en mi aplicación con sockets atendiendo el puerto por ejemplo el "21" pero al guardárla y ejecutárla la primera vez ella funciona bien, pero si no la cierro y la ejecuto de nuevo me devuelve un error porque ya esa misma aplicación estaba en ejecución y atendiendo ese puerto.

Entonces lo que necesito es una rutina para saber si ya la aplicación se estaba ejecutando y si es así pues cerrárse, sino pues trabajar normalmente.

Otra vez muchas gracias.

Mira aquí:

http://q3.nu/trucomania/truco.cgi?267&esp

Saludos.

Gracias voy a revisarlo