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

fpspreadsheet: small improvements

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@932 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
sekelsenmat
2009-08-12 13:08:44 +00:00
parent 77877e6009
commit 72d201621f
5 changed files with 19 additions and 32 deletions
Download Patch File Download Diff File Expand all files Collapse all files

39
components/fpspreadsheet/examples/excel8demo/excel8read.lpi
View File

@ -1,18 +1,20 @@
<?xml version="1.0"?> <?xml version="1.0"?>
<CONFIG> <CONFIG>
<ProjectOptions> <ProjectOptions>
<Version Value="7"/> <PathDelim Value="\"/>
<Version Value="6"/>
<General> <General>
<Flags>
<AlwaysBuild Value="False"/>
</Flags>
<SessionStorage Value="InProjectDir"/>
<MainUnit Value="0"/> <MainUnit Value="0"/>
<IconPath Value="./"/>
<TargetFileExt Value=""/> <TargetFileExt Value=""/>
<Icon Value="0"/>
<UseXPManifest Value="True"/> <UseXPManifest Value="True"/>
<ActiveEditorIndexAtStart Value="0"/>
</General> </General>
<VersionInfo> <VersionInfo>
<ProjectVersion Value=""/> <ProjectVersion Value=""/>
<Language Value=""/>
<CharSet Value=""/>
</VersionInfo> </VersionInfo>
<PublishOptions> <PublishOptions>
<Version Value="2"/> <Version Value="2"/>
@ -36,40 +38,17 @@
<Filename Value="excel8read.lpr"/> <Filename Value="excel8read.lpr"/>
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
<UnitName Value="excel8read"/> <UnitName Value="excel8read"/>
<CursorPos X="22" Y="13"/>
<TopLine Value="1"/>
<EditorIndex Value="0"/>
<UsageCount Value="20"/>
<Loaded Value="True"/>
</Unit0> </Unit0>
</Units> </Units>
<JumpHistory Count="1" HistoryIndex="0">
<Position1>
<Filename Value="excel8read.lpr"/>
<Caret Line="36" Column="62" TopLine="29"/>
</Position1>
</JumpHistory>
</ProjectOptions> </ProjectOptions>
<CompilerOptions> <CompilerOptions>
<Version Value="8"/> <Version Value="8"/>
<PathDelim Value="\"/>
<SearchPaths> <SearchPaths>
<IncludeFiles Value="$(ProjOutDir)/"/> <IncludeFiles Value="$(ProjOutDir)\"/>
</SearchPaths> </SearchPaths>
<Other> <Other>
<CompilerPath Value="$(CompPath)"/> <CompilerPath Value="$(CompPath)"/>
</Other> </Other>
</CompilerOptions> </CompilerOptions>
<Debugging>
<Exceptions Count="3">
<Item1>
<Name Value="EAbort"/>
</Item1>
<Item2>
<Name Value="ECodetoolError"/>
</Item2>
<Item3>
<Name Value="EFOpenError"/>
</Item3>
</Exceptions>
</Debugging>
</CONFIG> </CONFIG>

2
components/fpspreadsheet/examples/excel8demo/run_excel8read.bat Normal file
View File

@ -0,0 +1,2 @@
excel8read.exe
pause

3
components/fpspreadsheet/xlsbiff2.pas
View File

@ -19,6 +19,9 @@ Excel file format specification obtained from:
http://sc.openoffice.org/excelfileformat.pdf http://sc.openoffice.org/excelfileformat.pdf
Encoding information: ISO_8859_1 is used, to have support to
other characters, please use a format which support unicode
AUTHORS: Felipe Monteiro de Carvalho AUTHORS: Felipe Monteiro de Carvalho
} }
unit xlsbiff2; unit xlsbiff2;

5
components/fpspreadsheet/xlsbiff5.pas
View File

@ -45,6 +45,9 @@ Microsoft BIFF 5 writer example:
http://support.microsoft.com/kb/150447/en-us http://support.microsoft.com/kb/150447/en-us
Encoding information: ISO_8859_1 is used, to have support to
other characters, please use a format which support unicode
AUTHORS: Felipe Monteiro de Carvalho AUTHORS: Felipe Monteiro de Carvalho
} }
unit xlsbiff5; unit xlsbiff5;
@ -127,7 +130,7 @@ implementation
const const
{ Excel record IDs } { Excel record IDs }
INT_EXCEL_ID_BOF = $0809; INT_EXCEL_ID_BOF = $0809;
INT_EXCEL_ID_BOUNDSHEET = $0085; // Refered as SHEET in the OpenOffice docs INT_EXCEL_ID_BOUNDSHEET = $0085; // Renamed to SHEET in the latest OpenOffice docs
INT_EXCEL_ID_EOF = $000A; INT_EXCEL_ID_EOF = $000A;
INT_EXCEL_ID_DIMENSIONS = $0200; INT_EXCEL_ID_DIMENSIONS = $0200;
INT_EXCEL_ID_FONT = $0031; INT_EXCEL_ID_FONT = $0031;

2
components/fpspreadsheet/xlsbiff8.pas
View File

@ -112,7 +112,7 @@ implementation
const const
{ Excel record IDs } { Excel record IDs }
INT_EXCEL_ID_BOF = $0809; INT_EXCEL_ID_BOF = $0809;
INT_EXCEL_ID_BOUNDSHEET = $0085; INT_EXCEL_ID_BOUNDSHEET = $0085; // Renamed to SHEET in the latest OpenOffice docs
INT_EXCEL_ID_EOF = $000A; INT_EXCEL_ID_EOF = $000A;
INT_EXCEL_ID_DIMENSIONS = $0200; INT_EXCEL_ID_DIMENSIONS = $0200;
INT_EXCEL_ID_FONT = $0031; INT_EXCEL_ID_FONT = $0031;