[patch_done] Patch for Delphi XE compatibility

cariad · Post by **cariad** » 08.09.2010, 15:21

Hello,

Here's a little patch (against trunk ver800) to support Delphi XE. The components aren't converted but the modest test suite we use in-house runs without problem.

Post by **mdaems** » 08.09.2010, 21:47

This one is harmless for Delphi versions before XE, so I did commit.
SVN Rev 812

Mark

sir.wally.lewis · Post by **sir.wally.lewis** » 13.09.2010, 04:24

How do I get this version of ZeosLib?

sir.wally.lewis · Post by **sir.wally.lewis** » 13.09.2010, 06:42

After much stuffing around i found out that using subversion i can get this version at svn://zeos.firmos.at/zeos/branches/testing it also compiles under Delphi XE! We should be using Delphi15 for DelphiXE and not modifying Delphi14

Post by **mdaems** » 19.09.2010, 21:42

sir.wally.lewis,

I fully agree. Now it's up to some XE user to provide de new packages.
The patch above is just making the changes to the real code and should be done anyway.

Mark

sir.wally.lewis · Post by **sir.wally.lewis** » 28.09.2010, 02:12

Hi Mark,
We will be purchasing Delphi XE this week.
What can I do to get these changes into the main branch of zeoslib?

joanmvf · Post by **joanmvf** » 11.10.2010, 02:15

Im trying to compile on delphi XE but im getting 3 error like this one....

[DCC Error] ZSysUtils.pas(454): E2010 Incompatible types: 'PAnsiChar' and 'PWideChar'

Marius2 · Post by **Marius2** » 12.10.2010, 10:39

joanmvf wrote:Im trying to compile on delphi XE but im getting 3 error like this one....

[DCC Error] ZSysUtils.pas(454): E2010 Incompatible types: 'PAnsiChar' and 'PWideChar'

Check the zeos.inc and look for "{$IFDEF VER220}". If its not there a lot of ifdefs go wrong during compilation. Copying the delphi 2010 210 and adjusting it a bit solves a lot of these compiler issues. i think you can also find some patches for it (not sure if its already in svn)

merovingio · Post by **merovingio** » 07.11.2011, 08:29

I add at file Zeos.inc, is Rigth?.

// Compilation directives for Delphi XE2
{$IFDEF VER230}
{$DEFINE VER220BELOW}
{$DEFINE DELPHI14}
{$DEFINE DELPHI9_UP}
{$DEFINE DELPHI10_UP}
{$DEFINE DELPHI12_UP}
{$DEFINE DELPHI14_UP}
{$DEFINE DELPHI15_UP}
{$DEFINE BDS}
{$DEFINE BDS7}
{$DEFINE BDS4_UP}
{$DEFINE BDS5_UP}
{$DEFINE BDS7_UP}
{$ENDIF}

bernhard · Post by **bernhard** » 07.11.2011, 11:36

my inc file part

// Compilation directives for Delphi XE2
{$IFDEF VER230}
{$DEFINE VER200BELOW}
{$DEFINE DELPHI14}
{$DEFINE DELPHI9_UP}
{$DEFINE DELPHI10_UP}
{$DEFINE DELPHI12_UP}
{$DEFINE DELPHI14_UP}
{$DEFINE DELPHI15_UP}
{$DEFINE DELPHI16_UP}
{$DEFINE BDS}
{$DEFINE BDS7}
{$DEFINE BDS8} // EDS8 ?
{$DEFINE BDS4_UP}
{$DEFINE BDS5_UP}
{$DEFINE BDS7_UP}
{$DEFINE BDS8_UP}
{$ENDIF}