anchor.diff:    LazFileUtils,
     {$endif}
     SysUtils,
  +  LCLType,
     LCLIntf;
   
   {$ifdef windows}
  
positive.code:      FreeLibrary(hLib);
  
  {$else}
  procedure DoFocusWindow(h: THandle);
  begin
    LCLIntf.SetForegroundWindow(h);
  end;
  
negative.code: {$ifend}
  
  {$ifndef windows}
  procedure DoFocusWindow(h: HWND);
  {$ifend}
  
  implementation
  