anchor.diff:  const
     VersionNo = '11.2';
     MaxHScroll = 6000; {max horizontal display in pixels}
  -  HandCursor = 10101;
  +  HandCursor = crHandPoint; //10101;
     OldThickIBeamCursor = 2;
     UpDownCursor = 10103;
     UpOnlyCursor = 10104;
  
positive.code: end;
  
  {$ifdef LCL}
  {$else}
  const
    DefaultBitmap = 1002;
    ErrBitmap = 1001;
    ErrBitmapMask = 1005;
    Hand_Cursor = 1003;
    ThickIBeam_Cursor = 1006;
  {$endif}
  
  { TIDObject }
  
negative.code:   ErrorBitMapMask := TBitmap.Create;
  {$ifdef LCL}
    {$I htmlun2.lrs}
  {$else}
    {$R Html32.res}
  {$endif}
    htLoadBitmap(DefBitMap, DefaultBitmap);
    htLoadBitmap(ErrorBitMap, ErrBitmap);
    htLoadBitmap(ErrorBitMapMask, ErrBitmapMask);
    Screen.Cursors[UpDownCursor] := htLoadCursor('UPDOWNCURSOR');
    Screen.Cursors[UpOnlyCursor] := htLoadCursor('UPONLYCURSOR');
    Screen.Cursors[DownOnlyCursor] := htLoadCursor('DOWNONLYCURSOR');
    WaitStream := TMemoryStream.Create;
    ErrorStream := TMemoryStream.Create;
  
  