diff --git a/KOLadd.pas b/KOLadd.pas
index 244e43e..5d5884b 100644
--- a/KOLadd.pas
+++ b/KOLadd.pas
@@ -450,7 +450,7 @@ type
     FDestroying: Boolean;
     FFlags: DWORD;
     function Execute( Sender: PThread ): PtrInt;
-    procedure Changed;
+    function Changed: LRESULT;
   protected
     destructor Destroy; virtual;
     {*}
@@ -2354,9 +2354,8 @@ end;
 
 { TDirChange }
 
+function TDirChange.Changed: LRESULT;
 {$IFDEF ASM_VERSION}
-//[procedure TDirChange.Changed]
-procedure TDirChange.Changed;
 asm
         MOV      ECX, [EAX].FOnChange.TMethod.Code
         JECXZ    @@exit
@@ -2365,14 +2364,12 @@ asm
         MOV      EAX, [EDX].FOnChange.TMethod.Data
         CALL     [EDX].FOnChange.TMethod.Code
 @@exit:
-end;
 {$ELSE ASM_VERSION} //Pascal
-procedure TDirChange.Changed;
 begin
   if Assigned( FOnChange ) then
     FOnChange(@Self, FPath);
-end;
 {$ENDIF ASM_VERSION}
+end;
 
 {$IFDEF noASM_VERSION}
 //[destructor TDirChange.Destroy]
diff --git a/mckObjs.pas b/mckObjs.pas
index 57170e0..c78aa89 100644
--- a/mckObjs.pas
+++ b/mckObjs.pas
@@ -37,7 +37,7 @@ uses KOL, Classes, Forms, Controls, Dialogs, Windows, Messages, extctrls,
 //////////////////////////////////////////
      {$ENDIF}                           //
 //////////////////////////////////////////
-     imglist, TypInfo, menus;
+     , imglist, TypInfo, menus;
 
 type
   //============================================================================
diff --git a/mirror.pas b/mirror.pas
index 8dc7912..ef4c7c9 100644
--- a/mirror.pas
+++ b/mirror.pas
@@ -65,7 +65,7 @@ uses olectrls, KOL, KOLadd, Classes, Forms, Controls, Dialogs, Windows, Messages
      DsgnIntf                                   //
      {$ENDIF}                                   //
 //////////////////////////////////////////////////
-     ToolsAPI, TypInfo, Consts,  mckMenuEditor, mckAccEditor, mckActionListEditor;
+     , ToolsAPI, TypInfo, Consts,  mckMenuEditor, mckAccEditor, mckActionListEditor;
 
 const
   WM_USER_ALIGNCHILDREN = WM_USER + 1;