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

fpspreadsheet: Fix compilation error in Linux (fpszipper.pp)

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3647 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2014-10-13 18:21:39 +00:00
parent 70c18e73c3
commit c47e9ce450
2 changed files with 5 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
components/fpspreadsheet/fpszipper.pp
View File

@ -1767,9 +1767,11 @@ end;
Procedure TUnZipper.UnZipOneFile(Item : TFullZipFileEntry); Procedure TUnZipper.UnZipOneFile(Item : TFullZipFileEntry);
Var Var
{$IFDEF UNIX}
LinkTargetStream: TStringStream;
{$ENDIF}
{%H-}Count, Attrs: Longint; {%H-}Count, Attrs: Longint;
ZMethod : Word; ZMethod : Word;
//LinkTargetStream: TStringStream;
OutputFileName: string; OutputFileName: string;
FOutStream: TStream = nil; FOutStream: TStream = nil;
IsLink: Boolean; IsLink: Boolean;

3
components/fpspreadsheet/laz_fpspreadsheet.pas
View File

@ -11,7 +11,8 @@ uses
fpsxmlcommon, xlsbiff2, xlsbiff5, xlsbiff8, xlsxooxml, fpsopendocument, fpsxmlcommon, xlsbiff2, xlsbiff5, xlsbiff8, xlsxooxml, fpsopendocument,
fpsutils, fpszipper, uvirtuallayer_types, uvirtuallayer, uvirtuallayer_ole, fpsutils, fpszipper, uvirtuallayer_types, uvirtuallayer, uvirtuallayer_ole,
uvirtuallayer_ole_helpers, uvirtuallayer_ole_types, uvirtuallayer_stream, uvirtuallayer_ole_helpers, uvirtuallayer_ole_types, uvirtuallayer_stream,
fpolebasic, wikitable, fpsNumFormatParser, fpsfunc, fpsrpn, fpsStrings; fpolebasic, wikitable, fpsNumFormatParser, fpsfunc, fpsRPN, fpsStrings,
fpscsv;
implementation implementation