Additional fixes to the chm quickref generation. Now both the MS help viewer and 7-zip are happy with the result.

git-svn-id: trunk@13476 -

packages/chm/src/chmtypes.pas

@@ -126,7 +126,7 @@ begin
   if ItemCount mod 5 = 0 then begin
     Inc(FQuickRefEntries);
     ReversePos := ($1000) - SizeOf(Word) - (SizeOf(Word)*FQuickRefEntries);
-    Value := NtoLE(Word(CurrentPos - Size));
+    Value := NtoLE(Word(CurrentPos - Size - FHeaderSize));
     Move(Value, Buffer[ReversePos], SizeOf(Word));
   end;
 end;