Added default case-statement highlighting to the Laz-color scheme. (You'd need the latest LCL for this).

Projects/Simba/simbaunit.lfm

@@ -1,7 +1,7 @@
 object SimbaForm: TSimbaForm
-  Left = 143
+  Left = 483
   Height = 623
-  Top = 115
+  Top = 95
   Width = 660
   AllowDropFiles = True
   Caption = 'THA FUKING Simba'
@@ -3098,10 +3098,11 @@ object SimbaForm: TSimbaForm
     NumberAttri.Foreground = clNavy
     StringAttri.Foreground = clBlue
     SymbolAttri.Foreground = clRed
+    CaseLabelAttri.Style = [fsItalic]
     DirectiveAttri.Foreground = clRed
     DirectiveAttri.Style = [fsBold]
     CompilerMode = pcmObjFPC
-    NestedComments = True
+    NestedComments = False
     left = 528
     top = 200
   end
@@ -3112,7 +3113,7 @@ object SimbaForm: TSimbaForm
     NumberAttri.Foreground = clHotLight
     StringAttri.Foreground = clFuchsia
     CompilerMode = pcmObjFPC
-    NestedComments = True
+    NestedComments = False
     left = 568
     top = 200
   end

Projects/Simba/simbaunit.pas

@@ -46,7 +46,7 @@ uses
   CastaliaSimplePasPar, v_AutoCompleteForm, PSDump;
 
 const
-  SimbaVersion = 675;
+  SimbaVersion = 676;
 
 type
 

Units/MMLAddon/mmlpsthread.pas

@@ -587,6 +587,8 @@ procedure TPSThread.OnProcessDirective(Sender: TPSPreProcessor;
   Parser: TPSPascalPreProcessorParser; const Active: Boolean;
   const DirectiveName, DirectiveParam: string; var Continue: Boolean);
 begin
+  if CompareText(DirectiveName, 'LOADLIB') = 0 then
+    Continue := not ProcessDirective(DirectiveName,DirectiveParam);
 end;
 
 function TPSThread.PSScriptFindUnknownFile(Sender: TObject;