I need help - I can help - PDFLibrary1811 and Delphi 11

Print Page | Close Window

PDFLibrary1811 and Delphi 11

Printed From: Debenu Quick PDF Library - PDF SDK Community Forum
Category: For Users of the Library
Forum Name: I need help - I can help
Forum Description: Problems and solutions while programming with the Debenu Quick PDF Library and Debenu PDF Viewer SDK
URL: http://www.quickpdf.org/forum/forum_posts.asp?TID=3993
Printed Date: 01 May 24 at 11:05PM
Software Version: Web Wiz Forums 11.01 - http://www.webwizforums.com

Topic: PDFLibrary1811 and Delphi 11

Posted By: sko
Subject: PDFLibrary1811 and Delphi 11
Date Posted: 14 Sep 22 at 9:49AM

Hi,

i have updated from Delphi 10.4.2 to Delphi 11.2 and now i get a message

{$IFDEF MSWINDOWS}

DebenuPDFLibrary1811,

{$ENDIF}

DebenuPDFLibrary1811 can not be compiled!

What can i do?

Ciao
Stefan

Replies:

Posted By: Ingo
Date Posted: 14 Sep 22 at 9:48PM

I think you have to make some changes in DebenuPDFLibraryDefines.inc?
Here's the content:
{$IFDEF MSWINDOWS}
{$DEFINE QPL_OS_WINDOWS}
{$ENDIF}

// Delphi 4
{$IFDEF VER120}
{$DEFINE QPL_OS_WINDOWS}
{$DEFINE QPL_NOINLINE}
{$DEFINE QPL_NOSAMEVALUE}
{$DEFINE QPL_D4_TO_D6}
{$ENDIF}

// Delphi 5
{$IFDEF VER130}
{$DEFINE QPL_OS_WINDOWS}
{$DEFINE QPL_NOINLINE}
{$DEFINE QPL_NOSAMEVALUE}
{$DEFINE QPL_D4_TO_D6}
{$ENDIF}

// Delphi 6
{$IFDEF VER140}
{$DEFINE QPL_NOINLINE}
{$DEFINE QPL_D4_TO_D6}
{$ENDIF}

// Delphi 7
{$IFDEF VER150}
{$DEFINE QPL_NOINLINE}
{$ENDIF}

// Delphi 2005
{$IFDEF VER170}
{$DEFINE QPL_NOINLINE}
{$ENDIF}

// Delphi XE2
{$IFDEF VER230}
{$DEFINE QPL_XE2_HIGHER}
{$ENDIF}

// Delphi XE3
{$IFDEF VER240}
{$DEFINE QPL_XE2_HIGHER}
{$DEFINE QPL_XE3_HIGHER}
{$ENDIF}

// Delphi XE4 and higher
{$IFDEF CONDITIONALEXPRESSIONS}
{$IF CompilerVersion >= 25}
{$DEFINE QPL_XE2_HIGHER}
{$DEFINE QPL_XE3_HIGHER}
{$DEFINE QPL_XE4_HIGHER}
{$IFEND}
{$IF CompilerVersion >= 32}
{$DEFINE QPL_TOKYO_HIGHER}
{$IFEND}
{$IF CompilerVersion = 33}
{$IFDEF WIN32}
{$DEFINE QPL_RIO_FIX}
{$ENDIF}
{$IFDEF MACOS}
{$DEFINE QPL_RIO_FIX}
{$ENDIF}
{$IFEND}
{$ENDIF}

{$IFDEF QPL_OS_WINDOWS}
{$DEFINE QPL_MD5_CRYPTOAPI}
{$DEFINE QPL_CAIRO}
{$DEFINE QPL_DPLR}
{$DEFINE QPL_PDFIUM}
{$IFDEF QPL_XE2_HIGHER}
{$DEFINE QPL_PDFIUM_EXCEPTION_MASK}
{$ENDIF}
{$DEFINE QPL_OPENSSL}
{$DEFINE QPL_TIMESTAMP_CRYPTOAPI}
{$DEFINE QPL_CHAIN_CRYPTOAPI}
{$ENDIF}

{$IFDEF MACOS}
{$DEFINE QPL_OS_MAC}
{$DEFINE QPL_NOVCL}
{$DEFINE QPL_MD5_MAC}
{$ENDIF}

{$IFDEF FPC}
{$DEFINE QPL_NOVCL}
{$DEFINE QPL_NOCRYPTAPI}
{$IFNDEF QPL_OS_WINDOWS}
{$DEFINE QPL_MD5_FPC}
{$ENDIF}
{$ENDIF}

{$IFDEF QPL_FIREMONKEY}
{$DEFINE QPL_NOVCL}
{$ENDIF}

{$IFDEF QPL_CPP}
{$DEFINE QPL_NOVCL}
{$UNDEF QPL_OS_WINDOWS}
{$UNDEF QPL_CAIRO}
{$UNDEF QPL_DPLR}
{$ENDIF}

// Vulnerability fixes
{$DEFINE QPL_VBF_201800001}
{$DEFINE QPL_VBF_201800002}
{$DEFINE QPL_VBF_201800003}
{$DEFINE QPL_VBF_201800004}

{$IFDEF WIN64}
{$DEFINE QPL_WIN64_OR_MACOS64}
{$ENDIF}
{$IFDEF MACOS64}
{$DEFINE QPL_WIN64_OR_MACOS64}
{$ENDIF}

-------------
Cheers,
Ingo

Posted By: sko
Date Posted: 15 Sep 22 at 7:31AM

i have no DebenuPDFLibraryDefines.inc :-(

In the DebenuPDFLibrary1811Delphi10.4SydneyWin32 directory i only find DebenuPDFLibrary.pas and many .dcu files!

Ciao
Stefan

Posted By: tfrost
Date Posted: 16 Sep 22 at 1:20PM

If you have only the one source file, and lots of DCUs which worked with Delphi 10, that implies that you do not have the source code version of QPDF. Delphi DCU files are not compatible across Delphi major versions, so you cannot use these with Delphi 11, as you found. The IDE knows that the DCUs are an old version, so looks instead for their source code. Editing the INC file mentioned by Ingo is only possible if you have the source code version of QPDF.

Your only solution for using QPDF with Delphi 11 is to try to purchase either an upgrade to QPDF 1822, or the QPDF source version, neither of which actions may now be possible. See the thread "Quick PDF End of Life" in this forum for details of how others here have managed to do this, but unfortunately you may be out of luck by now.