Como puedo definir un semaforo en mi aplicación Delphi??

[marcoszorrilla]

Una opción sencilla puede ser utilizar una tabla auxiliar de procesos iniciados, si solo se pretende controlar uno pues necesitaríamos un campo lógico y quizás apuntar en un campo texto el nombre del usuario que bloquea el proceso.

Para comenzar el proceso, leemos la tabla auxiliar y si el campo está puesto a Sí , damos mensajes, atención proceso bloqueado por el usuario xxxxx

Sería conveniente también que el administrador pueda desbloquear este proceso, pues puede darse un mal apagado o cuelgue de la aplicación y quedarse para siempre inutilizado.

Un Saludo.