Fixed nested comments issue.

Projects/Simba/simbaunit.lfm

@@ -3090,7 +3090,24 @@ object SimbaForm: TSimbaForm
     left = 488
     top = 200
   end
-  object LazHighlighter: TSynFreePascalSyn
+  object FunctionListTimer: TTimer
+    Interval = 750
+    OnTimer = FunctionListTimerTimer
+    left = 608
+    top = 200
+  end
+  object SCARHighlighter: TSynPasSyn
+    Enabled = False
+    CommentAttri.Foreground = clGreen
+    CommentAttri.Style = []
+    NumberAttri.Foreground = clNavy
+    StringAttri.Foreground = clFuchsia
+    CompilerMode = pcmObjFPC
+    NestedComments = False
+    left = 568
+    top = 200
+  end
+  object LazHighlighter: TSynPasSyn
     Enabled = False
     CommentAttri.Foreground = clBlue
     CommentAttri.Style = [fsBold]
@@ -3106,21 +3123,4 @@ object SimbaForm: TSimbaForm
     left = 528
     top = 200
   end
-  object SCARHighlighter: TSynFreePascalSyn
-    Enabled = False
-    CommentAttri.Foreground = clGreen
-    CommentAttri.Style = []
-    NumberAttri.Foreground = clHotLight
-    StringAttri.Foreground = clFuchsia
-    CompilerMode = pcmObjFPC
-    NestedComments = False
-    left = 568
-    top = 200
-  end
-  object FunctionListTimer: TTimer
-    Interval = 750
-    OnTimer = FunctionListTimerTimer
-    left = 608
-    top = 200
-  end
 end

Projects/Simba/simbaunit.pas

@@ -96,9 +96,9 @@ type
     ActionTabNext: TAction;
     ActionList: TActionList;
     CheckBoxMatchCase: TCheckBox;
-    LazHighlighter: TSynFreePascalSyn;
     frmFunctionList: TFunctionListFrame;
     LabeledEditSearch: TLabeledEdit;
+    LazHighlighter: TSynPasSyn;
     MainMenu: TMainMenu;
     Memo1: TMemo;
     MenuFile: TMenuItem;
@@ -118,8 +118,8 @@ type
     MenuItemDivider9: TMenuItem;
     MouseTimer: TTimer;
     NewsTimer: TTimer;
-    SCARHighlighter: TSynFreePascalSyn;
     FunctionListTimer: TTimer;
+    SCARHighlighter: TSynPasSyn;
     TT_Console: TToolButton;
     TT_Cut: TToolButton;
     TT_Copy: TToolButton;
@@ -2097,7 +2097,6 @@ begin
   //AutoCompletionStart := Point(-1, -1);
   CodeCompletionForm := TAutoCompletePopup.Create(Self);
   CodeCompletionForm.InsertProc := @OnCompleteCode;
-
   ParamHint := TParamHint.Create(self);
 
   {$ifdef MSWindows}