Merged revision(s) 52009 #cadda54bee from trunk:

SynEdit, Examples: fix syn hl example / register attributes
........

git-svn-id: branches/fixes_1_6@52013 -

examples/SynEdit/NewHighlighterTutorial/HighlighterTutorial.lpi

@@ -1,4 +1,4 @@
-<?xml version="1.0"?>
+<?xml version="1.0" encoding="UTF-8"?>
 <CONFIG>
   <ProjectOptions>
     <Version Value="9"/>
@@ -42,7 +42,6 @@
       <Unit0>
         <Filename Value="HighlighterTutorial.lpr"/>
         <IsPartOfProject Value="True"/>
-        <UnitName Value="HighlighterTutorial"/>
       </Unit0>
       <Unit1>
         <Filename Value="unit1.pas"/>
@@ -92,12 +91,6 @@
         <UseHeaptrc Value="True"/>
       </Debugging>
     </Linking>
-    <Other>
-      <CompilerMessages>
-        <UseMsgFile Value="True"/>
-      </CompilerMessages>
-      <CompilerPath Value="$(CompPath)"/>
-    </Other>
   </CompilerOptions>
   <Debugging>
     <Exceptions Count="3">

examples/SynEdit/NewHighlighterTutorial/foldhl.pas

@@ -169,6 +169,9 @@ begin
   AddAttribute(fSpaceAttri);
   fSpaceAttri.FrameColor := clSilver;
   fSpaceAttri.FrameEdges := sfeAround;
+
+  // Ensure the HL reacts to changes in the attributes. Do this once, if all attributes are created
+  SetAttributesOnChange(@DefHighlightChange);
 end;
 
 (* Setters for attributes / This allows using in Object inspector*)

examples/SynEdit/NewHighlighterTutorial/simplehl.pas

@@ -119,6 +119,9 @@ begin
   AddAttribute(fSpaceAttri);
   fSpaceAttri.FrameColor := clSilver;
   fSpaceAttri.FrameEdges := sfeAround;
+
+  // Ensure the HL reacts to changes in the attributes. Do this once, if all attributes are created
+  SetAttributesOnChange(@DefHighlightChange);
 end;
 
 (* Setters for attributes / This allows using in Object inspector*)