PowerPDF: version 0.9.17

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@9374 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
jesusr 2024-07-02 10:09:55 +00:00
parent 9de9860fb3
commit 97d83f67b2
6 changed files with 4872 additions and 4496 deletions

View File

@ -1,31 +1,36 @@
<?xml version="1.0"?>
<?xml version="1.0" encoding="UTF-8"?>
<CONFIG>
<ProjectOptions>
<Version Value="12"/>
<PathDelim Value="\"/>
<Version Value="6"/>
<General>
<Flags>
<MainUnitHasUsesSectionForAllUnits Value="False"/>
<MainUnitHasCreateFormStatements Value="False"/>
<MainUnitHasTitleStatement Value="False"/>
<LRSInOutputDirectory Value="False"/>
<CompatibilityMode Value="True"/>
</Flags>
<MainUnit Value="0"/>
<IconPath Value="./"/>
<TargetFileExt Value=".exe"/>
<ActiveEditorIndexAtStart Value="0"/>
</General>
<BuildModes Count="1">
<Item1 Name="default" Default="True"/>
</BuildModes>
<PublishOptions>
<Version Value="2"/>
<DestinationDirectory Value="$(TestDir)\publishedproject\"/>
<IgnoreBinaries Value="False"/>
<IncludeFileFilter Value="*.(pas|pp|inc|lfm|lpr|lrs|lpi|lpk|sh|xml)"/>
<ExcludeFileFilter Value="*.(bak|ppu|ppw|o|so);*~;backup"/>
</PublishOptions>
<RunParams>
<local>
<FormatVersion Value="1"/>
<LaunchingApplication PathPlusParams="\usr\X11R6\bin\xterm -T 'Lazarus Run Output' -e $(LazarusDir)\tools\runwait.sh $(TargetCmdLine)"/>
<LaunchingApplication PathPlusParams="\usr\X11R6\bin\xterm -T &apos;Lazarus Run Output&apos; -e $(LazarusDir)\tools\runwait.sh $(TargetCmdLine)"/>
</local>
<FormatVersion Value="2"/>
<Modes Count="1">
<Mode0 Name="default">
<local>
<LaunchingApplication PathPlusParams="\usr\X11R6\bin\xterm -T &apos;Lazarus Run Output&apos; -e $(LazarusDir)\tools\runwait.sh $(TargetCmdLine)"/>
</local>
</Mode0>
</Modes>
</RunParams>
<RequiredPackages Count="2">
<Item1>
@ -35,80 +40,125 @@
<PackageName Value="LCL"/>
</Item2>
</RequiredPackages>
<Units Count="7">
<Units Count="9">
<Unit0>
<Filename Value="MakeDoc.lpr"/>
<IsPartOfProject Value="True"/>
<CursorPos X="31" Y="8"/>
<TopLine Value="1"/>
<UsageCount Value="38"/>
<UsageCount Value="39"/>
</Unit0>
<Unit1>
<Filename Value="UMakeDoc.pas"/>
<IsPartOfProject Value="True"/>
<ComponentName Value="Form1"/>
<HasResources Value="True"/>
<IsPartOfProject Value="True"/>
<ResourceFilename Value="UMakeDoc.lrs"/>
<UnitName Value="UMakeDoc"/>
<CursorPos X="27" Y="508"/>
<TopLine Value="501"/>
<EditorIndex Value="0"/>
<UsageCount Value="20"/>
<ResourceBaseClass Value="Form"/>
<IsVisibleTab Value="True"/>
<TopLine Value="898"/>
<CursorPos X="59" Y="902"/>
<UsageCount Value="21"/>
<Loaded Value="True"/>
<LoadedDesigner Value="True"/>
</Unit1>
<Unit2>
<Filename Value="C:\Work\FreePascal\Lazarus\PowerPdf\PReport.pas"/>
<UnitName Value="PReport"/>
<CursorPos X="16" Y="1274"/>
<TopLine Value="1260"/>
<CursorPos X="16" Y="1274"/>
<UsageCount Value="8"/>
</Unit2>
<Unit3>
<Filename Value="home\prog\work\PowerPDF\PReport.pas"/>
<UnitName Value="PReport"/>
<CursorPos X="48" Y="1339"/>
<TopLine Value="1318"/>
<CursorPos X="48" Y="1339"/>
<UsageCount Value="18"/>
</Unit3>
<Unit4>
<Filename Value="home\prog\fpc\rtl\objpas\classes\classesh.inc"/>
<CursorPos X="29" Y="1253"/>
<TopLine Value="1235"/>
<CursorPos X="29" Y="1253"/>
<UsageCount Value="18"/>
</Unit4>
<Unit5>
<Filename Value="UMakeDoc.lfm"/>
<CursorPos X="22" Y="177"/>
<TopLine Value="173"/>
<UsageCount Value="10"/>
<CursorPos X="22" Y="177"/>
<SyntaxHighlighter Value="LFM"/>
<UsageCount Value="10"/>
</Unit5>
<Unit6>
<Filename Value="..\..\PReport.pas"/>
<UnitName Value="PReport"/>
<CursorPos X="9" Y="1310"/>
<TopLine Value="1286"/>
<EditorIndex Value="2"/>
<TopLine Value="531"/>
<CursorPos X="14" Y="541"/>
<UsageCount Value="10"/>
<SyntaxHighlighter Value="Delphi"/>
<Loaded Value="True"/>
<DefaultSyntaxHighlighter Value="Delphi"/>
</Unit6>
<Unit7>
<Filename Value="..\..\PRAnnotation.pas"/>
<EditorIndex Value="1"/>
<TopLine Value="59"/>
<CursorPos X="21" Y="75"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
<DefaultSyntaxHighlighter Value="Delphi"/>
</Unit7>
<Unit8>
<Filename Value="..\..\PdfDoc.pas"/>
<EditorIndex Value="3"/>
<TopLine Value="217"/>
<CursorPos X="3" Y="220"/>
<UsageCount Value="10"/>
<Loaded Value="True"/>
<DefaultSyntaxHighlighter Value="Delphi"/>
</Unit8>
</Units>
<JumpHistory Count="2" HistoryIndex="1">
<JumpHistory Count="8" HistoryIndex="4">
<Position1>
<Filename Value="UMakeDoc.pas"/>
<Caret Line="28" Column="31" TopLine="193"/>
<Caret Line="517" Column="26" TopLine="501"/>
</Position1>
<Position2>
<Filename Value="UMakeDoc.pas"/>
<Caret Line="517" Column="26" TopLine="501"/>
<Caret Line="647" Column="30" TopLine="630"/>
</Position2>
<Position3>
<Filename Value="UMakeDoc.pas"/>
<Caret Line="903" Column="27" TopLine="899"/>
</Position3>
<Position4>
<Filename Value="..\..\PRAnnotation.pas"/>
<Caret Line="71" Column="14" TopLine="60"/>
</Position4>
<Position5>
<Filename Value="UMakeDoc.pas"/>
<Caret Line="903" Column="31" TopLine="899"/>
</Position5>
<Position6>
<Filename Value="..\..\PReport.pas"/>
<Caret Line="541" Column="14" TopLine="530"/>
</Position6>
<Position7>
<Filename Value="..\..\PReport.pas"/>
<Caret Line="106" Column="3" TopLine="93"/>
</Position7>
<Position8>
<Filename Value="..\..\PdfDoc.pas"/>
<Caret Line="220" Column="3" TopLine="217"/>
</Position8>
</JumpHistory>
</ProjectOptions>
<CompilerOptions>
<Version Value="8"/>
<Version Value="11"/>
<PathDelim Value="\"/>
<SearchPaths>
<SrcPath Value="$(LazarusDir)\lcl\;$(LazarusDir)\lcl\interfaces\$(LCLWidgetType)\"/>
<SrcPath Value="$(LazarusDir)\lcl;$(LazarusDir)\lcl\interfaces\$(LCLWidgetType)"/>
</SearchPaths>
<Parsing>
<SyntaxOptions>
<UseAnsiStrings Value="False"/>
</SyntaxOptions>
</Parsing>
<Linking>
<Options>
<Win32>
@ -116,9 +166,6 @@
</Win32>
</Options>
</Linking>
<Other>
<CompilerPath Value="$(CompPath)"/>
</Other>
</CompilerOptions>
<Debugging>
<Exceptions Count="2">

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

