Installing the Zeos 7.2 Alphatest Delphi XE6

[dieletro]

I managed to compile Zeos 7.2 Alphatest in Delphi XE6.
Postby dieletro » 22.04.2014, 07:51

Friends developers, I believe this is my first collaboration in this forum.

I managed to compile Zeos 7.2 Alphatest in Delphi XE6.
I made the following changes:

• 1 - I created another policy for the XE6 Zeos.inc file:

  • Code: Select all

    { $IFDEF VER270 } / / Compilation directives for Delphi XE6 - By dieletro
      { $DEFINE VER200BELOW } / / Used in code
      { $DEFINE DELPHI12_UP } / / Used in code
      { $DEFINE DELPHI14_UP } / / Egonhugeist used in my code
      { $DEFINE DELPHI15_UP } / / Used only in zeos.inc
      { $DEFINE DELPHI16_UP } / / Used in code
      { $DEFINE DELPHI17_UP } / / Used in code
      { $DEFINE DELPHI18_UP } / / Used in code
      { $DEFINE DELPHI19_UP}
      { $DEFINE DELPHI20_UP} //Delphi XE6 //By dieletro
      { $DEFINE BDS4_UP } / / Used in code
      { $DEFINE BDS5_UP } / / Used in code
    { $ENDIF }
    

  2 - I changed the line 4906 of file ZFastCode ZCore package where:
  • this policy was different from that stated in the policy and Zeos.inc already been corrected writing.

  • Code: Select all

    WITH_FORMATSETTINGS

  
  
  
  3 - I declared this varialvel within a policy not to imply the compatibility from earlier versions, the procedure TZAbstractRODataset.CheckFieldCompatibility (Field: TField; FieldDef: TFieldDef) modules; ZAbstractRODataset.pas the file ZComponente package.

  Code: Select all

  { $IFDEF VER270} / / By dieletro
  Var BaseFieldTypes : array [ TFieldType ] of TFieldType ;
  { $ENDIF VER270}
  

  4 - Still in the same previous file includes the following constants in the Policy Compilation:

  Code: Select all

  { $IFDEF VER270 } / / Delphi XE6 / / By dieletro
    BaseFieldTypes : array [ TFieldType ] of TFieldType = (
      ftUnknown , ftString , ftSmallint , ftInteger , ftWord , ftBoolean , ftFloat ,
      ftCurrency , ftBCD , ftDate , ftTime , ftDateTime , ftBytes , ftVarBytes , ftAutoInc ,
      ftBlob , ftMemo , ftGraphic , ftFmtMemo , ftParadoxOle , ftDBaseOle , ftTypedBinary ,
      ftCursor , ftFixedChar , ftWideString , ftLargeint , ftADT , ftArray , ftReference ,
      ftDataSet , ftOraBlob , ftOraClob , ftVariant , ftInterface , ftIDispatch , ftGuid ,
      ftTimeStamp , ftFMTBcd , ftFixedWideChar , ftWideMemo , ftOraTimeStamp , ftOraInterval ,
      ftLongWord , ftShortint , ftByte , ftExtended , ftConnection , ftParams , ftStream ,
      ftTimeStampOffset , ftObject , ftSingle );
  { $ELSE !VER270}
  { $ENDIF VER270}
  

  5 -Change

  Code: Select all

   {$LIBSUFFIX  '190 '}

  • changed of all the packages for

    Code: Select all

    {$LIBSUFFIX '200'}

If anyone is interested in picking up the files have changed al follows:

By dieletro
E-mail: diegolacerdamenezes@gmail.com

[dieletro]

I'm sorry but I could not send the file has changed before, follows the download link with the changes:
Zeos 7.2 AlphaTest for Delphi XE6...
https://mega.co.nz/#!UNpQWLbS!k9BN4IJwB ... -YftHRY-v8

[miab3]

@dieletro,

It is a pity you did not use the current Zeos 7.2 revision, I mean r3119(3116):
http://svn.code.sf.net/p/zeoslib/code-0 ... sting-7.2/

Michal

[dieletro]

I will use it now, ok, thanks for the tip!