nothing

lazproj/coedit.lpi

@@ -152,6 +152,7 @@
       <Unit3>
         <Filename Value="..\src\ce_d2syn.pas"/>
         <IsPartOfProject Value="True"/>
+        <UnitName Value="ce_d2syn"/>
       </Unit3>
       <Unit4>
         <Filename Value="..\src\ce_dcd.pas"/>
@@ -169,6 +170,7 @@
       <Unit7>
         <Filename Value="..\src\ce_dmdwrap.pas"/>
         <IsPartOfProject Value="True"/>
+        <UnitName Value="ce_dmdwrap"/>
       </Unit7>
       <Unit8>
         <Filename Value="..\src\ce_dockoptions.pas"/>
@@ -189,7 +191,6 @@
       <Unit11>
         <Filename Value="..\src\ce_inspectors.pas"/>
         <IsPartOfProject Value="True"/>
-        <UnitName Value="ce_inspectors"/>
       </Unit11>
       <Unit12>
         <Filename Value="..\src\ce_interfaces.pas"/>
@@ -199,6 +200,7 @@
       <Unit13>
         <Filename Value="..\src\ce_libman.pas"/>
         <IsPartOfProject Value="True"/>
+        <UnitName Value="ce_libman"/>
       </Unit13>
       <Unit14>
         <Filename Value="..\src\ce_libmaneditor.pas"/>
@@ -206,6 +208,7 @@
         <ComponentName Value="CELibManEditorWidget"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
+        <UnitName Value="ce_libmaneditor"/>
       </Unit14>
       <Unit15>
         <Filename Value="..\src\ce_main.pas"/>
@@ -229,12 +232,10 @@
         <ComponentName Value="CEMiniExplorerWidget"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="ce_miniexplorer"/>
       </Unit17>
       <Unit18>
         <Filename Value="..\src\ce_mru.pas"/>
         <IsPartOfProject Value="True"/>
-        <UnitName Value="ce_mru"/>
       </Unit18>
       <Unit19>
         <Filename Value="..\src\ce_observer.pas"/>
@@ -258,7 +259,6 @@
         <ComponentName Value="CEProcInputWidget"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="ce_procinput"/>
       </Unit22>
       <Unit23>
         <Filename Value="..\src\ce_projconf.pas"/>
@@ -266,12 +266,10 @@
         <ComponentName Value="CEProjectConfigurationWidget"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="ce_projconf"/>
       </Unit23>
       <Unit24>
         <Filename Value="..\src\ce_project.pas"/>
         <IsPartOfProject Value="True"/>
-        <UnitName Value="ce_project"/>
       </Unit24>
       <Unit25>
         <Filename Value="..\src\ce_projinspect.pas"/>
@@ -279,7 +277,6 @@
         <ComponentName Value="CEProjectInspectWidget"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="ce_projinspect"/>
       </Unit25>
       <Unit26>
         <Filename Value="..\src\ce_search.pas"/>
@@ -287,7 +284,6 @@
         <ComponentName Value="CESearchWidget"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="ce_search"/>
       </Unit26>
       <Unit27>
         <Filename Value="..\src\ce_shortcutseditor.pas"/>
@@ -299,7 +295,6 @@
       <Unit28>
         <Filename Value="..\src\ce_staticmacro.pas"/>
         <IsPartOfProject Value="True"/>
-        <UnitName Value="ce_staticmacro"/>
       </Unit28>
       <Unit29>
         <Filename Value="..\src\ce_symlist.pas"/>
@@ -324,11 +319,11 @@
         <ComponentName Value="CETodoListWidget"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
+        <UnitName Value="ce_todolist"/>
       </Unit32>
       <Unit33>
         <Filename Value="..\src\ce_tools.pas"/>
         <IsPartOfProject Value="True"/>
-        <UnitName Value="ce_tools"/>
       </Unit33>
       <Unit34>
         <Filename Value="..\src\ce_toolseditor.pas"/>
