diff --git a/src/ce_common.pas b/src/ce_common.pas
index 8ae2170f..fa4fa167 100644
--- a/src/ce_common.pas
+++ b/src/ce_common.pas
@@ -795,7 +795,7 @@ begin
         if not GetVolumeInformation(PChar(ltr), PChar(nme), 255, nil, nil, nil, nil, 0) then
           continue;
         case GetDriveType(PChar(ltr)) of
-           DRIVE_REMOVABLE, DRIVE_FIXED, DRIVE_REMOTE: aList.Add(ltr);
+           DRIVE_REMOVABLE, DRIVE_FIXED, DRIVE_REMOTE: list.Add(ltr);
         end;
       except
         // SEM_FAILCRITICALERRORS: exception is sent to application.
@@ -812,7 +812,7 @@ end;
 function shellOpen(const fname: string): boolean;
 begin
   {$IFDEF WINDOWS}
-  result := ShellExecute(0, 'OPEN', PChar(aFilename), nil, nil, SW_SHOW) > 32;
+  result := ShellExecute(0, 'OPEN', PChar(fname), nil, nil, SW_SHOW) > 32;
   {$ENDIF}
   {$IFDEF LINUX}
   with TProcess.Create(nil) do
diff --git a/src/ce_infos.pas b/src/ce_infos.pas
index 9d898530..0341b236 100644
--- a/src/ce_infos.pas
+++ b/src/ce_infos.pas
@@ -6,6 +6,7 @@ interface
 
 uses
   Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, strutils,
+  {$IFDEF WINDOWS}Windows,{$ENDIF}
   StdCtrls, ExtCtrls, Buttons, Menus,ce_widget, ce_common, ce_sharedres;
 
 type
diff --git a/src/ce_main.pas b/src/ce_main.pas
index d6d1b0e7..02d83363 100644
--- a/src/ce_main.pas
+++ b/src/ce_main.pas
@@ -8,6 +8,7 @@ uses
   Classes, SysUtils, LazFileUtils, SynEditKeyCmds, SynHighlighterLFM, Forms,
   StdCtrls, AnchorDocking, AnchorDockStorage, AnchorDockOptionsDlg, Controls,
   Graphics, strutils, Dialogs, Menus, ActnList, ExtCtrls, process,
+  {$IFDEF WINDOWS}Windows, {$ENDIF}
   XMLPropStorage, SynExportHTML, fphttpclient, xfpjson, xjsonparser, xjsonscanner,
   ce_common, ce_dmdwrap, ce_nativeproject, ce_synmemo, ce_writableComponent,
   ce_widget, ce_messages, ce_interfaces, ce_editor, ce_projinspect, ce_projconf,
@@ -1302,9 +1303,9 @@ begin
   splt := TAnchorDockSplitter(sender);
   splt.MoveSplitter(offs);
   if splt.ResizeAnchor in [akLeft, akRight] then
-    Mouse.CursorPos:= Point(Mouse.CursorPos.X + offs, Mouse.CursorPos.Y)
+    Mouse.CursorPos:= classes.Point(Mouse.CursorPos.X + offs, Mouse.CursorPos.Y)
   else
-    Mouse.CursorPos:= Point(Mouse.CursorPos.X, Mouse.CursorPos.Y + offs);
+    Mouse.CursorPos:= classes.Point(Mouse.CursorPos.X, Mouse.CursorPos.Y + offs);
   Handled := true;
 end;