Update SynEdit component to latest sources from their master branch

components/synedit/Readme.md

@@ -1,7 +1,7 @@
 SynEdit
 =======
 
-This is a fork of the Unicode version of SynEdit hosted ad SourceForge. When it became more and more difficult to maintain, Eric Grange decided to fork this project on GitHub. This way it's possible to fork, merge and maintain easier than before.
+This is a fork of the Unicode version of SynEdit hosted at SourceForge. When it became more and more difficult to maintain, Eric Grange decided to fork this project on GitHub. This way it's possible to fork, merge and maintain easier than before.
 
 The original project (with the original readme.txt file) is located here:
 
@@ -23,4 +23,4 @@ There would however be no such project if Martin had not started to develop mwEd
 
 Misc.
 -----
-Delphinus support added
+Delphinus support added

components/synedit/Source/SynEdit.inc

@@ -711,6 +711,34 @@
   {$DEFINE SYN_COMPILER_25_UP}
 {$ENDIF}
 
+{$IFDEF SYN_COMPILER_26}
+  {$DEFINE SYN_COMPILER_1_UP}
+  {$DEFINE SYN_COMPILER_2_UP}
+  {$DEFINE SYN_COMPILER_3_UP}
+  {$DEFINE SYN_COMPILER_4_UP}
+  {$DEFINE SYN_COMPILER_5_UP}
+  {$DEFINE SYN_COMPILER_6_UP}
+  {$DEFINE SYN_COMPILER_7_UP}
+  {$DEFINE SYN_COMPILER_8_UP}
+  {$DEFINE SYN_COMPILER_9_UP}
+  {$DEFINE SYN_COMPILER_10_UP}
+  {$DEFINE SYN_COMPILER_11_UP}
+  {$DEFINE SYN_COMPILER_12_UP}
+  {$DEFINE SYN_COMPILER_14_UP}
+  {$DEFINE SYN_COMPILER_15_UP}
+  {$DEFINE SYN_COMPILER_16_UP}
+  {$DEFINE SYN_COMPILER_17_UP}
+  {$DEFINE SYN_COMPILER_18_UP}
+  {$DEFINE SYN_COMPILER_19_UP}
+  {$DEFINE SYN_COMPILER_20_UP}
+  {$DEFINE SYN_COMPILER_21_UP}
+  {$DEFINE SYN_COMPILER_22_UP}
+  {$DEFINE SYN_COMPILER_23_UP}
+  {$DEFINE SYN_COMPILER_24_UP}
+  {$DEFINE SYN_COMPILER_25_UP}
+  {$DEFINE SYN_COMPILER_26_UP}
+{$ENDIF}
+
 
 {$IFDEF SYN_DELPHI_2}
   {$DEFINE SYN_DELPHI_2_UP}
@@ -1146,7 +1174,7 @@
 {$ENDIF}
 
 // Code Folding
-{$IFDEF SYN_DELPHI_XE3_UP}
+{$IFDEF SYN_DELPHI_XE_UP}
   {$DEFINE SYN_CodeFolding}
 {$ENDIF}
 

components/synedit/Source/SynEditCodeFolding.pas

@@ -106,16 +106,28 @@ unit SynEditCodeFolding;
 }
 interface
 
+{$I SynEdit.Inc}
+
 uses
   Graphics,
   Types,
   Classes,
   SysUtils,
-  System.Generics.Defaults,
-  System.Generics.Collections,
+  Generics.Defaults,
+  Generics.Collections,
   SynEditHighlighter;
 
 type
+{$IFNDEF SYN_DELPHI_XE3_UP}
+  // use small hack in XE and XE2 to make internal array accessible as in XE3 and up
+  TList<T> = class(Generics.Collections.TList<T>)
+  private
+    function GetList: TArray<T>;
+  public
+    property List: TArray<T> read GetList;
+  end;
+{$ENDIF}
+
   // Custom COde Folding Exception
   TSynCodeFoldingException = class(Exception)
   end;
@@ -165,6 +177,7 @@ type
           AFoldOpenClose : TFoldOpenClose = focOpen;
           AFoldType : Integer = 1; AIndent : Integer = -1);
       end;
+
   private
     fCodeFoldingMode : TSynCodeFoldingMode;
     fRangesNeedFixing : Boolean;
@@ -295,9 +308,18 @@ type
 
 implementation
 
-Uses
+uses
   SynEditTextBuffer,
-  System.Math;
+  Math;
+
+{$IFNDEF SYN_DELPHI_XE3_UP}
+function TList<T>.GetList: TArray<T>;
+begin
+  // use bug that existed in XE and XE2 that made
+  // it possible to access private members from parent class
+  Result := TArray<T>(FItems);
+end;
+{$ENDIF}
 
 { TSynEditFoldRanges }
 
@@ -1064,5 +1086,4 @@ begin
   end;
 end;
 
-
 end.