anchor.diff:    FootnoteRect := THelpWindowRect.Create;
     with FootnoteRect do
     begin
  -    Left := 10;
  -    Width := 80;
  +    Left   := 10;
  +    Width  := 80;
       Bottom := 10;
       Height := 40;
     end;
  
positive.code:   YPositionType := XY.Flags and 15;
  
    if XY.X <> $ffff then
      Rect.Left := GetPos( XPositionType, XY.X );
    if XY.Y <> $ffff then
      Rect.Bottom := GetPos( YPositionType, XY.Y );
  end;
  
  procedure ReadHelpSize( const XY: THelpXYPair;
                          Var Rect: THelpWindowRect );
  begin
    if XY.X <> $ffff then
      Rect.Width := XY.X;
    if XY.Y <> $ffff then
      Rect.Height := XY.Y;
  end;
  
negative.code: unit HelpWindowDimensions;
  
  {$mode objfpc}{$H+}
  
   // NewView - a new OS/2 Help Viewer
   // Copyright 2003 Aaron Lawrence (aaronl at consultant dot com)
   // This software is released under the Gnu Public License - see readme.txt
  
  interface
  
  uses
    IPFFileFormatUnit;
  