projects:

* Fixed Delphi XE5 compilation error in use of $IFEND compiler directive by including suitable $LEGACYIFEND directives for compilers that support it. This fix applies to all main project units along with some demo project files and units.

git-svn-id: https://svn.code.sf.net/p/ddablib/code/trunk@1515 eed78412-d13c-44e9-9ac7-ca5071eb296d

PJStringPE.pas

@@ -3,7 +3,7 @@
  * v. 2.0. If a copy of the MPL was not distributed with this file, You can
  * obtain one at http://mozilla.org/MPL/2.0/
  *
- * Copyright (C) 2004-2013, Peter Johnson (www.delphidabbler.com).
+ * Copyright (C) 2004-2014, Peter Johnson (www.delphidabbler.com).
  *
  * $Rev$
  * $Date$
@@ -22,14 +22,15 @@ interface
 
 // Requires Delphi 6 or later
 
-{$IF CompilerVersion >= 15.0} // Delphi 7 and later
-  {$WARN UNSAFE_CODE OFF}
+{$IF CompilerVersion >= 24.0} // Delphi XE3 and later
+  {$LEGACYIFEND ON}  // NOTE: this must come before all $IFEND directives
+  {$DEFINE TScrollStyleMoved}
 {$IFEND}
-{$IF CompilerVersion >= 23.0} // Delphi XE2
+{$IF CompilerVersion >= 23.0} // Delphi XE2 and later
   {$DEFINE RTLNameSpaces}
 {$IFEND}
-{$IF CompilerVersion >= 24.0} // Delphi XE3
-  {$DEFINE TScrollStyleMoved}
+{$IF CompilerVersion >= 15.0} // Delphi 7 and later
+  {$WARN UNSAFE_CODE OFF}
 {$IFEND}