diff --git a/ideintf/helphtml.pas b/ideintf/helphtml.pas
index 9e570efb2d..d853a29aa7 100644
--- a/ideintf/helphtml.pas
+++ b/ideintf/helphtml.pas
@@ -290,7 +290,7 @@ function THTMLBrowserHelpViewer.FindDefaultBrowser: string;
   function Find(const ShortFilename: string; var Filename: string): boolean;
   begin
     Filename:=SearchFileInPath(ShortFilename{$IFDEF win32}+'.exe'{$ENDIF},'',
-                   Application.EnvironmentVariable['PATH'],':',[]);
+                   Application.EnvironmentVariable['PATH'],PathSeparator,[]);
     Result:=Filename<>'';
   end;
 
@@ -303,7 +303,7 @@ begin
   if Find('safari',Result) then exit;
   if Find('netscape',Result) then exit;
   if Find('opera',Result) then exit;
-  if Find('iexplorer',Result) then exit;
+  if Find('iexplore',Result) then exit;
   Result:='';
 end;
 
diff --git a/lcl/grids.pas b/lcl/grids.pas
index 0fca73178a..05259deb11 100644
--- a/lcl/grids.pas
+++ b/lcl/grids.pas
@@ -4480,8 +4480,10 @@ begin
 end;
 
 procedure TCustomGrid.EditorShowChar(Ch: Char);
+{$ifndef win32}
 var
   msg: TGridMessage;
+{$endif}
 begin
   SelectEditor;
   if FEditor<>nil then begin