commit 4f5229e4a7cb49eb376021be586019d8dc325299
author Nick <homolibere@gmail.com> Thu Apr 14 16:43:22 2016 +0300
committer Jens Geyer <jensg@apache.org> Thu Apr 14 23:20:16 2016 +0200
tree e70936e71d7d0c5069e4703e0b939958e7dda6bd
parent 3ca89e60d231f1f466232599b7138536f401845b

THRIFT-3788 Compatibility improvements and Win64 support
Client: Delphi
Patch: Nick Homolibere

Tested on XE, XE5, XE8, XE10

This closes #987

lib/delphi/src/Thrift.Serializer.pas

diff --git a/lib/delphi/src/Thrift.Serializer.pas b/lib/delphi/src/Thrift.Serializer.pas
index cf646c8..b4d6e6d 100644
--- a/lib/delphi/src/Thrift.Serializer.pas
+++ b/lib/delphi/src/Thrift.Serializer.pas
@@ -18,10 +18,18 @@
  *)
 unit Thrift.Serializer;
 
+{$IF CompilerVersion >= 23.0}
+  {$LEGACYIFEND ON}
+{$IFEND}
+
 interface
 
 uses
-  Classes, Windows, SysUtils,
+  {$IF CompilerVersion < 23.0}
+    Classes, Windows, SysUtils,
+  {$ELSE}
+    System.Classes, Winapi.Windows, System.SysUtils,
+  {$IFEND}
   Thrift.Protocol,
   Thrift.Transport,
   Thrift.Stream;