Como saber si un fichero está abierto

[dec]

Hola,

En realidad a mí me parece que no hay forma de saber si un archivo está abierto o qué, a no ser que la aplicación que lo abra lo haga "de forma exclusiva". En este caso tal vez uno podría comprobar si el archivo, efectivamente, fue abierto de esa forma, dicho mal y pronto. Pero, si la aplicación que abre un archivo (y es lo normal) no lo abre de forma exclusiva, ya digo, puedo estar equivocado, pero, ¿cómo podría averiguarse que el archivo en cuestión está abierto?

Te pondré un ejemplo. Una aplicación de Delphi cuenta con un "TMemo" en el que carga el contenido de un archivo. La aplicación lee el archivo, y pone su contenido en el "TMemo". Y ahí se acaba todo. El archivo puede incluso eliminarse a continuación, que, el contenido del mismo seguirá en el "TMemo". Si otra aplicación quiere saber si la mía abrió el archivo de marras, ¿cómo iba a hacerlo?