diff options
author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2012-04-10 16:35:56 +0200 |
---|---|---|
committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2012-04-10 16:35:56 +0200 |
commit | 4dcc5c3f72bd071cf95f7fbf23143fb3d1621e67 (patch) | |
tree | 8b3266544891ce71564f5667ae59ab7f955fbc10 /extras/contributed/report_tool/reportengine/u_pdf.pas | |
parent | 9e3731f6e275702740f3b8c0ebaa602c0cad510b (diff) | |
download | fpGUI-4dcc5c3f72bd071cf95f7fbf23143fb3d1621e67.tar.xz |
pdf: removes two compiler warnings about unused variables.
Diffstat (limited to 'extras/contributed/report_tool/reportengine/u_pdf.pas')
-rw-r--r-- | extras/contributed/report_tool/reportengine/u_pdf.pas | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/extras/contributed/report_tool/reportengine/u_pdf.pas b/extras/contributed/report_tool/reportengine/u_pdf.pas index 25a89e97..59f6d606 100644 --- a/extras/contributed/report_tool/reportengine/u_pdf.pas +++ b/extras/contributed/report_tool/reportengine/u_pdf.pas @@ -1067,10 +1067,8 @@ end; procedure TPdfDocument.WriteObjet(const AObjet: Integer; const AFlux: TStream); var - Dictionaire: TPdfDictionary; Long: TPdfInteger; Flux: TMemoryStream; - Cpt: Integer; begin WriteChaine(IntToStr(AObjet)+' 0 obj'+CRLF,AFlux); if TPdfXRef(FXRefObjets[AObjet]).FStream= nil |