@@ -336,11 +331,11 @@
         <ComponentName Value="CEToolsEditorWidget"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="ce_toolseditor"/>
       </Unit34>
       <Unit35>
         <Filename Value="..\src\ce_txtsyn.pas"/>
         <IsPartOfProject Value="True"/>
+        <UnitName Value="ce_txtsyn"/>
       </Unit35>
       <Unit36>
         <Filename Value="..\src\ce_widget.pas"/>
@@ -348,12 +343,10 @@
         <ComponentName Value="CEWidget"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="ce_widget"/>
       </Unit36>
       <Unit37>
         <Filename Value="..\src\ce_writablecomponent.pas"/>
         <IsPartOfProject Value="True"/>
-        <UnitName Value="ce_writableComponent"/>
       </Unit37>
     </Units>
   </ProjectOptions>

src/ce_editor.lfm

@@ -19,7 +19,7 @@ inherited CEEditorWidget: TCEEditorWidget
       ClientWidth = 465
       object PageControl: TExtendedNotebook[0]
         Left = 3
-        Height = 380
+        Height = 375
         Top = 3
         Width = 459
         Align = alClient
@@ -32,8 +32,8 @@ inherited CEEditorWidget: TCEEditorWidget
       end
       object editorStatus: TStatusBar[1]
         Left = 3
-        Height = 18
+        Height = 23
-        Top = 385
+        Top = 380
         Width = 459
         BorderSpacing.Around = 2
         Panels = <        

src/ce_editor.pas

@@ -8,7 +8,8 @@ uses
   Classes, SysUtils, FileUtil, ExtendedNotebook, Forms, Controls, lcltype,
   Graphics, SynEditKeyCmds, ComCtrls, SynEditHighlighter, ExtCtrls, Menus,
   SynMacroRecorder, SynPluginSyncroEdit, SynEdit, SynCompletion,
-  ce_widget, ce_interfaces, ce_synmemo, ce_dlang, ce_common, ce_dcd, ce_observer;
+  SynHighlighterMulti, ce_widget, ce_interfaces, ce_synmemo, ce_dlang,
+  ce_common, ce_dcd, ce_observer;
 
 type
 

src/ce_messages.pas

@@ -425,19 +425,19 @@ end;
 
 procedure TCEMessagesWidget.actCopyMsgExecute(Sender: TObject);
 var
-  i: NativeInt;
+  i: Integer;
   str: string;
 begin
   str := '';
   for i := 0 to List.Items.Count-1 do
-      if List.Items[i].MultiSelected then
+    if List.Items[i].MultiSelected then
-        str += List.Items[i].Text + LineEnding;
+      str += List.Items[i].Text + LineEnding;
   Clipboard.AsText := str;
 end;
 
 procedure TCEMessagesWidget.actSelAllExecute(Sender: TObject);
 var
-  i: NativeInt;
+  i: Integer;
 begin
   for i := 0 to List.Items.Count-1 do
     if List.Items[i].Visible then
@@ -639,7 +639,7 @@ procedure TCEMessagesWidget.filterMessages(aCtxt: TCEAppMessageCtxt);
 var
   msgdt: PMessageData;
   itm: TTreeNode;
-  i: NativeInt;
+  i: Integer;
 begin
   if updating then
     exit;
@@ -662,7 +662,7 @@ end;
 
 function guessMessageKind(const aMessg: string): TCEAppMessageKind;
 var
-  pos: Nativeint;
+  pos: Integer;
   idt: string;
 function checkIdent: TCEAppMessageKind;
 begin
@@ -714,7 +714,7 @@ end;
 
 function getLineFromMessage(const aMessage: string): TPoint;
 var
-  i, j: NativeInt;
+  i, j: Integer;
   ident: string;
 begin
   result.x := 0;
@@ -767,7 +767,7 @@ end;
 
 function openFileFromDmdMessage(const aMessage: string): boolean;
 var
-  i: NativeInt;
+  i: Integer;
   ident: string;
   ext: string;
 begin