pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

fpspreadsheet: Use fmShareDenyNone when opening files for reading (see Mantis 0026826).

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3636 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2014-10-07 14:02:11 +00:00
parent f9e295540f
commit c3f65eac18
6 changed files with 46 additions and 38 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/fpspreadsheet/fpolebasic.pas
View File

@ -95,7 +95,7 @@ begin
VLAbsolutePath:='/'+AStreamName; //Virtual layer always use absolute paths.
try
RealFile:=nil;
RealFile:=TFileStream.Create(AFileName,fmOpenRead or fmShareDenyWrite);
RealFile:=TFileStream.Create(AFileName, fmOpenRead or fmShareDenyNone);
try
fsOLE:=nil;
fsOLE:=TVirtualLayer_OLE.Create(RealFile);