[Nautilus]

Правильно- есть, и у меня она ругается на ... (выделено жирным)
procedure OleError(ErrorCode: HResult);
begin
raise EOleSysError.Create('', ErrorCode, 0);
end;