[[seoane]]

Se me ocurre lo siguiente:

Código Delphi [-]
Archivo := TFileStream.Create(MiArchivo, fmOpenRead or fmShareDenyWrite);

Así permitimos que el archivo pueda ser abierto varias veces en modo de solo lectura, sin que se produzca ningún error.