fpspreadsheet: Set "use unit" flag of fpscell. Update demo_write_formatting to use package instead of path to fpspreadsheet.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5740 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz 2017-02-05 21:04:36 +00:00
parent 5ef12d417d
commit ebb9b428ea
3 changed files with 10 additions and 10 deletions

View File

@ -1,7 +1,7 @@
<?xml version="1.0" encoding="UTF-8"?>
<CONFIG>
<ProjectOptions>
<Version Value="9"/>
<Version Value="10"/>
<PathDelim Value="\"/>
<General>
<Flags>
@ -30,10 +30,13 @@
<FormatVersion Value="1"/>
</local>
</RunParams>
<RequiredPackages Count="1">
<RequiredPackages Count="2">
<Item1>
<PackageName Value="LazUtils"/>
<PackageName Value="laz_fpspreadsheet"/>
</Item1>
<Item2>
<PackageName Value="LazUtils"/>
</Item2>
</RequiredPackages>
<Units Count="1">
<Unit0>
@ -50,7 +53,6 @@
</Target>
<SearchPaths>
<IncludeFiles Value="$(ProjOutDir)"/>
<OtherUnitFiles Value="..\..\source\common"/>
<UnitOutputDirectory Value="..\lib\$(TargetCPU)-$(TargetOS)"/>
</SearchPaths>
<Parsing>

View File

@ -12,8 +12,8 @@ program demo_write_formatting;
{$mode delphi}{$H+}
uses
Classes, SysUtils,
fpsTypes, fpspreadsheet, xlsbiff8, fpsopendocument, fpscell;
Classes, SysUtils, fpsTypes, fpspreadsheet, xlsbiff8, fpsopendocument,
fpscell, laz_fpspreadsheet;
var
MyWorkbook: TsWorkbook;
@ -30,7 +30,7 @@ begin
MyWorksheet.WriteText(1, 1, '[]'); // B2
MyCell := MyWorksheet.GetCell(1, 1);
MyCell^.Border := [];
MyCell.Border := [];
MyWorksheet.WriteText(1, 3, '[N]'); // D2
MyCell := MyWorksheet.GetCell(1, 3);

View File

@ -19,11 +19,10 @@
</Parsing>
<Other>
<CompilerMessages>
<IgnoredMessages idx2005="True" idx4055="True" idx5028="True"/>
<IgnoredMessages idx5028="True" idx4055="True" idx2005="True"/>
</CompilerMessages>
<CustomOptions Value="$(IDEBuildOptions)
-dDisableWrapperFunctions"/>
<CompilerPath Value="$(CompPath)"/>
</Other>
</CompilerOptions>
<Description Value="laz_fpspreadsheet is a non-visual component that allows you to use the fpspreadsheet package to read/write spreadsheet files in .xls (BIFF/Excel), .ods OpenDocument (LibreOffice/OpenOffice) and .xlsx Open XML (Excel) formats.
@ -52,7 +51,6 @@ This package is all you need if you don't want graphical components (like grids
</Item4>
<Item5>
<Filename Value="common\fpscell.pas"/>
<AddToUsesPkgSection Value="False"/>
<UnitName Value="fpsCell"/>
</Item5>
<Item6>