View File

@ -649,7 +649,6 @@ type
procedure PRGridPanel1BeforePrintChild(Sender: TObject;
ACanvas: TPRCanvas; ACol, ARow: Integer; Rect: TRect);
procedure CoverPagePrintPage(Sender: TObject; ACanvas: TPRCanvas);
procedure PageControl1Change(Sender: TObject);
private
FCurrentOutline: array[0..5] of TPROutlineEntry;
FContentsList: TList;
@ -900,6 +899,7 @@ end;
procedure TForm1.FormCreate(Sender: TObject);
begin
FContentsList := TList.Create;
PRAnnotation1.Action.URI := 'http://www.lazarus-ide.org';
end;
procedure TForm1.FormDestroy(Sender: TObject);
@ -957,11 +957,6 @@ begin
end;
end;
procedure TForm1.PageControl1Change(Sender: TObject);
begin
end;
function TForm1.FindLink(AItem: TPRItem): TContentsElement;
var
i: integer;

View File

@ -58,7 +58,7 @@ type
{$ENDIF}
procedure Paint; override;
procedure Print(ACanvas: TPRCanvas; ARect: TRect); override;
procedure SetAction(aValue: TPRAction); virtual;
procedure SetAction(aValue: TPRAction); virtual; reintroduce;
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;

View File

@ -5,6 +5,7 @@
<Name Value="pack_powerpdf"/>
<Type Value="RunAndDesignTime"/>
<AddToProjectUsesSection Value="True"/>
<Author Value="Takeshi Kanno"/>
<CompilerOptions>
<Version Value="11"/>
<PathDelim Value="\"/>
@ -21,7 +22,22 @@
<CustomOptions Value="-dLAZ_POWERPDF"/>
</Other>
</CompilerOptions>
<Version Minor="9" Release="16"/>
<Description Value="PowerPdf is a LCL library to create PDF docment visually. Like QuickReport, you can
design PDF document easily on Delphi IDE.
"/>
<License Value="Copyright (C) 1999-2001 Takeshi Kanno
This library is free software; you can redistribute it and/or modify it
under the terms of the GNU Library General Public License as published
by the Free Software Foundation; either version 2 of the License, or any
later version.
This library is distributed in the hope that it will be useful, but WITHOUT
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
FOR A PARTICULAR PURPOSE. See the GNU Library general Public License for more
details.
"/>
<Version Minor="9" Release="17"/>
<Files Count="13">
<Item1>
<Filename Value="PdfTypes.pas"/>